鲁达
用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
运行程序结果如下所示：