求求大家了!!! 帮我看看"VB的子程序或函数未定义"
来源:百度知道 编辑:UC知道 时间:2024/06/09 20:36:45
Private Sub Form_Load()
Dim szErrMsg As String
'初始化样式
Call InitVisualStyle(报错指向这一行)
picBG.BackColor = g_VisualStyle.clrTitle
Me.Top = (Screen.Height - Me.Height) / 2 '垂直方向居中
Me.Left = (Screen.Width - Me.Height) / 2 '水平方向居中
If App.PrevInstance Then
MsgBox "系统已经启动!"
'Exit Sub
End If
iCount = 0
Dim szErrMsg As String
'初始化样式
Call InitVisualStyle(报错指向这一行)
picBG.BackColor = g_VisualStyle.clrTitle
Me.Top = (Screen.Height - Me.Height) / 2 '垂直方向居中
Me.Left = (Screen.Width - Me.Height) / 2 '水平方向居中
If App.PrevInstance Then
MsgBox "系统已经启动!"
'Exit Sub
End If
iCount = 0
InitVisualStyle函数在哪里啊?
是不是没有声明呢。
把鼠标点在InitVisualStyle上面,
按Shift+F2试试,看能找到定义不。
检查下是不是写错过程名了,一般是这样的
试了 但是显示"光标下的标识符不可识别"