vb または Visual Basic で照会したデータベースを表示する方法

2年 ago
蓮, 翼
1 minute

VBでデータベースからのクエリ結果を表示するには、ADO.NET技術を使ってデータベースに接続し、クエリを実行します。以下に簡単なサンプルを示します。

  1. まず、ADODBの参照を追加します。VBのプロジェクトで「プロジェクト」→「参照の追加」をクリックし、「COM」タブを選択して「Microsoft ActiveX Data Objects x.x Library」を探してチェックを付け、「OK」をクリックします。
  2. コードでは、接続オブジェクトとコマンドオブジェクトを作成し、クエリを操作します。サンプルコードを以下に示します。
Imports ADODB
Public Class Form1
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim conn As New Connection
conn.ConnectionString = "Provider=SQLOLEDB;Data Source=服务器地址;Initial Catalog=数据库名;User ID=用户名;Password=密码"
conn.Open()
Dim cmd As New Command
cmd.ActiveConnection = conn
cmd.CommandText = "SELECT * FROM 表名"
Dim rs As Recordset
rs = cmd.Execute()
' 循环遍历结果集，并在控件中显示数据
While Not rs.EOF
TextBox1.Text += rs.Fields("字段名").Value.ToString() + Environment.NewLine
rs.MoveNext()
End While
rs.Close()
conn.Close()
End Sub
End Class

上記コードでは、以下の内容を実際のデータベース接続情報に置き換えてください。

  1. サーバーアドレス：データベースサーバーのアドレス
  2. データベース名：クエリ対象のデータベース名
  3. ユーザー名：データベース接続ユーザの名前
  4. パスワード：データベース接続時に使用するパスワード
  5. 表名：照会したいテーブル名
  6. フィールド名：表示するフィールド名

上述例では、TextBox1 というテキストボックスを使い、検索結果表示しています。結果セットをループし、フィールド値を読み取り、行ごとにテキストボックスに追加します。

これは単純な例にすぎず、実際の使用では、エラー処理や複雑なクエリロジック処理などにより、より複雑なコードが必要になる場合があります。

bannerAds