编译错误的问题!!!---回者有分!!
在我的机器上的vb上能调试程序,但是在我同学和老师的机器上有错误。
不过演示错误,下面:
Sub Main()
Dim objName As New CIniOperate
Dim strIniPath As String
strIniPath = App.Path & "\ini\MIS.ini"
objName.SpecifyIni (strIniPath)
******** If Trim$(objName.ReadString("Mis_sec2", "FirstRun", 6)) = "true" Then
FrmConfig.Show vbModal
If objName.WriteString("Mis_sec2", "FirstRun", "false") = False Then
MsgBox "错误:" & objName.ErrorMsg, vbOKOnly + vbExclamation, "警告"
End If
End If
strSvrName = Trim$(objName.ReadString("Mis_sec1", "SvrName", 20))
strSuperPwd = Trim$(objName.ReadString("Mis_sec1", "Password", 20))
frmLogin.Show vbModal
If Not frmLogin.LoginSucceeded Then
End
End If
MDIMain.Show
End Sub
其中 Dim objName As New CIniOperate使我自个定义的类,用来读写 ini文件。
上面打星号的有错误!!!
错误显示:compile error:
Can't find project or library。