vb编辑器怎么设置窗口(利用VB制作一个简单的欢迎界面)
vb编辑器怎么设置窗口(利用VB制作一个简单的欢迎界面)End SubPrint "同学们早上好!" '等价于Form1.Print "同学们早上好!"Font.Size = 22 '缺省对象名称,指当前窗体Caption = "窗体示例" '相当于Form1.Caption = "窗体示例"Form1.Show
用VB设置窗体标题为“窗体示例”;窗体载入时,将窗体移到屏幕中央,窗体上用22号字体显示“同学们早上好!”;当单击窗体时,显示“老师早!”;当双击窗体时,显示“老师好!”。
代码设计如下:
Private Sub Form_Load()
Me.Move (Screen.Width - Width) / 2 (Screen.Height - 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
运行程序结果如下所示: