Private
Sub Button1_Click(ByVal
sender As System.Object,
ByVal e As
System.EventArgs) Handles
Button1.Click
Me.Hide()
Form2.Show()
End Sub
Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As
System.Object, ByVal
e As System.EventArgs)
Handles ComboBox1.SelectedIndexChanged
MATERIATextBox.Text =
Val(ComboBox1.SelectedValue)
End Sub
Private Sub ComboBox2_SelectedIndexChanged(ByVal sender As
System.Object, ByVal
e As System.EventArgs)
Handles ComboBox2.SelectedIndexChanged
ESPECIALIZACIONTextBox.Text =
Val(ComboBox2.SelectedValue)
End Sub
