计算机等级考试二级VB全真模拟试题二下0金坛

2022-07-26 08:15

计算机等级考试二级VB全真模拟试题(二)(下)

计算机等级考试二级VB全真模拟试题(二)(下) 2011年12月10日 来源: 23.在下列关于菜单的说法中,错误的是(B)A)每一个菜单项都是一个控件,与其他控件一样都有自己的属性和事件B)除了Click事件之外,菜单项还能响应其他的如 DblClick等事件过程C)菜单项的快捷键不可以任意设置D)在程序执行时,如果菜单项的Enabled属性为False,则该菜单项变成灰色,不能被用户选择

24.下面关于多重窗体的叙述中,正确的是(B)A)作为启动对象的Main 子过程只能放在窗体模块内B)如果启动对象是Main 子过程,则程序启动时不加载任何窗体,以后由该过程根据不同情况决定是否加载窗体或加载哪一个窗体C)没有启动窗体,程序不能执行D)以上都不对

25.与键盘操作有关的事件有KeyPress、KeyUp和KeyDown事件,当用户按上并且释放一个键后,这三个事件发生的顺序是(A)A)KeyDown、KeyPress、KeyUpB)KeyDown、KeyUp、KeyPressC)KeyPress、KeyDown、、KeyUpD)没有规律

26.要从磁盘上读入一个文件名为“c:\filel.txt”的顺序文件,下面程序段正确的是(A)A)F="c:\filel.txt"Open F For Input As # 1B)F="c:\filel.txt"Open "F" For Input As # 2C)Open "c:\filel.txt" For Output As # 2D)Open c:\filel.txt For Input As # 1

27.下列关于过程叙述不正确的是(D)A)过程的传值调用是将实参的具体值传值递给形参B)过程的传址调用是将实参在内存的地址传递给形参C)过程的传值调用参数是单向传递的,过程的传址调用参数是双向传递的D)无论过程传值调用还是过程传址调用,参数传递都是双向的

28.执行了下面程序后,组合框中数据项的值是(D)Private Sub Form_Click()For i=1 to 6Combo1.AddItem iNext iFor i= 1 to 3Combo1.RemoveItem iNext iEnd SubA)1 5 6B)1 3 5C)4 5 6D)2 4 6

29.若在Shape 控件内以FillStyle属性所指定的图案填充区域,而填充图案的线条颜色由FillColor属性指定,非线条的区域由Back Color属性填充,则应(A)A)将Shape控件的FillSte属性设置为2至7间的某个值,BackStyle属性设置为1B)将Shape控件的FillSte属性设置为0或1,BackStyle属性设置为1C)将Shape控件的FillSte属性设置为2至7间的某个值,BackStyle属性设置为0D)将Shape控件的FillSte属性设置为0或1,BackStyle属性设置为0

30.下列程序的执行结果是(A)Private Sub Form_Activate()Dim score(3) As Integer, total As IntegerDim aa_score As Variantscore(1)=50: score(2) =14:score(3)=36tota=0: i=0For Each aa_score In scorei=i+1total=tota + aa+_scorePrint i,aa_score,totalNextEnd SubA)1 0 02 50 503 14 644 36 100B)1 50 502 14 643 36 100C)0 50 501 14 642 36 100D)0 0 01 50 502 14 643 36 100

31.在Activate 事件过程中,写入下面的程序:Option Base 1Private Sub Form_Activate()Dim t As IntegerDim a( ) As Varianta=Array (2,4,6,8,10,1,3,5,7,9)For i=1 to 10\2t= a(i)a(i)=a(10 - i + 1)a(10 - i + 1)=tNext iFor j= 1 to 10Print a(j);Next jEnd Sub运行程序后,显示的结果是(C)A)2 4 6 8 10 1 3 5 7 9B)1 3 5 7 9 2 4 6 8 10C)9 7 5 3 1 10 8 6 4 2D)10 8 6 4 2 9 7 5 3 1

32.在Activate 事件过程中,写入下面的程序:Private Sub Form _Activate()Dim S As String, a As String, b As Stringa= "*" : b =" $"For i= 1 to 4If i / 2= Int(i / 2) ThenS=String(Len (a)+i , b)ElseS=String(Len(a) + i, a)End IfPrint S;Next iEnd Sub运行程序后,显示结果是(C)A)$$ ***$$$$*****B)*$$**$$***$$$****$$$$C)**$$$****$$$$$D)$*$$**$$$***$$$$****

33.在窗体上设置相应的控件,并在代码窗口编写下列程序:Printe Sub Form_Click()Dim a As Long ,b As Longa=InputBox("请输入若干个整数")Call P(a,b)Print bEnd SubPrivate Sub P(x As Long, y As Long)Dim n As Integer, j As String*1, s As Stringk=Len(Trim(Str(x)))s=""For i= K To 1 Step -1j=Mid(x,i,1)s=s+jNext iy=Val(s)End Sub运行程序,在InputBox框中输入123456,然后单击"确定"按钮,则输出结果是(B)A)123456B)654321C)135246D)246135

34.设定文本框内的文字内容是否允许修改的属性是(B)A)TextB)LockedC)PasswordCharD)Multiline

35.要建立一个学生成绩的随机文件,如下定义了学生

安徽应流集团

电子回收批发

回收赛灵思IC厂家

yml船公司官网

村田电容

相关阅读
最火新挑战不断涌现家居行业下一步该何去何从保护板分条机晋江清洁机线绕电阻Rra

新挑战不断涌现 家居行业下一步该何去何从?在家居行业,市场竞争激烈,面临的压力也愈发加大。尤其是近期以来,原材料价格上涨,运费成本也上升,对于家居企业来说,新的挑战不断涌现。在家居行业,市场竞争激烈,面临

2024-03-22 22:03
最火1日上海市场电镀锌价格行情底阀焊锡丝马车螺丝塑料机械照明箱Rra

1日上海市场电镀锌价格行情您当前位置:首页 价格行情1日上海市场电镀锌价格行情1日上海市场电镀锌价格行情来源:中国五金商机日期:品名 规格(mm) 材质 钢厂/产地 价格(元/吨)涨跌备注 电镀锌板卷0.6*1250*CSECCN5宝钢6600- 电

2024-03-22 12:25
最火江西到2015年要关闭903家金属非金属传声器灌肠机连接器受话器印刷电路Rra

江西到2015年要关频率元件闭903家金属非金属矿山【铝道】从相关部门获悉,为贯彻落实《国务院办公厅转发安全监管总局等部门关于气雾阀依法做好金属非金属矿山整顿工作意见的通知》(国办发〔2012〕54号)精神,推动金属非

2024-03-20 17:37
最火巴林铝业在2019年创下铝的新纪录产量超电话插座虎钳面板唐山整流桥Rra

巴林铝业在2019年创下铝的新纪录 产绗缝机量超过136万吨【铝道】据巴林铝业官1月8日消息,巴林铝业公司(Alba)是除中国外全球*大的铝冶炼厂,在2019年突破了136万吨的纪录,创造了新的生产记录 产量为1,365,水泥机械005公吨,而

2024-03-15 10:58
最火2017年12月中国铝型材市场运行简析Rf连接器发电站角阀气体放电管无心磨床Rra

2017年12月中国铝型材市场运行高压喷嘴简析【铝道】12月对全国150家铝型材企业进行调研显示,12月铝型材企业产能利用率55.70%,环比减少3.11%,产能篮子模具利用率持续下滑,淡季行情凸显;150家样本企业12月铝型材产量52.62万吨,

2024-03-13 20:22
最火2019年上半年全国铝材产量23373万插件产品高温炉控制盒砂铸件雅安Rra

2019年上半年全国铝材产量2337.3万吨 同比降0.5%您当前位置:首页 铝业资讯国内要闻2019年上半年全国铝材产量2337.3万吨 同比降0.5%2020年前11月氧化铝及铝材分地区月度产量氧化铝分地区月度产量连接导线单位:万吨地区: 11月 10月

2024-03-13 18:25