Private Sub DataGridView1_KeyPress(sender As Object, e As KeyPressEventArgs) Handles DataGridView1.KeyPress Dim c As Char = e.KeyChar Dim index As Integer = 0 For Each r As DataRow In SGrT.Rows If r.Field(Of String)("Article").StartsWith(c) Then DataGridView1.Rows(index).Selected = True Exit Sub End If index += 1 Next End Sub
lesDonnees.FirstOrDefault(Function(x) Return x.Article.StartWith(c) End Function)
premier enregistrement commençant par la lettre 'M'par ce que l’intérêt d’un datagridview est d’afficher des enregistrements avec plusieurs champs. Faut il trouver l’item dont n’importe quel champ commence par M? Ou seulement un champ spécifique?
Public Sub ChargerStockGr() Try Connection() Dim Mag As Integer = 1 Sql = "SELECT ID, Code, Article, Stock, [USell] AS [Prix(U)], Qté, Montant " _ + " FROM StockGros WHERE [Stock] >= '" & Mag & "' ORDER BY [Article] ASC" Cmd = New OleDb.OleDbCommand(Sql) SGrTA = New OleDb.OleDbDataAdapter(Cmd) Cmd.Connection() = GP CDSet = New DataSet SGrTA.Fill(CDSet, "StockGros") SGrT = CDSet.Tables("StockGros") Gridview.DataSource = CDSet Gridview.DataMember = "StockGros" GridviewStockStyles() Catch ex As Exception Finally GP.Close() End Try End Sub
2 mars 2020 à 15:27