VB6.0中TEXT1输入123456单击控件TEXT2显示abcd

来源:百度知道 编辑:UC知道 时间:2024/05/05 22:33:41
VB6.0中TEXT1输入123456单击控件TEXT2显示abcd

这样一段代码怎么写!

点击Text2,在Text1中显示:

Private Sub Text2_Click()
If Text1.Text = "123456" Then
Text1.text = "abcd"
End If
End Sub

可以把第一行的“Text2”换成“Command1”(需要按钮),这样更好。
在Text2中显示只需把第三行“Text1”换成“Text2”。
该代码用到了条件语句。

VB6.0"shuru"TEXT1"shuru"123456"danjikongjian"TEXT2""xianshi"abcd