Question

VB 在图片框中打印1~100的整数。 要求每行输出5个数

Answer 1

For i = 1 To 100
Picture1.Print i;
If i Mod 5 = 0 Then
Picture1.Print
End If
Next i

Answer 2

Picture1.AutoRedraw = True;
Picture1.Cls
Dim X&, I&
For I = 1 To 100
Picture1.Print I;
X = X + 1
If X >= 5 Then Picture1.Print
Next