Paste #B6c -- näytä pelkkänä tekstinä -- uusi tämän pohjalta
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 | List of available commands:
Dim Light, Bulb
^ must be the first line in the program
Bulb = Bulb + 1
^ equals <
Bulb = Bulb - 1
^ equals >
Light(Bulb) = Light(Bulb) + 1
^ equals +
Light(Bulb) = Light(Bulb) - 1
^ equals -
listBox1.Items.Add(Light(Bulb))
^ equals .
Light(Bulb) = InputBox("Wondrous user, please enlighten me with your knowledge.")
^ equals ,
On Error Come Back Here
^ equals [
On Light(Bulb) <> 0 Error
^ equals ]
|