[VB.NET]请教MSScript.ocx 问题
发布时间：2020-12-16 23:41:58 所属栏目：大数据 来源：网络整理
导读：请教MSScript.ocx 问题 我用MSScript.ocx vb6.0的控件，在vb.net中加入该控件，怎么试都不行，请高手指教。 Private Sub Button1_Click() AxScriptControl1.AddCode( Function returnthis vbCrLf _ returnthis = 5 vbCrLf _ End Function ) Dim obj() As Obj
|
请教MSScript.ocx 问题 我用MSScript.ocx vb6.0的控件，在vb.net中加入该控件，怎么试都不行，请高手指教。 Private Sub Button1_Click() AxScriptControl1.AddCode( Function returnthis & vbCrLf _ & returnthis = 5 & vbCrLf _ & End Function ) Dim obj() As Object Dim a As Int32 = AxScriptControl1.Run( returnthis,obj) End Sub 运行后出错，报如下信息： 未处理的“System.NullReferenceException”类型的异常出现在 axinterop.msscriptcontrol.dll 中。 其他信息: 无效指针 __________________________________________________________________________ 怎么没有人帮忙呀？有谁要是帮我解决了此问题，我就帮我盛下的分数全给他， 我很急呀！ __________________________________________________________________________ Function returnthis() __________________________________________________________________________ Dim Gongshi As String Dim ResultData As Double Gongshi = OrgData*1000 公式 ScriptControl1.AddCode( private OrgData ) 先定义公式中的变量 ScriptControl1.AddCode( OrgData=5 ) 给变量赋值 ResultData = ScriptControl1.Eval(Gongshi) 计算结果 __________________________________________________________________________ 谢谢UserInfo(神话) ，你的这种方法我后来自己试出来了，但 用AxScriptControl1.Run()方法，不知怎么调用？ __________________________________________________________________________ 我想给你分，但怎么也结不了贴，真奇怪 __________________________________________________________________________ （编辑：李大同） 【声明】本站内容均来自网络，其相关言论仅代表作者个人观点，不代表本站立场。若无意侵犯到您的权利，请及时与联系站长删除相关内容! |