标题: 请教这个变量应定义为什么类型？ [打印本页] 作者: cyber-bobo 时间: 2007-12-4 11:05 标题: 请教这个变量应定义为什么类型？ Dim Conn As New ADODB.Connection
Dim Rs As New ADODB.Recordset
Dim strSQL As String
Dim lngID 'As Boolean （这个变量定义为string或boolean或long,都会提示下面的isnull定义错，不定义类型就没问题，为什么呢？）
lngID = DLookup("AutoNum", "tbl编号", "Date=#" & Date & "#")
If IsNull(lngID) Then
Set Conn = CurrentProject.Connection
strSQL = "SELECT * FROM tbl编号;"
Rs.Open strSQL, Conn, adOpenDynamic, adLockOptimistic
Rs.AddNew
Rs("AutoNum") = 0
Rs("Date") = Date
Rs.Update
Rs.close
Set Rs = Nothing
Set Conn = Nothing
lngID = 0
End If
Me.送货单号 = "JA" & Right(Year(Date), 1) & Format(Date, "mmdd") & Format(lngID + 1, "00")作者: tz-chf 时间: 2007-12-4 11:36
用dlookup查出来的就是V,,,,型的。不写as。。。就是v...型的。
V什么的我忘记怎么写法了。作者: Grant 时间: 2007-12-4 11:43
Dim varX As Variant