Access VBA質問箱 IV

当質問箱は、有志のボランティア精神のおかげで成り立っています。
問題が解決したら、必ずお礼をしましょうね。
本サイトの基本方針をまとめました。こちらをご一読ください。

投稿種別の選択が必要です。ご注意ください。
迷惑投稿防止のため、URLの入力を制限しています。ご了承ください。


	新規投稿 ┃ツリー表示 ┃一覧表示 ┃トピック表示 ┃検索 ┃設定 ┃過去ログ ┃ホーム

626 / 9994

←次へ　｜　前へ→


	【12678】Re:一つの条件で複数検索

かるびの - 14/12/25(木) 0:09 -


	引用なし

	パスワード

>>　「検索コード」テキストボックスに15という値が入力されているとし、
>>strWhereがString型の変数だとすると、
>>　　　strWhere = "コード１ = "　& Nz(検索コード.Value,0)
>>というコードを実行すると、strWhereに「コード１ = 15」という文字列が格納されます。
>>　「Nz(検索コード.Value,0)」の部分をダブルコーテーションで囲われたものの外に出す
>>という点がポイントです。
>>
>>　strWhere の後に文字列をつなげたければ、上記のコードに続けて
>>　　　strWhere = strWhere & " AND "
>>というコードを実行すれば、strWhere には「コード１ = 15 AND 」という文字列が格納されます。

　文字で書くとごちゃごちゃしますが、実際に試してみるのが一番だと思います。

　まずテスト用のフォーム（Fテスト）を作り、ここにテキストボックス（txtテスト）を
配置します。
　Fテストのレコードソースを指定する必要はありません。
　txtテストのコントロールソースも指定しません。

　そして、Fテストを開き、txtテストに「28」と入力します。

　次に、ＶＢＥのウィンドウからメニューにおいて、表示→イミディエイトウィンドウを選択して、
イミディエイトウィンドウを表示させます。
　イミディエイトウィンドウに
　　　?　"txtテストの値は" & Forms("Fテスト")!txtテスト.Value & "です。"
と入力し、エンターキーを押してみてください。
　イミディエイトウィンドウの次の行に、この式の結果が表示されます。

　次にtxtテストの値を変えて、再び、
　　　?　"txtテストの値は" & Forms("Fテスト")!txtテスト.Value & "です。"　
と入力し、エンターキーを押してみてください。

　こんなところで、イメージをつかめないですかね。

632 hits

▼

【12669】一つの条件で複数検索 kok 14/12/17(水) 14:37