在窗体上添加如下命令按纽，然后编写如下事件过程：
Private Sub Command1_Click()
Dim a(10)As Integer
Dim p(3)As Integer
k= 5
For i = 1 To 10
a(i) = i
Next i
For i = 1 To 3
p(i) = a(i * i)
Next i
For i = 1 To 3
k = k + p(i) * 2
Next i
Print k
End Sub
该过程的运行结果为______。

单项选择题下列程序执行后，变量a的值为______。 dim a, b, c, d as single a=100 b=20 c=1000 if b＞a then d=a: a=b: b=d end if if c＞a then d=a: a=c: c: d end if if c＞b then d=b: b=c: c=d end if

单项选择题有如下函数过程: Function lj(x As Integer) As Long Dim s As Long Dim i As Integer s=0 For i = 1 To x s=s+ i Next i 1j= s End Function在窗体上添加一个命令按钮，名为Command1, 编写事件过程调用该函数： Private Sub Command1 Click() Dim i As Integer Dim sum As Long For i = 1 To 5 sum = sum + 1j(i) Next i Print sum End Sub