ejercicio Visual Basic 6 mostrar mensajes por pantalla

[alfonso1]

Option Explicit

Dim Textorestaurante As String

Private Sub Form_Load()
Show
Textorestaurante = "Bienvenidos al restaurante de Ciudad Pemira"
Show
Print Tab(15); Textorestaurante
End Sub

[alfonso1]

Option Explicit

Dim Numerodeclientes(23) As Integer
 Private Sub Form_Load()
 Show
 Numerodeclientes(13) = 57
 Print
 Print "el numero de clientes en la hora 13 fue de"; Numerodeclientes(13)
 
 End Sub

[alfonso1]

respuesta al ejercicio numero 6

Option Explicit

Option Base 1
Rem numerocoches (1,4) representa zona y marca
Dim Numerocoches(3, 4) As Integer

Private Sub Form_load()
Show
Numerocoches(1, 4) = 14
Numerocoches(2, 3) = 4
Numerocoches(3, 2) = 15
Print
Print "Los coches de la zona diesel marca Seat es de"; Numerocoches(1, 4)
Print
Print "los coches de la zona gasolina marca Fiat es de"; Numerocoches(2, 3)
Print
Print "Los coches de la zona eléctrica marca Toyota es de"; Numerocoches(3, 2)
End Sub

[Mario R. Rancel]

Hola Alfonso, este programa está bien planteado y bien resuelto.

Te hago algunas indicaciones para mejorar:

1. ¿Cuál era el enunciado del ejercicio? ¿El programa hace exactamente lo que se pedía en el ejercicio?

2. Haz puesto instrucciones como Print "Los coches de la zona diesel marca Seat es de"; Numerocoches(1, 4). El resultado es correcto, pero a mí me parece más correcta una redacción como Print "Los coches de la zona diesel marca Seat son:"; Numerocoches(1, 4)

Saludos.