Curso 31 VB.NET Caja de Mensajes (Msgbox) Personalizados

[postlink]http://tutorialeshispanos.blogspot.com/2012/08/curso-31-vbnet-caja-de-mensajes-msgbox.html[/postlink]http://www.youtube.com/watch?v=RLgVlfqAwngendofvid
[starttext]
En este video tutorial aprenderemos a crear mensajes personalizados le daremos un uso con consicionales generalmente se usa cuando quieres cerrar un programa y quieres preguntarle al usuario si desea cerrar el programa .

• Qué aprendo ?
• Resumen de el video
• Codigo Fuente

Aprenderás a :

• Crear Mensajes personalizados

Aprenderemos a escribir texto de manera automatica .

Evento que se ejecuta antes de cerrar el programa

Private Sub Form1_FormClosing(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosingEventArgs) Handles Me.FormClosing


If MessageBox.Show("Esta seguro de cerrar el programa ? ", "Info", MessageBoxButtons.YesNo, MessageBoxIcon.Question) = vbYes Then


Else
'Si el usuario selecciona la opcion NO
e.Cancel = True
MsgBox("Te quedaste en el formulario !")



End If



End Sub

[endtext]

Curso 31 VB.NET Caja de Mensajes (Msgbox) Personalizados

VB.NET 3 - Etiqueta(label) y Msgbox

[postlink]http://tutorialeshispanos.blogspot.com/2012/06/vbnet-3-etiquetalabel-y-msgbox.html[/postlink]http://www.youtube.com/watch?v=yK1DhdZtWm0endofvid
[starttext]

En este video tutorial aprenderemos a programar el boton suma y para ello usaremos el label (etiqueta) y la caja de mensajes (msgbox) . Almacenaremos valores internos en nuestro programa con la ayuda de el label .

• Qué aprendo ?
• Resumen de el video
• Codigo Fuente

Aprenderás a :

• Usar el label (etiqueta)
• Caja de mensajes (msgbox)
• Comenzaremos a programar el boton de suma .
• Hacer invisible un control .
• Valores numericos .

Le daremos vida a nuestro programa primero haciendo funcionar el boton suma para ello crearemos un label o etiqueta y lo colocaremos en nuestro formulario , lo primero que tenemos que saber es que en una suma hay dos valores y en label almacenaremos el primer valor de la suma . Luego le adicionaremos el segundo valor para finalmente obtener el resultado .

Boton Suma

Private Sub btnsuma_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnsuma.Click

'cuando demos click en este boton queeremos que se elimine el valor de la caja de texto y que se almacene en el programa .

lblprimernumero.Text = txtinfo.Text

txtinfo.Text = ""


End Sub

Boton Igual

Private Sub btnigual_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnigual.Click

txtinfo.Text = Val(lblprimernumero.Text) + Val(txtinfo.Text)

End Sub

[endtext]

VB.NET 3 - Etiqueta(label) y Msgbox