两道关于VB的题目1.运行下面的程序段： For k=5 to 10 step 2 K=k+2Next k则循环的次数为

两道关于VB的题目
1.
运行下面的程序段：
For k=5 to 10 step 2
K=k+2
Next k
则循环的次数为多少？如何验证？
2.
运行下面程序段，其输出结果(str2的值)为多少？
Dim str1, str2 As String
Dim i As Integer
str1 = "abcdef"
For i = 1 To Len(str1)Step 2
　　 str2 = UCase(Mid(str1, i, 1)) + str2
Next i
MsgBox str2
第一次循环：str2=A
第二次循环：str2=CA
第三次循环：str2=ECA
3.
下列程序的功能是求算式：1+1/2! +1/3!+1/4!+……前10项的和（其中n!的含义是n的阶乘）。请在空白处填入适当的语句，使程序完成指定的功能。
　　Private Sub Commandl_Click（）
　　 Dim i as integer,s as single,a as single,j as integer
　　 a=1
s=0
　　 For i=1 To 10
____________
____________
____________
　　 s=s+1/a
　　 Next i
　　 msgbox s
　　End Sub