visual basic

a = InputBox("juttuja")
y = InputBox("lisää juttuja")
Dim b
b=0
Set wshShell = wscript.CreateObject("WScript.Shell")

wscript.sleep 2000

do
Do until b = y
_____________________________________
mites ton do untilin sais asettettua tuon y:n arvoksi (tolla ei toiminu)
tolla inputboxilla asetan ton y arvoksi vaikka 12 ja sitte se do until tekis sitä sen y:n arvon verran
Ilmianna
Jaa

4 Vastausta



Do
b = b 1
Loop until b = cint(y)
Kommentoi
Ilmianna
Jaa
1 VASTAUS:
Muuttujaa b on kasvatettava:
b = b + 1
Kommentoi
Ilmianna
Jaa
+Lisää kommentti
Visual Basic on Microsoftin kehittämä, voiko tuota saada toimimaan siitä muolimatta vai olisko linux visual basicia jolla vois kokeilla
Kommentoi
Ilmianna
Jaa
1 VASTAUS:
Kommentoi
Ilmianna
Jaa
+Lisää kommentti

Vastaa alkuperäiseen viestiin

visual basic

a = InputBox("juttuja")
y = InputBox("lisää juttuja")
Dim b
b=0
Set wshShell = wscript.CreateObject("WScript.Shell")

wscript.sleep 2000

do
Do until b = y
_____________________________________
mites ton do untilin sais asettettua tuon y:n arvoksi (tolla ei toiminu)
tolla inputboxilla asetan ton y arvoksi vaikka 12 ja sitte se do until tekis sitä sen y:n arvon verran

5000 merkkiä jäljellä

Peruuta