2022年三级Visual Basic笔试样题（四）_等级考试模拟题(1).docx

2022年三级Visual Basic笔试样题（四）_等级考试模拟题(1)Private Sub List1_ DblClick ( )a =List1.TextPrint a+Text1.TextEnd Sub程序运行后，在文本框中输入“789”（见图1），然后双击列表框中的"456"，则输出结果为 。A) 1245 B) 456789 C) 789456 D) 0(31)为了短暂关闭计时器，应把该计时器的某个属性设置为False ，这个属性是。A) Visible B) Timer C) Enabled D) Interval(32)为了把一个记录型变量的内容写入文件中指定的位置，所运用的语句的格式为 。A）Get文件号，记录号，变量名B）Get文件号，变量名，记录号C）Put文件号，变量名，记录号D）Put文件号，记录号，变量名(33)对窗体编写如下事务过程：Private Sub Form _MouseDown(Button As Integer, _Shift As Integer, X As Single Y As Single)If Button =2 ThenPrint "AAAAA"End IfEnd SubPrivate Sub Form _ MouseUp(Button As Integer, _Shift As Integer, X As Single, Y As Single)Print "BBBBB"End Sub程序运行后，假如单击鼠标右键，则输出结果为。A) AAAAA B) BBBBB C) AAAAA D) BBBBBBBBBBAAAAA(34)为了在运行时能显示窗体左上角的限制框（系统菜单），必需。A) 把窗体的Contro1Box 属性设置为Fale,其他属性随意B) 把窗体的ControlBox 属性设置为True,并且把Boder Style属性设置为1-5C) 把窗体的ControlBox 属性设置为False,同时把BoderStyle属性调协为非0值D) 把窗体的ControlBox 属性设置为True,同时把BoderStyle属性设置为0值(35)对窗体编写如下代码：Option Base 1Private Sub Form_KeyPress(KeyAscii As Integer)a = Array(237,126,87,48,498)m1 = a(1)m2 = 1If KeyAscii = 13 ThenFor i =2 To 5If a(i)>ml Thenm1 =a(j)m2 =iEnd IfNext iEnd IfPrint m1Print m2End Sub程序运行后，按回车键，输出结果为A) 48 B) 237 C) 498 D) 4984 1 5 4