Private Sub Button3_Click_1(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Dim con As New Conexion 'TENGO UNA CLASE LLAMADA CONEXION CON LA CUAL ME CONECTO A LA BD INTRODUCIENDO PASS Y USR
con.conectar("[aquiTuContrasena", "AquiTuUsuario") //ME CONECTO A MI BD
Dim _idProducto As String = "SELECT idProducto,Descripcion FROM producto WHERE Categoria='CONSTRUCCION' ORDER BY Descripcion ASC"
Dim command As New MySql.Data.MySqlClient.MySqlCommand(_idProducto, con.conn)
Dim reader As MySql.Data.MySqlClient.MySqlDataReader = command.ExecuteReader
Dim St(2) As String
While reader.Read
St = New String() {reader.GetString(0), reader.GetString(1)}
DataGridView1.Rows.Add(St)
End While
reader.Close()
End Sub
End Class