テーブルを結合しましょう。
meiboテーブルと部署テーブルを結合して
nameとnumberと部署名をグリッドに表示します。
Imports System.Data.SqlClient
Public Class Form1
Dim cn As New SqlConnection(
“Data Source=(local)\SQL;” +
“Initial Catalog=ADO;” +
“Integrated Security=True;Pooling=False”)
Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim cmd As New SqlCommand(“select name,number,部署名 from meibo inner join 部署 on meibo.部署コード = 部署.部署コード”, cn)
Dim adapter As New SqlDataAdapter(cmd)
Dim table As New DataTable()
adapter.Fill(table)
DataGridView1.DataSource = table
End Sub
End Class
Dim cmd As New SqlCommand(“select name,number,部署名 from meibo inner join 部署 on meibo.部署コード = 部署.部署コード”, cn)
selectで列名を選択
from meiboテーブル inner join 部署
on で 部署コード を紐づける。
実行すると空の列名のデータが表示されます。
一致するデータがないですから。
テーブルを追加した
meibo.部署コードはNULLですよね。
更新をしないといけません。
プログラムを作成をするのがメンドクサイのでsqlserverのほうで上位200行を編集でデータを入力しました。
するとデータが表示されました。