ボールドテキスト質問
フォームにあるtemp1フィールドに文字列”apple”が表示されている。
Dlookup関数でappleの個々のアルファベッドに対応するIDを取得し
例
a....v01
p....c01
l....c02
e....v02
その取得したIDをすべてフォームのフィールドtemp2に表示したい
appleならば temp2=v01c01c01c02v02 というふうに
発生している問題・エラーメッセージ
Debug.print ではappleに対応する全てのIDが表示されますが、 フィールドtemp2には最後の文字「e」に対応するID(v02)しか表示されません。
Private Sub コマンド_click Dim i as integer Dim counter as integer 'フォームにあるtemp1フィールドには文字列"apple"が表示されている counter = len(Me.temp1) → 5を取得 For i = 1 to counter 'Dlookupで取得したIDをフォームにあるフィールドtemp2に表示する Me.temp2 = Dlookup("ID","クエリ名","クエリ項目='"&Mid(Me.temp1,i,1)&"'") next End Sub
試したこと
debug.printに表示されるIDをtempに代入しようとしましたがうまくいきませんでした。
補足情報(FW/ツールのバージョンなど)
Access2016
回答1件
あなたの回答
tips
プレビュー
バッドをするには、ログインかつ
こちらの条件を満たす必要があります。
2018/11/13 03:35
2018/11/13 04:08