Office中国论坛/Access中国论坛

标题: 请教：要求对象 [打印本页]

作者: gq402402 时间: 2007-11-27 09:22
标题: 请教：要求对象
请教一下，我运行以下代码就会提示：要求对象！是为什么啊？点击按钮，在B窗口里按照A窗口里的单位帐号显示出相同单位帐号的记录
Private Sub 命令184_Click()
On Error GoTo Err_命令184_Click
Dim stDocName As String
Dim stLinkCriteria As String
Dim sql As String
Dim danwei As String
danwei = Me![单位帐号1]
         stDocName = "个人信息"
      DoCmd.OpenForm stDocName, , , stLinkCriteria
      DoCmd.GoToControl "单位帐号1"
      Forms![个人信息]![单位帐号1] = danwei
sql = "select * from 个人信息 where [单位帐号] =" & froms![个人信息]![单位帐号1]
      Forms.个人信息.RecordSource = sql
      Exit_命令184_Click:
Exit Sub
Err_命令184_Click:
MsgBox Err.Description
Resume Exit_命令184_Click

End Sub

[ 本帖最后由 gq402402 于 2007-11-27 09:24 编辑 ]

作者: gq402402 时间: 2007-11-27 09:47
标题: 谢谢CUXUM
谢谢CUXUN啦,文本型的应加' '表示,数字型的不要,现在有点明白了~~
非常感谢!

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