VB(lab1)

1
VB(lab1)

• Operacionas Básicas

2
VB(lab1)

• Realizar un programa que pida 2 números al
  usuario y que muestre el la suma de los dos por
  pantalla.
• Private Sub Command1_Click()
• Dim num1 As Integer
• Dim num2 As Integer
• Dim num3 As Integer
• num1 InputBox("Introduce un número")
• num2 InputBox("Introduce un número")
• num3 num1 num2
• MsgBox ("El resultado es" num3)
• End Sub

3
VB(lab1)

• Introducida el radio de una circunferencia,
  calcular su volumen y área.
• Const PI As Single 3.1415
• Dim Volumen As Single
• Dim Area As Single
• Dim Radio As Single
• Radio InputBox("Introduce el valor del radio")
• Volumen (4 PI (Radio 3)) / 3
• Area 4 PI Radio 2
• MsgBox ("El volumen es " Volumen)
• MsgBox ("El área es " Area)