Alguien me puede explicar esto del Array?

Iniciado por Senior++, 11 Julio 2011, 20:24 PM

0 Miembros y 1 Visitante están viendo este tema.

Senior++

Una pregunta... yo solo quiero mostrar del 1 al 24  osea el 1 y debajo del 1 el 2 y así...

por que me da error cuando hago esto:

Dim hora(24) as integer
for hora = 1 to 24
print hora


Y me salta un error.. ¿Por que?

luego probe con esto

Dim hora (1 to 24) as integer
for hora = 1 to 24
print hora

y tambien me salta error

Bueno eso era todo...

Saludos
Vendo cuenta de LEAGUE OF LEGENDS lvl 30, EU west, muy barata

79137913

HOLA!!!

Te insisto LEE UN MANUAL DE VISUAL BASIC.

VAGO

Código (vb) [Seleccionar]

'Mostrar del 1 al 24
For x=1 to 24
    Print x
Next


GRACIAS POR LEER!!!
"Como no se puede igualar a Dios, ya he decidido que hacer, ¡SUPERARLO!"
"La peor de las ignorancias es no saber corregirlas"

79137913                          *Shadow Scouts Team*

SuperDraco

Citar
Código (vb) [Seleccionar]

'Mostrar del 1 al 24
For x=1 to 24
   Print x
Next


lo he modificado un poco para practicar, pero tengo una duda

Código (vb) [Seleccionar]
Option Explicit

Private Sub Command1_Click()


      Dim num As Integer
      Dim num2 As Integer
      num2 = 5
       For num = 1 To 10
           Print num
       If num = num2 Then Exit Sub
       Next
End Sub


Los "IF" no siempre deben acabar con un "End if"? Es que si pongo "End if" mme da error "End if sin bloque"

:xD
No he vuelto, solo estoy de paso.

Senior++

#13
79137913

estoy con elguille

los Arrays no funciona en el bucle for?

Pitoloko: el end if se pone solo y unicamente cuando no esta en bloque por ejemplo

if pitoloko = 10 then
pitoloko = 20
end if

aquí si tienes que poner el end if por que es un bloque pero en cambio si
lo pones así no...
If pitoloko  = 10  then: pitoloko = 20





Saludos

Edito: ya lo solucione gracias..

Vendo cuenta de LEAGUE OF LEGENDS lvl 30, EU west, muy barata