VBでSQLを使い検索をしたいのですが、SELECT文の使い方が分かりません。
下記の記述で、番号、氏名、電話番号をそれぞれのTEXTBOX1,TEXTBOX2,TEXTBOX3の
ように各容器にいれたいのでが分かりません。
文をその文増やせばいいのでしょうか、SELECT文1行で複数の結果を受け取る方法を教えて下さい。
宜しくお願い致します。
Dim Adapter As New OleDbDataAdapter(SQLCm)
Dim Table As New DataTable
Dim name As String
Dim selcomd As String
Dim Value As String
name = TextBox11.Text
selcomd = "SELECT 番号,氏名,電話番号 FROM meishi WHERE 氏名 like '" & name & "' "
SQLCm.CommandText = selcomd
No.2ベストアンサー
- 回答日時:
ひとつひとつの検索になりますが、駄目でしょうか。
私は今のところこの方法しかわかりません。
VB側での受け取り方に何か配列変数のようなもので受け取れれば良いのですが、わかりません。
ごめんなさいね。
selcomd = "SELECT 番号 FROM meishi WHERE 氏名 like '" & name & "' "
SQLCm.CommandText = selcomd
Cn.Open()
Value = SQLCm.ExecuteScalar
Cn.Close()
TextBox1.Text = Value
selcomd = "SELECT 氏名 FROM meishi WHERE 氏名 like '" & name & "' "
SQLCm.CommandText = selcomd
Cn.Open()
Value = SQLCm.ExecuteScalar
Cn.Close()
TextBox2.Text = Value
selcomd = "SELECT 電話番号 FROM meishi WHERE 氏名 like '" & name & "' "
SQLCm.CommandText = selcomd
Cn.Open()
Value = SQLCm.ExecuteScalar
Cn.Close()
TextBox3.Text = Value
'もしくは、GridViewに1レコード表示です。
selcomd = "SELECT * FROM meishi WHERE 氏名 like '" & name & "' "
SQLCm.CommandText = selcomd
Adapter.Fill(Table)
'▼値の表示
DataGridView1.DataSource = Table
Table.Dispose()
Cn.Open()
Value = SQLCm.ExecuteScalar
Cn.Close()
以上試して見て下さい。
早速のご回答有り難うございました。
そうですよね。
この二つの方法しか見当たりませんか。
私ももう少し調べて勉強してみます。
この度はどうも有り難うございました。
又宜しくお願い致します。
No.3
- 回答日時:
このページの中ほど
■リスト2:・・・
の例を参照してください。
>引用
>'先頭の値を表示
>Value = Table.Rows(0)("説明")
>MsgBox(Value)
"説明"のところを"番号"や"氏名"等の項目名に変えて取得します。
ご回答有り難うございます。
そうですね。
なんとか使えないかと私も考えていたのですが、Value = Table.Rows(0)("説明")
Rows(n)のnは、ID番号ではなくて、行番号でしょう。
それがちょっと難しいなーと思い悩んでおります。
今回はどうも有り難うございました。
又勉強して頑張ります。
本当に有り難うございました。
No.1
- 回答日時:
SQL の文法はデータベース用の完全に別言語なので
カテゴリ違いです。
[技術者向] コンピューター > データベース > データベースの種類
また、データベースの種類により方言がありますので、
質問するのにデータベースの種類を書いていないのでは
話になりません。
VB の勉強とは別に、SQL については専門の勉強をしてください。
『SQL 入門』といったキーワードで WEB 検索すれば、そのような
サイトはごろごろあります。
> 文をその文増やせばいいのでしょうか
同時に複数の条件を満たす必要がある場合、
基本文法としては、条件句(WHERE句)に OR(もしくは AND)で
条件を追加していく事になります。
条件が複雑になってきた場合は、サブクエリを使って対象
レコードを絞った中から再検索することをSELECT文
1文で書けます。
お探しのQ&Aが見つからない時は、教えて!gooで質問しましょう!
似たような質問が見つかりました
- Visual Basic(VBA) VBA Userformで一部別シートに転記がしたいのですが 2 2023/05/24 13:08
- Excel(エクセル) Excelにて、フォルダ内のTextファイルをマクロで統合すると文字化けしてしまう時の解消コード 4 2023/01/01 07:32
- Visual Basic(VBA) 【前回の続き続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/24 20:49
- Visual Basic(VBA) VBAのユーザーフォームのテキストボックスに入力制限をしたい 6 2022/11/15 08:28
- Visual Basic(VBA) 【前回の続きです、ご教示ください】VBAの記述方法がわかりません。 2 2022/08/16 16:44
- Visual Basic(VBA) VBAが止まります。 3 2022/08/31 14:09
- Visual Basic(VBA) 先ほど、回答者様によって教えていただいたのですがどうしたらいいか分かりません。 ユーザーフォーム上に 2 2023/02/21 22:25
- Visual Basic(VBA) 【ご教示ください】VBAの記述方法がわかりません。 2 2022/08/12 21:28
- Visual Basic(VBA) VBAでoutlook365が起動しません。 4 2022/08/25 13:31
- Visual Basic(VBA) access count数を変数に格納 2 2022/03/30 19:21
関連するカテゴリからQ&Aを探す
おすすめ情報
デイリーランキングこのカテゴリの人気デイリーQ&Aランキング
-
PL/SQLの動的SQLで複数の項目を...
-
VC++ (ADO) で Access の Yes/N...
-
一意なID
-
プルダウンメニューの項目を削除
-
SQLローダーCSV取込で、囲み文...
-
select文の実行結果に空白行を...
-
group byの並び順を変えるだけ...
-
テーブルの最後(最新)のレコー...
-
Oracleで「文字が無効です」の...
-
割合(パーセント)を求めるには?
-
複数のテーブルから値を合計出...
-
SQL*Loader Append
-
配列に指定した値が含まれてい...
-
アクセスのレポートでレコード...
-
並べ替えについて
-
【PL/SQL】FROM区に変数を使う方法
-
PL/SQL内の共通関数の引数にフ...
-
月末日のみソートしたい
-
MySQLのdatetime型に0月0日を格納
-
count関数の値をwhere句で使用...
マンスリーランキングこのカテゴリの人気マンスリーQ&Aランキング
-
VC++ (ADO) で Access の Yes/N...
-
VBScriptにて、csvファイルから...
-
エラーがよくわからないです
-
[ADO.NET]Accessの日付型にデー...
-
一意なID
-
NULL固定として出力
-
PL/SQLの動的SQLで複数の項目を...
-
windowsとlinuxでのlexの実行結...
-
VBでSQLを使い検索をしたい...
-
ログファイルの保存方法
-
SQLローダーCSV取込で、囲み文...
-
select文の実行結果に空白行を...
-
テーブルの最後(最新)のレコー...
-
単一グループのグループ関数で...
-
【PL/SQL】FROM区に変数を使う方法
-
SQL*Loader Append
-
count関数の値をwhere句で使用...
-
Oracleで「文字が無効です」の...
-
where句中のtrim関数について
-
AccessのSQL文で1件のみヒット...
おすすめ情報