Member 12654313 Ответов: 0

Datagrid автозаполнение с другим полем

Привет Всем Братьям

Я работаю над ERP системой и мне нужна одна помощь
Я написал код для автозаполнения Datagrid.
этот код работает идеально, но он показывает только одну запись столбца из базы данных

что мне нужно, так это
я хочу, чтобы первый столбец был автозаполнен, как я это сделал, и он должен заполнять связанные столбцы, автоматически связанные с первым столбцом.

пожалуйста, направьте меня с помощью кодов

большое спасибо

Что я уже пробовал:

Dim strConn As String
    Dim da As SqlDataAdapter
    Dim conn As SqlConnection
    Dim ds As New DataSet
    strConn = ("Server= DESKTOP-QN6F623; Database = stock_in;Integrated Security = false;User ID=dis;Password=0m3rP@ss")
    conn = New SqlConnection(strConn)
    da = New SqlDataAdapter("Select * from [items]", conn)
    da.Fill(ds, "items")
    ItemsDataGridView.DataSource = ds.Tables("items")
    Dim cmd As New SqlCommand("Select item_number From items", conn)
    Dim dr As SqlDataReader
    conn.Open()
    dr = cmd.ExecuteReader
    Do While dr.Read
        scAutoComplete.Add(dr.GetString(0))
    Loop
    conn.Close()
Private Sub ItemsDataGridView_EditingControlShowing(ByVal sender As Object, ByVal e As System.Windows.Forms.DataGridViewEditingControlShowingEventArgs) Handles ItemsDataGridView.EditingControlShowing

    If ItemsDataGridView.CurrentCell.ColumnIndex = 1 AndAlso TypeOf e.Control Is TextBox Then
        With DirectCast(e.Control, TextBox)
            .AutoCompleteMode = AutoCompleteMode.SuggestAppend
            .AutoCompleteSource = AutoCompleteSource.CustomSource
            .AutoCompleteCustomSource = scAutoComplete
        End With
    Else
        With DirectCast(e.Control, TextBox)
            .AutoCompleteMode = Nothing
            .AutoCompleteSource = AutoCompleteSource.CustomSource
            .AutoCompleteCustomSource = Nothing
        End With
    End If
End Sub

0 Ответов