窗体或控件的事件的名称可以由编程人员决定D.控件的名称可以由编程人员设定
正确答案:C,你的答案:C,
√
6.下面________是合法的变量名。 A.Sin(x)B.FalseC.LongD.a123 正确答案:D,你的答案:A,
×
7.________函数输出时既包含日期又包含时间。 A.DateB.NowC.MonthD.Time 正确答案:B,你的答案:B,
√
8.如果变量bVar是一个逻辑型变量,则________是正确的赋值语句 A.bVar=TrueB.bVar=#True#C.bVar=.True.D.bVar='True' 正确答案:A,你的答案:D,
×
9.下面________是不合法的整型常量。 A.100B.&100C.&E100D.&H100 正确答案:C,你的答案:C,
√
10.可以用来调用Windows中计算器程序的语句是________
A.Shell(\B.Calc.exeC.k=Shell(\D.k=Shell(Calc.exe,1)
正确答案:C,你的答案:C,
√
11.语句PrintTab(10);\________
A.空10个空格输出☆☆B.第1列输出☆☆C.第10列输出☆☆D.第10列输出最后一个☆
正确答案:C,你的答案:C,
√
12.下面语句的执行结果是A=\
A.Beijing□ShanghaiB.BeijingC.Beijing□□□□□□ShanghaiD.BeijingShanghai
正确答案:D,你的答案:D,
√
13.运行下列程序,单击窗体,则消息框中显示的提示是
________PrivateSubForm_Click()MsgBoxStr(123+123)EndSub A.123+123B.Str(123+123)C.出错D.246 正确答案:D,你的答案:D,
√
14.设有下面的语句。与此语句输出结果不同的程序段是( )。PrintIIf(x>0,1,IIf(x<0,-1,0))
A.Ifx>0Then Print1ElseIfx<0Then Print-1Else
Print0EndIfB.Ifx<>0Then Ifx>0ThenPrint1ElseIfx<0Then Print-1Else Print0EndIfC.Ifx>0Then x=1ElseIfx<0Then x=-1EndIfPrintxD.SelectCasexCaseIs>0 Print1CaseIs<0 Print-1CaseElse Print0EndSelect 正确答案:B,你的答案:C,
×
15.设窗体上有名称为Option1的单选按钮,且程序中有语句:
IfOption1.Value=TrueThen下面语句中与该语句不等价的是( )。
A.IfValue=TrueThenB.IfOption1.ValueThenC.IfOption1ThenD.IfOption1=TrueThen
正确答案:A,你的答案:A,
√
16.在窗体上画一个文本框,名称为Text1,然后编写如下程序:PrivateSubForm_Load() Show Text1.Text=\
Text1.SetFocusEndSubPrivateSubForm_Click() DimaAsString,sAsString a=Text1.Text s=\ Fork=1ToLen(a) s=UCase(Mid(a,k,1))+s Nextk Text1.Text=sEndSub程序运行后,在文本框中输入一个字符串,然后单击窗体,则文本框中的内容()。
A.与原字符串中字符顺序相同,但所有字母均转换为大写B.为原字符串的逆序字符串
C.为原字符串的逆序字符串,且所有字母转换为大写D.与原字符串相同
正确答案:C,你的答案:C,
√
17.窗体上有1个名称为Command1的命令按钮,事件过程如下:
PrivateSubCommand1_Click() Dimx%,y%,z% x=InputBox(\请输入第1个整数\ y=InputBox(\请输入第2个整数\ DoUntilx=y Ifx>yThenx=x-yElsey=y-x Loop PrintxEndSub运行程序,单击命令按钮,并输入2个整数169和39,则在窗体上显示的内容为( )。 A.13B.11C.23D.39
正确18.为计算1+2+2^2+2^3+2^4+?+2^10的值,并把结果显示在文本框Text1中,若编写如下事件过程:PrivateSubCommand1Click()
DimaAsLong,sAsLong,kAsLong s=1 a=2 Fork=2To10 a=a*2 s=s+a Nextk Text1.Text=sEndSub执行此事件过程后发现结果是错误的,为能够得到正确结果,应做的修改是( )。
A.把Fork=2To10改为Fork=1To10、交换语句s=s+a和a=a*2的顺序B.把Fork=2To10改为Fork=1To10C.交换语句s=s+a和a=a*2的顺序D.把s=1改为s=0
正确答案:A,你的答案:A,
√
19.假定有如下程序:
PrivateSubForm_Click()DimNAsInteger,JAsIntegerN=0J=1DoUntilN>2N=N+1J=J+N*(N+1)LoopPrintN;JEndSub运行程序,单击窗体,输出结果是 A.321B.313C.37D.01
正确答案:A,你的答案:A,
√
20.窗体上有一个名称为Command1的命令按钮,其单击事件过程如下:
PrivateSubCommand1_Click()DimsAsDoubles=0:i=1DoWhilei<6s=s+i/(i+1)i=i+1LoopPrintsEndSub该事件过程的功能是计算一个表达式的值,该表达式是 A.1/2+2/3+3/4+4/5B.1+1/2+2/3+3/4+4/5+5/6C.1+1/2+2/3+3/4+4/5D.1/2+2/3+3/4+4/5+5/6
正确答案:D,你的答案:B,
×
答案:21.在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:PrivateSubCommand1_Click()c=1234c1=Trim(Str(c))Fori=1To4 Print______NextEndSub程序运行后,单击命令按钮,要求在窗体上显示如下内容:1121231234则在横线处应填入的内容为( )。
A.Right(c1,i)B.Mid(c1,i,i)C.Left(c1,i)D.Mid(c1,i,1)
正确答案:C,你的答案:C,
√
22.阅读程序:PrivateSubForm_Click() a=0 Forj=1To15 a=a+jMod3 Nextj PrintaEndSub程序运行后,单击窗体,输出结果是( )。
A.15B.105C.120D.1
正确答案:A,你的答案:A,
√
A,你的答案:A,
√
23.有如下程序:PrivateSubForm_Click() DimiAsInteger,nAsInteger Fori=1To20 i=i+4 n=n+i Ifi>10ThenExitFor Next PrintnEndSub程序运行后,单击窗体,则输出结果是( )。 A.15B.30C.14D.29
正确答案:B,你的答案:B,
√
24.在窗体上画一个名称为Command1的命令按钮,编写如下事件过程:
PrivateSubCommand1_Click() n=0 Fori=0To10 X=2*i-1 IfXMod3=0Thenn=n+1 Nexti PrintnEndSub运行程序,单击命令按钮,则窗体上显示的是( )。 A.3B.7C.1D.5
正确答案:A,你的答案:A,
√
25.设有如下事件过程:PrivateSubForm_Click() Sum=0 Fork=1To3 Ifk<=1Then x=1 ElseIfk<=2Then x=2 ElseIfk<=3Then x=3 Else x=4 EndIf Sum=Sum+x Nextk PrintSumEndSub程序运行后,单击窗体,输出结果是( )。 A.3B.9C.10D.6
正确答案:D,你的答案:D,
√
1.要是标签能够显示指定的文字内容,应设置其________属性 A.TextB.NameC.CaptionD.Label
相关推荐: