2.1 Uso de cuadros de texto, un programa de multiplicación
En este programa, se insertan dos cuadros de texto, etiquetas de tres y un botón. Los dos cuadros de texto son para que los usuarios entran en dos números, una etiqueta para mostrar el operador de multiplicación y la otra etiqueta es para que aparezca el signo de igual. La última etiqueta es para mostrar la respuesta.
El Código:
Dim num1, num2, product As SingleEnd Sub
num1 = TextBox1.Text
num2 = TextBox2.Text
product = num1 * num2
Label3.Text = product
2.2 Uso del ListBox-Un programa para agregar elementos a un cuadro de lista
Este programa añade un elemento a la vez que el usuario introduzca un elemento en el cuadro de texto y haga clic en el botón Agregar.
Class Frm1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim item As String
item = TextBox1.Text
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim item As String
item = TextBox1.Text
'To add items to a listbox
ListBox1.Items.Add(item)
End Sub
End Class
ListBox1.Items.Add(item)
End Sub
End Class
En este programa, se inserta un PictureBox y un botón en el formulario. Asegúrese de establecer la propiedad SizeModedel PictureBox para StretchImage por lo que todo el cuadro se puede ver en el cuadro de imagen. Introduzca el código tal y comose muestra a continuación y usted puede cargar una imagen desde un archivo de imagen determinado en el cuadro de imagen.
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click'To load an image into the PictureBox from an image file
PictureBox1.Image = Image.FromFile("c:\Users\Public\Pictures\Sample Pictures\Frangipani Flowers.jpg")
End Sub
Más lecciones se añadirán en breve. Por favor, vuelva a menudo.
No hay comentarios:
Publicar un comentario