Question

v问题：要求在Text1中输入记号笔，text2显示天的vb语言

要求在Text1中输入记号笔，text2显示天的vb语言

Answer 1

以下程序实现：在Text1中输入“记号笔”，点击[开始]后，在text2显示“天”，已经运行过。

Private Sub Command1_Click()
If Text1.Text = "记号笔" Then
Text2.Text = "天"
Else
Text2.Text = ""
End If
End Sub
Private Sub Command2_Click()
End
End Sub
Private Sub Form_Load()
Command1.Caption = "开始"
Command2.Caption = "退出"
Text1.Text = "请在此输入“记号笔”"
Text2.Text = ""
End Sub
Private Sub Text1_GotFocus()
SendKeys "{home}+{end}"
End Sub