Microsoft Visual Basic Express
Ver Más instrucciones
1
Abra Microsoft Visual Basic Express, haga clic en " Nuevo proyecto ... " a continuación, seleccione " Aplicación de Windows Forms ". Haga clic en " Aceptar".
2
doble clic en " botón" en el panel " Toolbox" para añadir un nuevo control de botón . Haga doble clic en el botón "" para agregar un segundo botón . Haga doble clic en " DataGridView " para añadir un nuevo control de la red . Haga doble clic en " Button1 " para abrir el módulo " Form1.vb "
3
Copia y pega el siguiente código dentro del subprograma " Button1_Click ": .
Dim row0 As String () = {" 1 ", " ordenador ", " Vendido" }
fila1 As String () = {" 2 ", " teclado" , " Shelf "}
fila2 As String () = {" 3 " , "Ratón" , " Shelf "}
Row3 As String () = {" 4 ", " monitor" , " Shelf "}
< p> Con Me.DataGridView1.Rows
. Añadir ( row0 )
. Añadir ( fila 1 )
. Añadir ( fila2 )
. Añadir ( Row3 )
End con fotos de 4
Escriba lo siguiente para crear el subprograma " SetUpDataGridView " que agregar formato y agregue encabezados de campo :
SetUpDataGridView Sub Private ()
Me.Controls.Add ( DataGridView1 )
DataGridView1.ColumnCount = 3
DataGridView1.ColumnHeadersDefaultCellStyle
. BackColor = Color.Navy
. ForeColor = Color.White
. Fuente = nueva fuente ( DataGridView1.Font , FontStyle.Bold )
extremo con
DataGridView1
. RowHeadersVisible = False
. Columnas ( 0 ) . Name = "ID"
. Columnas ( 1 ) . Name = " descripción "
. Columnas ( 2 ) . Name = " Status"
. SelectionMode = DataGridViewSelectionMode.FullRowSelect
. MultiSelect = False
. muelle = DockStyle.Fill
End Con
End Sub
5
click " Form1.vb [ diseño ]" para ver el formulario en modo de diseño . Haga doble clic en cualquier parte de la forma, pero no en los controles. Copia y pega el siguiente código dentro de la subrutina " Form1_Load " para llamar al " SetUpDataGridView " subrutina :
SetUpDataGridView ()
6
Click " Form1.vb [ Diseño ] " para ver el formulario en modo de diseño . Haga doble clic en " Button2 " para abrir el subprograma " Button2_Click " .
7
Copia y pega el siguiente código dentro de " Button2_Click " para actualizar el campo "Status" a " Vendido" de "Mouse ".
Me.DataGridView1.Rows
. artículo ( 2 ) . Las células ( 2 ) . Valor = " VENDIDO"
extremo con
Prensa " F5 " para ejecutar el programa , haga clic en" Button1 "para cargar los datos y " Button2 " para actualizarlo.