浪琴官网男士手表价格:vb的问题

来源:百度文库 编辑:神马品牌网 时间:2024/04/26 04:19:55
Private Sub Form_Activate()
Dim x$, y$, i%
x = "2"
For i = 1 To 3
y = y + x
Next i
Print y
End Sub
能解释一下过程吗?

Dim x$, y$, i% '定义 x,y为字符串,i为整型
x = "2" '为x赋初值"2"
For i = 1 To 3 '循环执行3次
y = y + x '每次循环给y字符串加上x字符串,即每次添上一个"2"
Next i '执行下一循环
Print y '输出y,结果为"222"