程序代码：

Private Sub Command1_Click()

   Unload Me

End Sub

Private Sub Form_Click()

   Me.Text1.Top = 0

   Me.backcolor = vbCyan

End Sub

程序小结：

   1、在测试代码时，可以将不用的代码先注释，便于之后在使用，这是一个不错的习惯。

   2、常用的VB颜色代码：

   黑色：vbBlack

   红色：vbRed

   绿色：vbGreen

   黄色：vbYellow  

   兰色：vbBlue

   洋红：vbMagenta

   青色：vbCyan  

   白色：vbWhite