Question

VB编程，恳请有兴趣的高手帮忙设计个程序，程序功能如下所述

Text1中的数值是程序计算结果显示的地方，监视它的变化，能不能帮我设计成这样
Private Sub Text1_Change()
如果【现在显示的值/10 减去 刚才显示的值/10 大于等于1，则Text2=好】反之Text2=不好
End Sub
现在显示的值应该就是val(Text1)吧，关键是怎么表示刚才的值
我这个程序要求每计算一次都要前后比较一次（比较相邻这两次的数值），如果您没看懂我的问题QQ 447618338谢谢您

Answer 1

Dim tmp As Integer

Private Sub Form_Load()
Text1.Text = "0"
Text2.Text = ""
End Sub

Private Sub Text1_Change()
If Text1.Text <> "" Then
If Val(Text1.Text) / 10 - Val(tmp) / 10 > 1 Then
Text2.Text = "好"
Else
Text2.Text = "不好"
End If
tmp = Val(Text1.Text) / 10 - Val(tmp) / 10
End If

End Sub

Answer 2

你把问题完整说清，直接用语言描述就行，记住是完整的，包括现在显示的值是怎么来的，邮箱也发过来