怎样把文本筐里的语句作为程序语言 我没试过,不过可以试试sub a()text1.text=val(a)aend sub 试试行不行:) 解决方案 » 免费领取超大流量手机卡,每月29元包185G流量+100分钟通话, 中国电信官方发货 YEAH~带上一个编译器怎么样?谁有可以调用VB编译器的DLL吗? 以前有人问过acptvb(微软全球技术中心 VB技术支持)的回答:回复人: acptvb(微软全球技术中心 VB技术支持) ( ) 信誉:99 2002-6-26 16:53:41 得分:0 感谢您使用微软产品。您可以利用Microsoft Script Control来实现这个功能。首先,你需要在工程里引用一下Microsoft Script Control。然后加入一下代码:Private Sub Form_Load()Dim scr As New ScriptControlDim mycode As Stringscr.Language = "vbscript"mycode = "public function Test()" + vbCrLfmycode = mycode + "MsgBox ""Hello VB""" + vbCrLfmycode = mycode + "End function"scr.AddCode (mycode)scr.Eval ("Test()")End Sub这样,在字符串mycode里定义的函数Test()就会被调用了。参考:HOWTO: Use Script Control Modules and Procedures Collections http://support.microsoft.com/default.aspx?scid=KB;EN-US;Q184745- 微软全球技术中心 VB技术支持本贴子以“现状”提供且没有任何担保,同时也没有授予任何权利。具体事项可参见使用条款(http://support.microsoft.com/directory/worldwide/zh-cn/community/terms_chs.asp)。为了为您创建更好的讨论环境,请参加我们的用户满意度调查(http://support.microsoft.com/directory/worldwide/zh-cn/community/survey.asp?key=(S,49854782))。 请VB高手一个一维离散小波变换的程序 50分求解关于VB第三方控件问题 自定义控件 属性 散分!祝大家新年快乐!!! DataGrid1.DataSource = rs出错,为什么啊? 怎么刷新鼠标 为什么VB调用EXECL速度很慢 调用当前屏幕保护程序 对300万记录的一个表进行模糊查询该怎么做才最好? 有谁知道VB中 直线的画法?(不断加分) '''''''''''''谁能告诉我?'''''''''''''''''' 关于unload,一个比较低级的问题!
acptvb(微软全球技术中心 VB技术支持)的回答:
回复人: acptvb(微软全球技术中心 VB技术支持) ( ) 信誉:99 2002-6-26 16:53:41 得分:0
感谢您使用微软产品。您可以利用Microsoft Script Control来实现这个功能。首先,你需要在工程里引用一下Microsoft Script Control。然后加入一下代码:Private Sub Form_Load()Dim scr As New ScriptControl
Dim mycode As Stringscr.Language = "vbscript"
mycode = "public function Test()" + vbCrLf
mycode = mycode + "MsgBox ""Hello VB""" + vbCrLf
mycode = mycode + "End function"scr.AddCode (mycode)
scr.Eval ("Test()")End Sub这样,在字符串mycode里定义的函数Test()就会被调用了。参考:HOWTO: Use Script Control Modules and Procedures Collections
http://support.microsoft.com/default.aspx?scid=KB;EN-US;Q184745
- 微软全球技术中心 VB技术支持本贴子以“现状”提供且没有任何担保,同时也没有授予任何权利。具体事项可参见使用条款
(http://support.microsoft.com/directory/worldwide/zh-cn/community/terms_chs.asp)。
为了为您创建更好的讨论环境,请参加我们的用户满意度调查
(http://support.microsoft.com/directory/worldwide/zh-cn/community/survey.asp?key=(S,49854782))。