5 ejemplos de programas codificados de Visual Basic.

1.       Private Sub Form_Load()

espacios = vbTab

mensaje = espacios & "Bienvenido a este programa" & espacios

MsgBox (mensaje)

2.      Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

Espacios = vbTab

Mensaje = espacios & "Bienvenido a este programa" & espacios

MsgBox(mensaje)

3.      Private Sub Command1_Click()

Label2.ForeColor = vbBlack

Label2.FontBold = True

Turismos = Val(Text1(0))

Todoterrenos = Val(Text1(1))

Capturismos = Val(Text1(2))

Captodot = Val(Text1(3))

Necesidadescom = Turismos * Capturismos + Todoterrenos * Captodot

Label2 = "Las necesidades totales de combustible son de " & Necesidadescom & " litros"

4.      Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click

Label6.ForeColor = Color.Black

Label6.Font = New Font("Arial", 10, FontStyle.Bold)

Turismos = Val(TextBox1.Text)

Todoterrenos = Val(TextBox2.Text)

Capturismos = Val(TextBox3.Text)

Captodot = Val(TextBox4.Text)

Necesidadescom = Turismos * Capturismos + Todoterrenos * Captodot

5.      Label6.Text = "Las necesidades totales de combustible son de " & Necesidadescom & " litros"

Private Sub ButtonCalcular_Click()

R = Val(Text1) / 2

H = Val(Text2)

V = Pi * (R ^ 2) * H

LabelResultados.FontSize = 10

LabelResultados.FontBold = True

LabelResultados.Alignment = 2

LabelResultados = "El volumen del cilindro es de " & V & " metros cúbicos"