下面程序运行后,单击命令按钮,输出的结果是
Private Sub Command1_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 Sub
Function 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
相关问题推荐
如果在c盘当前文件下已存在名称为studata.dat的顺序文件,那么执行语句Open″c:studata.dat″ For Append As # 1之后,将
A．删除文件中原有内容
B．保留文件中原有内容,并在文件尾填加新内容
C．保留文件中原有内容,并在文件头填加新内容
D．以上均不对
在关于输入掩码的叙述中，正确的是()。
A．在定义字段的输入掩码时，既可以使用输入掩码向导，也可以直接使用字符
B．定义字段的输入掩码，是为了设置输入时以密码显示
C．输入掩码中的字符“A”表示可以选择输入数字0到9之间的一个数
D．直接使用字符定义输入掩码时不能将字符组合起来
有以下程序
#include ＜stdio.h＞
#include ＜string.h＞
typedef stmct{ char name[9];char sex;float score[2];}STU;
void f(STU a)
{ STU b={"Zhao",'m',85.0,90.0}; int i;
strcpy(a.name,b.name) ;
a.sex=b.sex;
for(i=0;i＜2;i++) a.score[i]=b.score[i];
main( )
{ STU c={"Qian",'f',95.0,92.0};
f(c);printf("%s,%c,%2.0f,%2.0f\n",c.name,c.sex,c.score[0],c.score[1]) ;
}
程序的运行结果是
A．Qian,f,95,92
B．Qian,m,85,90
C．Zhao,f,95,92
D．Zhao,m,85,90
设有：
int a=1,b=2,c=3,d=4,m=2,n=2;
执行(m=a＞b) &&(n=c＞d) 后，n的值是
A．1
B．2
C．3
D．4
将调试通过的工程经“文件”菜单中的“生成exe文件”编译成为exe文件后，该可执行文件到其他机器上不能运行的主要原因是()。
A．运行的机器上无VB系统
B．缺少.fan窗体文件
C．该可执行文件有病毒
D．以上原因都不对
