vb 运行text里输入函数
vb如何运行text里输入函数好像在text1里输入y=x+1x=text2y=x+1text3=y不知这样可不可以...
vb 如何运行text里输入函数
好像 在text1里输入
y=x+1
x=text2
y=x+1
text3=y
不知这样可不可以 展开
好像 在text1里输入
y=x+1
x=text2
y=x+1
text3=y
不知这样可不可以 展开
展开全部
这个实现用到一个控件.
在VB里点"工程"->"部件", 在"控件"选项卡里选取"Microsoft Script Control 1.0", 然后确定. 在工具箱找到ScriptControl控件, 添加到窗体中, 再添加一个TextBox, 一个Command, 一个Label. 然后加入如下代码:
Private Sub Command1_Click()
Dim s As String
s = "function RunThis()" & vbCrLf & "RunThis=" & Text1.Text & vbCrLf & "end function"
ScriptControl1.AddCode s
Label1.Caption = ScriptControl1.Run("RunThis")
End Sub
此后你可以在text1中输入任何表达式, 包括 now, time, date, 5+4-1, msgbox "Hello!", 执行结果都会在label1显示出来. 但是注意! 不能在表达式里调用控件!! 输入的表达式不能影响你的程序的变量. 你可以在里面写函数, 但是不能直接引用你程序的变量和控件.
在VB里点"工程"->"部件", 在"控件"选项卡里选取"Microsoft Script Control 1.0", 然后确定. 在工具箱找到ScriptControl控件, 添加到窗体中, 再添加一个TextBox, 一个Command, 一个Label. 然后加入如下代码:
Private Sub Command1_Click()
Dim s As String
s = "function RunThis()" & vbCrLf & "RunThis=" & Text1.Text & vbCrLf & "end function"
ScriptControl1.AddCode s
Label1.Caption = ScriptControl1.Run("RunThis")
End Sub
此后你可以在text1中输入任何表达式, 包括 now, time, date, 5+4-1, msgbox "Hello!", 执行结果都会在label1显示出来. 但是注意! 不能在表达式里调用控件!! 输入的表达式不能影响你的程序的变量. 你可以在里面写函数, 但是不能直接引用你程序的变量和控件.
展开全部
实现用控件.
VB点"工程"->"部件", "控件"选项卡选取"Microsoft Script Control 1.0", 确定. 工具箱找ScriptControl控件, 添加窗体, 再添加TextBox, Command, Label. 加入代码:
Private Sub Command1_Click()
Dim s As String
s = "function RunThis()" & vbCrLf & "RunThis=" & Text1.Text & vbCrLf & "end function"
ScriptControl1.AddCode s
Label1.Caption = ScriptControl1.Run("RunThis")
End Sub
text1输入任何表达式, 包括 now, time, date, 5+4-1, msgbox "Hello!", 执行结都label1显示. 注意! 能表达式调用控件!! 输入表达式能影响程序变量. 面写函数, 能直接引用程序变量控件.
VB点"工程"->"部件", "控件"选项卡选取"Microsoft Script Control 1.0", 确定. 工具箱找ScriptControl控件, 添加窗体, 再添加TextBox, Command, Label. 加入代码:
Private Sub Command1_Click()
Dim s As String
s = "function RunThis()" & vbCrLf & "RunThis=" & Text1.Text & vbCrLf & "end function"
ScriptControl1.AddCode s
Label1.Caption = ScriptControl1.Run("RunThis")
End Sub
text1输入任何表达式, 包括 now, time, date, 5+4-1, msgbox "Hello!", 执行结都label1显示. 注意! 能表达式调用控件!! 输入表达式能影响程序变量. 面写函数, 能直接引用程序变量控件.
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
eval有这个函数吧。。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
不能直接 除非你的程序能够解析一下你输入的 东西 但是这个几乎不可能 否则你可以编写一个VB编写的VB了!~:)
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询