Programa calcula el momento de una fuerza
Este programa sigue el procedimiento de la formula correspondiente
esta hecho en .net
Public Class Form24
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
REM Declarar todas las variables
Dim mas, ace, fuerza As Integer
REM Validar objetos de entrada
mas = omas.Text
ace = oace.Text
REM Proceso
fuerza = mas * ace
REM Asignar respuesta a objeto de salida
Label5.Text = fuerza
End Sub
Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
'Para salir se utiliza la funcion
If (MsgBox("Esta seguro que desea salir?", MsgBoxStyle.YesNo, "Advertencia")) = MsgBoxResult.Yes Then
MsgBox("Gracias")
Close()
End If
End Sub
End Class
Comentarios
Publicar un comentario