vb的简单的四则运算怎么做
展开全部
vb写的四则运算如下:
Private Sub Command1_Click()
On Error GoTo err
Dim s As Object
Dim Bds As String '表达式
Set s = CreateObject("MSScriptControl.ScriptControl")
s.Language = "VBScript"
Bds = Text1
Text2 = s.Eval(Bds)
Exit Sub
err:
Text2 = err.Description
End Sub
Private Sub Command1_Click()
On Error GoTo err
Dim s As Object
Dim Bds As String '表达式
Set s = CreateObject("MSScriptControl.ScriptControl")
s.Language = "VBScript"
Bds = Text1
Text2 = s.Eval(Bds)
Exit Sub
err:
Text2 = err.Description
End Sub
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
--
2022-12-05 广告
2022-12-05 广告
图形化编程简单理解为用积木块形式编程,scratch和python也是其中的一种,属于入门级编程,以其简单生动的画面获得无数学生的喜爱,深圳市创客火科技有限公司是一家做教育无人机的公司,旗下有编程无人机,积木无人机及室内外编队,每款飞机含有...
点击进入详情页
本回答由--提供
展开全部
你是根据四则运算的公式,直接给出结果,是吧?
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询