sábado, 30 de agosto de 2014

GUIA #1




Public Class Form1

  
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim suma As Integer = Val(TextBox1.Text) + Val(TextBox2.Text)
        MsgBox("la suma es " & suma)
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Dim text As String = InputBox("digite texto")
        ListBox1.Items.Add(text)
    End Sub
End Class














NOTA:

//Código para sumar dos números//


Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
    End Sub
End Class


















Public Class Form1

   
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim suma As Integer = Val(TextBox1.Text) + Val(TextBox2.Text)
        MsgBox("la suma es " & suma)
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Dim text As String = InputBox("digite texto")
        ListBox1.Items.Add(text)
    End Sub
End Class













































jueves, 28 de agosto de 2014

NOTA:

//Código para sumar dos números//


Public Class Form1

    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        TextBox3.Text = Val(TextBox1.Text) + Val(TextBox2.Text)
    End Sub

End Class



Public Class Form1

 
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim suma As Integer = Val(TextBox1.Text) + Val(TextBox2.Text)
        MsgBox("la suma es " & suma)
    End Sub

    Private Sub Button2_Click(sender As Object, e As EventArgs) Handles Button2.Click
        Dim text As String = InputBox("digite texto")
        ListBox1.Items.Add(text)
    End Sub
End Class