VB6 计算文本框的输入内容
比如我在一个文本框中输入123+456,让通过按按钮1后把计算结果保存到变量a,并在第二个文本框中显示。如何解决“+”的计算?减法呢?希望提供按钮1的代码。只用这2个输入...
比如我在一个文本框中输入123+456,让通过按按钮1后把计算结果保存到变量a,并在第二个文本框中显示。如何解决 “+” 的计算?减法呢?希望提供按钮1的代码。
只用这2个输入框,1个按钮,不加别的。
希望能讲解一下代码。 展开
只用这2个输入框,1个按钮,不加别的。
希望能讲解一下代码。 展开
展开全部
这个如果用VBS实现起来非常容易,给你一个调用VBS的Eval函数的函数吧
Function Eval(ByVal Expressions As String) As String
Dim Mssc As Object
Set Mssc = CreateObject("MSScriptControl.ScriptControl")
Mssc.Language = "vbscript"
On Error GoTo EvalErr
Eval = Mssc.Eval(Expressions)
Exit Function
EvalErr:
Exit Function
End Function
Private Sub Command1_Click()
Text2.Text = Eval(Text1.Text)
End Sub
Function Eval(ByVal Expressions As String) As String
Dim Mssc As Object
Set Mssc = CreateObject("MSScriptControl.ScriptControl")
Mssc.Language = "vbscript"
On Error GoTo EvalErr
Eval = Mssc.Eval(Expressions)
Exit Function
EvalErr:
Exit Function
End Function
Private Sub Command1_Click()
Text2.Text = Eval(Text1.Text)
End Sub
展开全部
用vbscript很简单噢。
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
文本框输入一个 按个+号 再输入一个 又按+号 就计算前2个数字的和 比较简单的是建立3个textbox,text1、text2、和text3,text3用来显示text1和
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询