此VB程序中VBWZ为何意?

来源：百度知道 编辑：UC知道 时间：2024/06/23 23:34:16
此为设置字体的闪烁效果的程序,程序中第二行程序行及VBWZ ME 为何意?
Dim X1 As Integer, Y1 As Integer
Function vbwz(fname As Form, A As String, F As String, x As Long, y As Long)
fname.CurrentX = x
fname.CurrentY = y
If Left(F, 1) = "d" Or Left(F$, 1) = "D" Then
X1 = -18
Y1 = -1
ElseIf Left(F, 1) = "f" Or Left(F, 1) = "F" Then
X1 = 20
Y1 = 20
ElseIf Left(F, 1) = "y" Or Left(F, 1) = "Y" Then
X1 = 50
Y1 = -20 '设置不同的效果
End If
fname.ForeColor = QBColor(7)
fname.Print A 'A 为所要显示的文字
fname.CurrentX = x + X1
fname.CurrentY = y + Y1
fname.ForeColor = QBColor(9)
fname.Print A
End Function
Private Sub Timer1_Timer()
Show
BackColor = QBColor(11)
FontName = "楷体_GB2312"
FontSize = 40
vbwz Me, &

第二行Function vbwz(fname As Form, A As String, F As String, x As Long, y As Long) 声明一个函数，5个参数，fname是窗体类型，后面两个字符串两个长整型，fname用来决定在那个窗口上显示。
vbwz Me,…… 就是调用这个vbwz函数，Me是保留字，指当前窗体

是不是这个呢？
Function vbwz(fname As Form, A As String, F As String, x As Long, y As Long)
这个是定义一个函数，函数名是vbwz
vbwz Me, "雕刻效果", "D", 1500, 700
这个是函数调用，其中 Me, "雕刻效果", "D", 1500, 700 都是调用函数的参数，me表示是当前的窗体