Vb.Netの接続文字列を使用してデータベースのデータをmu UIフォームにする方法

Question

私はComboboxを使用しています。接続文字列を使用してSQL Serverデータベースからデータを入力する必要があります。私はミスを犯してきたところ私にはわからない

Imports System 
Imports System.Collections.Generic 
Imports System.Web 
Imports System.Xml 
Imports System.Windows.Forms 
Imports System.Data.SqlClient 
Imports System.Configuration 


Public Class Form1 

    Private Sub ComboBox1_SelectedIndexChanged(sender As Object, e As EventArgs) Handles ComboBox1.SelectedIndexChanged 
     Dim VB = ConfigurationManager.ConnectionString["HMDB"].ConnectionString 
     Using Con = New SqlConnection(VB) 
      Dim SqlText = "Select DocEntry from dbo.Master1" 
      Dim cmd = New SqlCommand(SqlText, Con) 
      Con.Open() 
      ComboBox1.DataSource = cmd.ExecuteReader() 
      ComboBox1.DataBind() 

     End Using 
    End Sub 
End Class 

app.configを

を

<?xml version="1.0" encoding="utf-8" ?> 
<configuration> 
    <configuration> 
    <connectionStrings> 
     <add name ="HMDB" 
      connectionString ="Data Source=DESKTOP-68VGRJG;Database=master;integrated security =SSPI"/> 
      </connectionStrings> 
</configuration> 
</configuration> 

：私は何をしようとしている

。私はコンボボックスにSQL Serverのデータを呼び出す必要があり、私はそれを表示させる必要があります。

Answer 1

comboBoxイベントの変更ではなく、フォームが読み込まれると、コンボボックスに値を設定することができます。

Form1（）コンストラクタに同じコードを記述します。

public Form1() 
     { 
      InitializeComponent(); 
      Dim VB = ConfigurationManager.ConnectionString["HMDB"].ConnectionString 
      Using Con = New SqlConnection(VB) 
      Dim SqlText = "Select DocEntry from dbo.Master1" 
      Dim cmd = New SqlCommand(SqlText, Con) 
      Con.Open() 
      ComboBox1.DataSource = cmd.ExecuteReader() 
      ComboBox1.DataBind() 
      End Using   
     }