vb实验题需要编程语句求专业指导

2024-12-17 10:27:53

推荐回答（1个）

回答1：

两个文本框初始值为空，且“复制”“清除”，两个命令按钮为”不可见“。
Private Sub Command1_Click()Text2.Text = Text1.Text
End Sub

Private Sub Command2_Click()Text1.Text = ""
Text2.Text = ""
End Sub

Private Sub Form_Load()Text1.Text = ""
Text2.Text = ""
Command1.Visible = False
Command2.Visible = False
Command1.Caption = "复制"
Command2.Caption = "清除"
End Sub

Private Sub Text1_Change()If Text1.Text <> "" Then
Command1.Visible = True
Command2.Visible = True
Else
Command1.Visible = False
Command2.Visible = False
End If
End Sub

vb实验题 需要编程语句 求专业指导

vb实验题需要编程语句求专业指导