VBS programozás segítség?
Egy egyszerű üdvözlő üzenetet szeretnék csinálni gyakorlásképp,de még ez se megy.
Valamiért nem ismeri fel az ismétlést,azt írja a hibaüzenet hogy a loophoz do kell.
Az elképzelés:
Szövegdobozba be kell írni a nevet,ha üres a doboz akkor figyelmeztet és visszadob az elejére,ha van benne valami akkor azon a néven köszönt.
do
Input = Inputbox ("A kezdéshez kérem adja meg keresztnevét!")
If Input ="" Then
MsgBox ("Nem adta meg a keresztnevét!"),16+0,"Hiba"
loop
Else
MsgBox ("Üdvözlöm "& Input &"!"),,""
End If
válasza:Teljesen zagyvaság a kódod.
Nézd meg mi a helyes szintaxis.
válasza:Nézd meg a do loop ciklus szintaktikáját.
Az if endif elágazásnak a ciklusmagban kell lennie.
Ez így egy zagyvaság.
A do és loop nélkül tökéletesen működik pedig.
Csak azt nem tudom megoldani hogy visszadobjon ha üres az input
Kijavítanátok a kódot,hogy lássam,hogy kellett volna?
Csak pár hete kisérletezek programozással hobbi szinten.
válasza:Input1 = ""
Do
Input1 = InputBox("A kezdéshez kérem adja meg keresztnevét!")
If Input1 = "" Then
MsgBox "Nem adta meg a keresztnevét!", 16 + 0, "Hiba"
End If
Loop Until Input1 <> ""
MsgBox "Üdvözlöm " & Input1 & "!", , ""
Az 'Input'-ot ne használd változóként mert foglalt.
Kapcsolódó kérdések:
Minden jog fenntartva © 2025, www.gyakorikerdesek.hu
GYIK | Szabályzat | Jogi nyilatkozat | Adatvédelem | Cookie beállítások | WebMinute Kft. | Facebook | Kapcsolat: info(kukac)gyakorikerdesek.hu
Ha kifogással szeretne élni valamely tartalommal kapcsolatban, kérjük jelezze e-mailes elérhetőségünkön!