有关VB的二道简单程序题。求助！

private sub form-click()
dim i as integer,j as integer 'i = 0, j = 0, k = 0
a=5:b=1
for i=1 to a+b step b '等效于 for i = 1 to 6 step 1
i=i+b
a=a+i
b=b+i
k=k+1
next i
print a
print b,k
end sub

下面看循环的情况,初始时:
i = 0, a = 5, b = 1, k = 0
第一次循环结束后:
i = 1, a = 6, b = 2, k = 1
第二次循环结束后:
i = 3, a = 9, b = 5, k = 2
第三次循环结束后:
i = 8, a = 17, b = 13, k = 3
循环结束
所以输出什么也知道了吧

第二题自己试试, 一步一步来, 非常简单

第一题：窗体上加四个text控件，单击窗体显示的数字即答案i=7,a=13,b=9,k=2

Private Sub Form_Click()

Dim i As Integer, j As Integer
a = 5: b = 1
For i = 1 To a + b Step b
i = i + b
a = a + i
b = b + i
k = k + 1
Next i

Text1.Text = i
Text2.Text = a
Text3.Text = b
Text4.Text = k
End Sub

第二题：同一，答案为a=6,k=2,i=2,j=3
Private Sub Form_Click()

Dim i As Integer, j As Integer
Dim a As Integer, k As Integer
i = 1: j = 1
Do While a <= 10
a = i * j
k = k + 1
If a > 5 Then Exit Do
i = i + 1
j = a + i
Loop
Text1.Text = a
Text2.Text = k
Text3.Text = i
Text4.Text = j
End Sub

前面几位已经说出答案了 我再多说 也没有用处
不过 给你一个 好的 建议 像这种简单的运算
可以 调用VB的立即窗口 就可以 搞定了
再就是 你可以 买一本 关于VB 的实例较多的书
照着书 狂练实例 一个星期 就可以成为 高手

有这么多高手指教了，我也不直接回答了。我想说的就是要学好编程，语法格式一定要注意，像你题目中的
private sub form-click()
dim i as integer,j as integer
这两句就有语法错误，平时可要注意哦，粗心可是编程的大忌...

我不同意我以上2楼的说法，学习VB光看实例的不行的，我以前就是吃这个亏，买回来什么也看不懂，书上也不会太多教各个函数的具体用法，所以什么也没学到，我建议，要学就好按照一定的顺序由浅到深学习，如果你是初学，建议从语法规则等初级开始学。