No Se

Public Class problema1

Private Sub btnaceptar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnaceptar.Click
Dim edad As Integer
edad =Val(txtedad.Text)

txtmeses.Text = Val(txtedad.Text) * 12

End Sub

Private Sub btnlimpiar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnlimpiar.Clicktxtmeses.Clear()
txtmeses.Clear()

End Sub

Private Sub btnsalir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsalir.Click
End
EndSub
End Class

Public Class Problema2

Private Sub btnsalir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsalir.Click
End

End Sub

PrivateSub btnlimpiar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnlimpiar.Click
txtdolares.Clear()
txtquetzales.Clear()

End Sub

Private Subbtnaceptar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnaceptar.Click
Dim quetzales As Double
quetzales = Val(txtquetzales.Text)txtdolares.Text = Val(txtquetzales.Text) / 7.88

End Sub
End Class

Public Class Problema3

Private Sub btnaceptar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handlesbtnaceptar.Click
Dim metros As Double

metros = Val(txtmetros.Text)

txtmetros.Text = 125
txtcms.Text = Val(txtmetros.Text) / 0.01

End Sub

Private Subbtnlimpiar_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnlimpiar.Click
txtcms.Clear()
txtmetros.Clear()

End Sub

Private Subbtnsalir_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsalir.Click
End

End Sub
End Class

Public Class problema4

Private Sub btnaceptar_Click(ByVal sender As...