1. Existe un programa de cálculo simple para tarifas de taxi programado en VB. La interfaz de la ventana y parte del código se han completado y deben complementarse.
¿Privado?Sub?Command1_Click()
Si?Val(Text1.Text)?lt;=?3?Entonces
Texto2.Text?=? 12
Else
Texto2.Texto?=?12 ?(Val(Texto1.Texto)?-?3)?*?2.4
Fin? Si
End?Sub
Privado?Sub?Form_Load()
Texto1.Text?=?""
Texto2.Text ?=?""
Comando1.Caption?=?"Cálculo"
Fin?Sub