【VB.NET】MariaDBからコンボボックスへの出力(Visual Studio 2019)

もくじ

1. 開発環境及び前提条件
2. プログラム作成
   1. MariaDBへの接続
   2. コンボボックスへの呼び出し
3. まとめ

1.開発環境及び前提条件

OS: Windows10
IDE: Visual Studio 2019
言語: VB.NET(.NET Frameork 4.7.2)
DB: MariaDB 10.4

開発環境作成方法、および参照設定については既知とする。
(もし１件でも要望があれば作成します。)

2.プログラム作成

1. MariaDBへの接続

参照を追加する。

VB.NET

Imports MySql.Data.MySqlClient

VB.NET

        Using conn As New MySqlConnection("Database=<DATABASE>;Data Source=localhost;User Id=<USERNAME>;Password=<PASSWORD>; sqlservermode=True;")

            ' データベースコネクション開始
            conn.Open()

            '<<ここへMariaDB接続中の処理を記述する>>

            ' データベースコネクションクローズ
            conn.Close()
        End Using

2. コンボボックスへの呼び出し方法

コンボボックスコントロール作成(ここでは[DropdownBox1]とする)後、
上記コードの

VB.NET

    '<<ここへMariaDB接続中の処理を記述する>>

の部分へ、
　・データ取得　　
　・コンボボックスのデータソースを設定
するように記述する。

VB.NET

            ' データ取得
            Dim cmd As MySqlCommand = New MySqlCommand("SELECT * FROM <DATATABLE>", conn)
            Dim da As MySqlDataAdapter = New MySqlDataAdapter(cmd)
            Dim dt As DataTable = New DataTable()
            da.Fill(dt)

            ' コンボボックスに値を設定
            Dim dc As New ArrayList
            dc.Add("")
            For i As Integer = 0 To dt.Rows.Count - 1
                dc.Add(dt.Rows(i).ItemArray(1)) 'ItemArray(1)は設定したい任意のカラム
            Next
            DropdownBox1.DataSource = dc

3.まとめ

今投稿は、初Qiita記事投稿のテストも兼ねる。
自己のMariaDBにおけるDatabase to Contorolのテンプレートとする。