题目内容
下面程序运行后,单击命令按钮,输出的结果是【 】 Private Sub Commandl_Click() Dim a%(1 To 4) ,b%(2 To 6) ,i%,strl,str2 For i=1 To 4 a(i) =i Next i For i=2 To 6 b(i) =i Next i str1 =YAG(A) str2 =YAG(B) Print"strl";str1;"str2=";str2 End Sub Function YAG (a()As Integer) Dim T,i% t=1 For i=LBound(A)To UBound(A) t=t * a(i) Next i YAG =t End Function
查看答案
搜索结果不匹配?点我反馈