关于vb的一个菜鸟问题
假设就是用两个TextBox来输入两个数据然后做加法在第三个TextBox中输出结果。现在就是想问下有什么办法能够就是不用按钮或Form_Click之类的方法当我前两个数...
假设就是用两个TextBox来输入两个数据 然后做加法 在第三个TextBox中输出结果 。
现在就是想问下 有什么办法能够就是不用按钮 或 Form_Click之类的方法 当我前两个数据发生改变的时候 那个结果的TextBox中的数据自动改变 展开
现在就是想问下 有什么办法能够就是不用按钮 或 Form_Click之类的方法 当我前两个数据发生改变的时候 那个结果的TextBox中的数据自动改变 展开
3个回答
展开全部
假设第一个和第二个text1和text2,是输入框,text3是显示结果的
则在text1和text2 的change事件中分别输入,每当text1和text2的值改变的时候,就会出发change事件,达到随时计算的目的
Private Sub Text1_Change()
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End Sub
Private Sub Text2_Change()
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End Sub
则在text1和text2 的change事件中分别输入,每当text1和text2的值改变的时候,就会出发change事件,达到随时计算的目的
Private Sub Text1_Change()
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End Sub
Private Sub Text2_Change()
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End Sub
展开全部
Private Sub ee()
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End Sub
Private Sub Text1_Change()
Call ee
End Sub
Private Sub Text2_Change()
Call ee
End Sub
Text3.Text = Val(Text1.Text) + Val(Text2.Text)
End Sub
Private Sub Text1_Change()
Call ee
End Sub
Private Sub Text2_Change()
Call ee
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
Private Sub Text1_Change()
On Error Resume Next
Text3 = CLng(Text1) + CLng(Text2)
End Sub
Private Sub Text2_Change()
On Error Resume Next
Text3 = CLng(Text1) + CLng(Text2)
End Sub
On Error Resume Next
Text3 = CLng(Text1) + CLng(Text2)
End Sub
Private Sub Text2_Change()
On Error Resume Next
Text3 = CLng(Text1) + CLng(Text2)
End Sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询