为何在窗体里不能出现数据？

hongjian

为何在窗体里不能出现数据？
为何：  Me.借报编号 = no　　总是空白？但变量 no 是有数字的！

Private Sub Form_Load()
   qhj1 = Me.年份    '变量
  Dim no, no1 As Long
  no1 = DMax("[借报编号]", "密传电报登记明细表", "[年份]='" & qhj1 & "'")
   no = no1 + 1
　 If Me.借报单位 = "" Then
  　 Me.借报编号 = no　　　　　　
Else
msgbox no  'no  有数据！
End If
  Beep
End Sub

hongjian

但实际上却是没有数据啊？

为何在窗体里不能出现数据？
为何：  Me.借报编号 = no　　总是空白？但变量 no 是有数字的！

Private Sub Form_Load()
   qhj1 = Me.年份    '变量
  Dim no, no1 As Long
  no1 = DMax("[借报编号]", "密传电报登记明细表", "[年份]='" & qhj1 & "'")
   no = no1 + 1
　 If Me.借报单位 = "" Then
  　 Me.借报编号 = no　　　　　　
Else
msgbox no  'no  有数据！
End If
  Beep
End Sub

但是，　如果这样却可以出现数据：
Private Sub Form_Load()
   qhj1 = Me.年份    '变量
  Dim no, no1 As Long
  no1 = DMax("[借报编号]", "密传电报登记明细表", "[年份]='" & qhj1 & "'")
   no = no1 + 1
'　 If Me.借报单位 = "" Then
  　 Me.借报编号 = no　　　　　　   '这样却可以出现数据！
'Else
msgbox no  'no  有数据！
'End If
  Beep
End Sub

我想可能总是在：
Me.借报单位 = ""
但我改成：
Me.借报单位 = null
Me.借报单位 is null

要检测的：　借报单位－－应是在数据表里的内容！如果空则在窗体里执行：

  　 Me.借报编号 = no　　


都不行，何解？

[此贴子已经被作者于2002-6-17 12:11:50编辑过]

tsx

If IsNull(Me.借报单位) Then　
　　……