如何用VB编写一个简单的减法程序?
不用很复杂,大概就是在前两个text中各输入一个数,用鼠标单击按钮之后在第三个text中输出前两个数的差就可以了,拿来计算高差的。PS:麻烦各位尽可能把步骤写得详细一点,...
不用很复杂,大概就是在前两个text中各输入一个数,用鼠标单击按钮之后在第三个text中输出前两个数的差就可以了,拿来计算高差的。 PS:麻烦各位尽可能把步骤写得详细一点,谢谢。
展开
5个回答
推荐于2018-04-04
展开全部
Private Sub Command1_Click()
'文本框Text3的内容等于Text1的数值减去Text2的数值
'其中Val 函数用来返回字串表达式的数值
Me.Text3.Text = Val(Me.Text1.Text) - Val(Me.Text2.Text)
End Sub
'文本框Text3的内容等于Text1的数值减去Text2的数值
'其中Val 函数用来返回字串表达式的数值
Me.Text3.Text = Val(Me.Text1.Text) - Val(Me.Text2.Text)
End Sub
展开全部
在窗口放三个textbox控件,一个Commandbutton控件,双击Commandbutton控件,切换到Private Sub Command1_Click()事件代码中,输入以下代码:
Dim a as double, b as double
text3.text = str(val(text1.text) - val(text2.text))
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-07-30
展开全部
先画3个text 分别为 text1 text2 text3 private sub form1_load( )text1.text=inputbox("请输入第一个数 ")text2.text=inputbox("请输入第二个数 ")text3.text=text1.text-text2.textend sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-07-30
展开全部
dim a as inter...text1=(你控件的名称)text2=(第二个空间的名称)text3=text1-text2end end大概就是这么个,3年没用vb了,肯定有错的,将就一下吧= =
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
2013-07-30
展开全部
Option ExplicitPrivate Sub Command1_Click()
Text3.Text = Val(Text1.Text) - Val(Text2.Text)
End Sub
Text3.Text = Val(Text1.Text) - Val(Text2.Text)
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询