例如:打开窗口时text1显示"百度群飞度编程学社&1195277",有两个控件控制显示和隐藏。代码如下:
'百度群飞度编程学社&1195277 希望可以帮到你
Private Sub Command1_Click()
Text1.Visible = True
End Sub
Private Sub Command2_Click()
Text1.Visible = False
End Sub
Private Sub Form_Load()
Text1.Text = "百度群飞度编程学社&1195277"
End Sub