evidencias visual
domingo, 31 de agosto de 2014
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
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
Suscribirse a:
Entradas (Atom)