如何显示最高指数
比如说股票中的今日最高价显示

text1是一个不停上下变化的long型数值
当text1不停变化时，text2将记录下来text1的最高值，并且根据text1的变化，
不停更新。请问如何实现？



[解决办法]
Private Sub Text1_Change()
If Val(Text1.Text) > Val(Text2.Text) Then
Text2.Text = Text1.Text
End If
End Sub
这样应该可以解决了