Office中国论坛/Access中国论坛

标题: 有那個高手能告訴我這段代碼為什麼不行? [打印本页]

作者: lang 时间: 2004-4-13 14:08
标题: 有那個高手能告訴我這段代碼為什麼不行?
Private Sub Command25_Click()

Dim temp As String

temp = "SELECT 材料編碼表1.材料名稱 FROM 材料編碼表1 WHERE (((材料編碼表1.材料編碼1)='" & Me!Text0 & "'));"

DoCmd.RunSQL temp)

End Sub

提示我
執行階段錯誤"2342"
Runsql巨集指令需要組成sql陳述式的引數

作者: lang 时间: 2004-4-13 14:17
o ,我知到錯了。

作者: lang 时间: 2004-4-13 14:21
表1 A a
B b

有兩個文本框text_1,text_2和一個按鈕。
當text_1輸入A,按下按鈕，text_2就能顯示a

請問該怎麼寫這段代碼?

[此贴子已经被作者于2004-4-13 6:21:21编辑过]

作者: sea.er 时间: 2004-4-13 15:32
Private Sub 按钮_Click()
Me.text_2 = LCase(text_1)
End Sub

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