设计一个窗体,窗体的标题为“VB程序设计”,运行程序时单击窗体在窗体上输出“VB程序设计”,同时窗体的标题变为“欢迎你的到来",窗体的长、宽同时减少10TWIP。求高!
Me.Width = 4700
Me.Height = 3500
If x = 0 Then
x = x + 1
这些事什么意思啊?
原来的界面大小是4800*3600,你不是缩小100吗?就是4700*3500了。
Private Sub Form_Click()
If x = 0 Then '判断X是不是0,如果是执行下面代码
x = x + 1
Me.Caption = "欢迎你的到来"
Me.Width = 4700
Me.Height = 3500
Label1.Caption = "VB程序设计"
Else '如果不是0,执行下面代码
x = 0
Call Form_Load
End If
End Sub
Form1.Width = Form1.Width - 10
Form1.Height = Form1.Height - 10和 Mw.Width=9000有区别么?
那个9000是什么意思?
初始化me的高度与宽度。如果感觉不明显,你可以把10改成100就会明显一点了,不然一次减10不明显。