Private Sub Form_Load()
If Command() = “Prueba” Then
MsgBox “Esto es una prueba”
Unload Me
Else
MsgBox App.ProductName & “.exe”
Unload Me
End If
End Sub


Vota este artículo:
1 Estrella2 Estrellas3 Estrellas4 Estrellas5 Estrellas (No Ratings Yet)
Loading ... Loading ...

Posts anterior y posterior: