如何用vb6编辑登陆界面

用VB设置窗体标题为“窗体示例”；窗体载入时，将窗体移到屏幕中央，窗体上用22号字体显示“同学们早上好！”；当单击窗体时，显示“老师早！”；当双击窗体时，显示“老师好！”。

代码设计如下：

Private Sub Form_Load()

Me.Move - Width) / 2, - Height) / 2, Width, 2400

Font.Size = 22 '缺省对象名称，指当前窗体

Caption = "窗体示例" '相当于Form1.Caption = "窗体示例"

Form1.Show

Print "同学们早上好！" '等价于Form1.Print "同学们早上好！"

End Sub

Private Sub Form_Click()

Form1.Refresh

Print "老师早！"

End Sub

Private Sub Form_DblClick()

Cls '等价于Form1. Cls

Print "老师好！"

End Sub

运行程序结果如下所示：