1、 设有声明语句OptionBase1Dimb(-1To10,2To9,20)AsInteger则数组b中全部元素的个数

A.2310

B.1920

C.1500

D.1658

参考答案： B

无

----------------------------------------

2、 单击命令按钮，下列事件过程的执行结果为PrivateSubCommand1_Click()DimxAsInteger,yAsIntegerx=40:y=72CallPtoP(x,y)Printx;yEndSubPublicSubPtoP(ByvalnAsInteger,ByValmAsInteger)n=n＼10+2m=m＼10+2EndSub

A.08

B.4072

C.450

D.7850

参考答案： B

无

----------------------------------------

3、 下列程序的执行结果为PrivateSubCommand1_Click()DimpAsInteger,qAsIntegerp=12:q=20CallValue(p,q)Printp;qEndSubPrivateSubValue(ByValmAsInteger,ByValnAsInteger)m=m*2:n=n-5Printm;nEndSub

A.20122015

B.12201225

C.24151220

D.24121215

参考答案： C

无

----------------------------------------

4、 在窗体上画一个命令按钮，然后编写如下程序：PrivateSubCommand3_Click()Cop2Cop3Cop4EndSubSubCop(aAsInteger)StaticxAsIntegerx=x+aPrintx;EndSub程序运行后，单击命令按钮，输出结果为

A.234

B.259

C.354

D.243

参考答案： B

无

----------------------------------------

5、 有如下事件过程，单击命令按钮扣，输出结果为PrivateSubCommand1_Click()Dimb%(1To4),j%,t#Forj=1To4b(j)=jNextjt=Tax(b())Print"t=";t,EndSubFunctionTax(a()AsInteger)Dimt#,i%t=1Fori=2ToUBound(

A.t＝18

B.t＝24

C.t＝30

D.t＝32

参考答案： B

无

----------------------------------------

6、 设在窗体上有一个文本框，然后编写如下的事件过程：PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger)ConstAlt=4ConstKey_F2=&H71altdown%=(ShiftAndAlt)>0f2down%=(KeyCode=Key_F2)Ifaltdown%Andf2down%ThenText1.Text="abl"EndIfEndSub程序运行后，清除文本框中原有内容，如果按Shift+F2键，则在文本框中显示的是

A.Alt+F2

B.abl

C.随机出几个数

D.不发生变化

参考答案： D

无

----------------------------------------

7、 设已经在菜单编辑器中设计了窗体的快捷菜单，其顶级菜单为Bt，取消其"可见"属性，运行时，在以下事件过程中，可以使快捷菜单相应鼠标右键菜单的是

A.PrivateSubForm_MouseDown(Button

首页 上页 1 2 下页 尾页 1/2/2