액세스 데이터베이스 (VB.Net)에 바인딩 할 때 ComboBox (Dropdown)의 기본값 설정

Question

그래서 내가 뭘하고 싶은지는 이것입니다. 현재 사용자 이름 목록을 표시하는 ComboBox가 있습니다. 양식이로드되면이 comboBox는 드롭 다운되고 분석가는 목록에서 이름을 선택할 수 있습니다. 내가 뭘 하려는지 표시되지 않은 드롭 다운 상자를 선택하면 물론 콤보 상자 쇼 "선택 사용자 이름"의 기본값을 가지고 있습니다.

필자는 기본적으로이 값을 액세스 데이터베이스의 값으로 추가 할 수 있지만 그 점이 어디에서 재미 있습니까? SO 참으로 코드 시간 :

Private Sub FillCombo() 

    Dim fillcon As New OleDb.OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0;Data Source=Server Location.accdb") 
    Dim query As String = ("SELECT User_Name, User_ID FROM Analysts") 
    Dim da As New OleDb.OleDbDataAdapter(query, fillcon) 
    Dim ds As New DataSet 


    da.Fill(ds) 
    ComboBox1.ValueMember = "User_Name" 
    ComboBox1.DataSource = ds.Tables(0) 
    ComboBox1.SelectedIndex = 0 
    ComboBox1.SelectedItem = "Select UserID" 


    TextBox10.DataBindings.Clear() 
    TextBox10.DataBindings.Add("Text", ds.Tables(0), "User_ID") 


End Sub 

이제 FillCombo가() 양식로드에 위치하고 아름다운 작품입니다 ... "선택 사용자 ID를"작동하지 않는 유일한 것은 기본 텍스트로 표시되지 않습니다. 아이디어?

Answer 1

데이터 원본에 콤보 상자를 바인딩하지 마십시오. 이 메서드를 사용하여 콤보 상자를 채 웁니다. 그런 다음 텍스트 속성을 설정할 수 있습니다.

da.Fill(ds) 

    for each dr as datarow in ds.Tables(0).Rows 
     ComboBox1.Items.Add(dr("User_Name")) 
    next 

    ComboBox1.Text = "Select UserID" 

Answer 2

selecteditem 속성을 설정하지 않았습니다. 해당 항목이 목록에 없습니다. 는

을 원하는 텍스트로 텍스트 속성을 설정

ComboBox1.Text = "Select UserID" 

Answer 3

당신은 데이터 바인딩 된 콤보 상자에 항목을 추가 할 수 없습니다, 당신은 단지 데이터 테이블

에 추가, 데이터베이스에 추가 할 필요가 없습니다

Dim row = ds.Tables(0).NewRow() 
row(0) = "Select UserID" 
row(1) = 0 
ds.Tables(0).Rows.InsertAt(row, 0) 
ComboBox1.SelectedIndex = 0