VB代码中这句什么意思?

来源:百度知道 编辑:UC知道 时间:2024/05/22 18:24:25
这句什么意思?:
Private Sub Form_Resize()
Me.Move Screen.Width / 2 - 2500, Screen.Height / 2 - 1000, 5000, 2000
End Sub

还有这句:Dim FrmClicki%, starttime&, m As Boolean, i&

请分别说明!

Private Sub Form_Resize() '这是窗体大小改变就会触发的事件,比如最大化,最小化,拉大拉小窗体的时候
Me.Move Screen.Width / 2 - 2500, Screen.Height / 2 - 1000, 5000, 2000
'这句是改变窗体的位置和大小,一共四个参数
'第一个是窗体的Left属性,也就是窗体距屏幕左边的距离
'第二个是窗体的Top属性,也就是窗体距屏幕上边的距离
'第三个是窗体的Width属性,就是窗体的宽度
'第四个是窗体的Height属性,就是窗体的高度
'这句代码实现的功能其实就是让窗体居中,而且固定其宽度5000,高度2000
'Screen.Width是整个屏幕的宽度,除以2,就是屏幕的中间,再减去2500(也就是窗体大小的一半),这就是吧窗体的中心移到屏幕的中心,也就是窗体在水平方向居中了.
'Screen.Height这句也是一样的,让窗体在垂直方向居中
End Sub

Dim FrmClicki%, starttime&, m As Boolean, i&
定义几个变量,后面的符号是VB规定的一些变量类型的缩写
比如本来要写 Dim FrmClicki as Integer,可以简写为Dim FrmClicki%
%代表整型
&代表Long
其他的还有
!代表Single
$代表String
这些都是可以简写的
还有如果是定义数组,是这么写的Dim num%(100)
这样就定义了一个有100个元素的整型数组

如果窗体的大小改变了,就相应调整窗口在屏幕中间的位置,并且大小恢复到原来的大小。
下面是定义了几种不同类型的变量:FrmClicki%短整型, starttime&长整型, m As Boolean布尔型, i&长整型

第一个 定义窗体位置大小
从左到右是窗体左距,上距,宽度,高度
第二个 定义 FrmClicki整型, start