下面程序段，运行后的结果是（ ）。 　Private Sub Commandl_Click( ) 　　Dim b%(1 To 4)，i%，t# 　　For i=1 To 4 　　　b(i)=i 　　Next i 　　t=Tof(b( ) ) 　　Print"t="；t， 　End Sub 　Function Tof(a() As Integer) 　　Dim t#，i% 　　t=1 　　For i=2 To UBound(a) 　　　　　　t=t * a(i) 　　　　Next i 　　　　Tof=t 　　End Function

单项选择题编写如下两个事件过程：Private Sub Form_KeyDown(KeyCode AS Integer，Shift As Integer)Print Chr(KeyCode)End SubPrivate Sub Form_KeyPress(KeyAscii As Integer)Print Chr(KeyAscii)End Sub在一般情况下(即不按住Shift键和锁定大写键时)运行程序，如果按 A 键，则程序输出的结果是（ ）。

单项选择题单击命令按钮时，下列程序的运行结果为（ ）。Private Sub Command1_Click()Print MyFund(20，18)End SubPublic Function MyFund(m As Integer，n As Integer)As IntegerDo While m＜＞nDo While m＞n：m=m-n：LoopDo While m＜n：n=n-m：LoopLoopMyFund=mEnd Function