VB中清除和退出代码各是什么（vb中登录和注册代码怎么写）

单击退出代码：Private Sub Form1_Click() End End Sub -------------------------------2. Private Sub Command1_Click() Unloadme End Sub 清零：Text1.Text = "" 退格： On Error Resume Next Text1.Text = Mid$(Text1.Text, 1, (Len(Text1.Text) - 1))