Office中国论坛/Access中国论坛

标题: 快来看看！ [打印本页]

作者: deng2003 时间: 2003-8-6 23:25
标题: 快来看看！
Set tres = CurrentDb().OpenRecordset("select * from depot where docnumber='" & Me!DOCNUMBER & "'", dbReadOnly)
      Set rst = CurrentDb().OpenRecordset("select * from basectrl ", dbReadOnly)
      If tres.EOF And tres.BOF Then
         Exit Sub
      End If
      If rst.EOF And rst.BOF Then
         Exit Sub
      End If
      Do While Not tres.EOF
         typestr = tres!Type
         typestr1 = rst!Type

我想把查询的结果相等请帮帮忙

作者: lijiawy 时间: 2003-8-6 23:41
不明白

欢迎光临 Office中国论坛/Access中国论坛 (http://www.office-cn.net/)