Question

Vb6.0作业程序，请问如何实现运行程序后系统自动执行并判断Text1和text2内容是否一致。不

Vb6.0作业程序，请问如何实现运行程序后系统自动执行并判断Text1和text2内容是否一致。不操作就不变。往T1和tT2输入数字后再判断是否一致。我不知道该怎么触发判断和执行一次判断后再次执行。请教高手。

Answer 1

Private Sub Text2_LostFocus()
If Text1.Text <> "" And Text2.Text <> "" Then
If Text1.Text = Text2.Text Then
MsgBox "一样"
Else
MsgBox "不一样"
End If
End If
End Sub
如果你想text1失去焦点时也执行，可以将相同的代码放在Text1_LostFocus()中

追问

晕，没有触发事件啊…？