用vb编写的程序,运行没问题,在用file->make *.exe时,提示copile error:variable not defined在Public Sub RecordEdit()
Dim intCount As Integer
If msgList.Rows > 1 Then
gintmode = EDIT
intCount = msgList.Row
gsSql = " where sgid=\'" & Trim(msgList.TextMatrix(msgList.Row, 1)) & "\' and sgdate=cdate(\'" & Format(msgList.TextMatrix(msgList.Row, 2), "yyyy-mm-dd") & "\') and sgplace=\'" & Trim(msgList.TextMatrix(msgList.Row, 3)) & "\'"
frmAcc1.Show 1
ShowData
Call MovCursor(intCount, msgList)
Else
Call RecordAdd
End If
End Sub
这段代码中EDIT被兰色框选中,那位知道是怎么回事啊?
Dim intCount As Integer
If msgList.Rows > 1 Then
gintmode = EDIT
intCount = msgList.Row
gsSql = " where sgid=\'" & Trim(msgList.TextMatrix(msgList.Row, 1)) & "\' and sgdate=cdate(\'" & Format(msgList.TextMatrix(msgList.Row, 2), "yyyy-mm-dd") & "\') and sgplace=\'" & Trim(msgList.TextMatrix(msgList.Row, 3)) & "\'"
frmAcc1.Show 1
ShowData
Call MovCursor(intCount, msgList)
Else
Call RecordAdd
End If
End Sub
这段代码中EDIT被兰色框选中,那位知道是怎么回事啊?
另外你所谓的可以运行大概不是选择编译后运行的那种方式吧。