下面程序运行后,单击命令按钮,输出的结果是pivAtE suBCornmAnD1_CliCk() Dim A%(1 to 4),B%(2 to 6),i%,str1#,str2# For i=1 to 4 A(i)=i nExt For i=2 to 6 B(i)=i nExt str1=yAg(A) str2=yAg(B) print"str1=";str1;"str2=";str2 EnD suBFunCtion yAg(A()As intEgEr) Dim t#,i% t=1 For i=lBounD(A)to uBounD(A) t=t*A(i) nExt yAg=t EnD FunCtion A、str1=24 str2=720 B、str1=12 str2=360 C.str1=24 str2=180 D、str1=36 str2=720