vb菜鸟求注释啊

没搞懂这段代码的作用，但还是帮你注释一下：

Private Sub Command1_Click()
Dim i As Integer, y As Single
For i = 0 To 50 '整型变量i从0至50变化进入循环
i = i + 3 '变量i自加3
n = n + 1 '变量n自加1
If i > 20 Then Exit For '当i大于20时即出循环
Next '此处变量i会自动加1
Label1.Caption = Str(n) 'label1显示内容为n
End Sub

'需指出此处y有声明但没用到，n有用到但没有声明,但你的代码不会提示出错

Private Sub Command1_Click() ‘控件点击事件
Dim i As Integer, y As Single ’定义两个变量 y 每有使用 应该改成n吧
For i = 0 To 50 ‘执行循环
i = i + 3 ’每次循环I 加3
n = n + 1 ’每次循环n 加1
If i > 20 Then Exit For ’当i大于20时跳出循环
Next
Label1.Caption = Str(n) ‘在静态文本中显示n,Str函数是将n由数字转换成字符串
End Sub