VB6

Visual Basic 6.0

思えばVBの本いっぱい買ったなぁ。この本が最良。

  Dim text(0 to 5) as String  'index 0 - 5 の配列

If A>5 Then Print "A is a bit number!"

For i = 1 to 5
    print #1, i
next i

For Each X in Form1.controls
Next X

While i < 5
  i = i +1
Wend

Select case i
Case 1 : print "it was a 1"
Case 2 : print "it was a 2"
End select

Do while i < 5
  i = i + 1
Loop

Choose (index, "answer1", "answer2", "answer3")

With textbox1
  .Height = 100
  .Width = 500
End With

End

Stop