reproductor





miércoles, 7 de marzo de 2012

Usar control Datagridview

FORM1


FORM2


Private

Me.Hide()End Sub Class
Form2.Show()


End
Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Public Class Form1
   Dim IMC As Double
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
 IMC = Val(TextBox2.Text) / Val(TextBox3.Text) * Val(TextBox3.Text)
 Form2.DataGridView1.Rows.Add(TextBox1.Text, TextBox2.Text, TextBox3.Text, IMC)
        MsgBox("Datos Ingresados")
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        Me.Hide()
        Form2.Show()

    End Sub
End Class

No hay comentarios:

Publicar un comentario