1-11、以下叙述中错误的是()。A)标准模块文件的扩展名是.basB)标准模块文件是纯代码文件C)在标准模块中声明的全局变量可以在整个工程中使用D)在标准模块中不能定义过程参考答案:D1-12、A)1B)0C)3D)出现错误提示参考答案:A1-13、以下选项中,不合法的VisualBasic的变量名是()。A)a5bB)_xyzC)a_bD)andif参考答案:B1-14、以下数组定义语句中,错误的是()。A)Statica(10)AsIntegerB)Dimc(3,1To4)C)Dimd(-10)D)Dimb(0To5,1To3)AsInteger参考答案:C现有语句:y=IIf(x0,xMod3,0)1-15、设x=10,则y的值是()。A)0B)1C)3D)语句有错参考答案:B1-16、个菜单编辑器设计的菜单。运行程序,并在窗体上单击鼠标右键,则弹出一个快捷菜单,如图所示。下列说法错误的是()。A)在设计粘贴菜单项时,在菜单编辑器窗口中设置了有效属性(有√)B)菜单中的横线是在该菜单项的标题输入框中输入了一个-(减号)字符C)在设计选中菜单项时,在菜单编辑器窗口中设置了复选属性(有√)D)在设计该弹出菜单的主菜单项时,在菜单编辑器窗口中去掉了可见前面的√参考答案:A1-17、时双击窗体的任何地方,可以打开的窗口是()。A)代码窗口B)属性窗口C)工程资源管理器窗口D)工具箱窗口参考答案:A1-18、若变量a未事先定义而直接使用(例如:a=0),则变量a的类型是()。A)IntegerB)StringC)BooleanD)Variant参考答案:D1-19、为把圆周率的近似值3.14159存放在变量pi中,应该把变量pi定义为()。A)DimpiAsIntegerB)Dimpi(7)AsIntegerC)DimpiAsSingleD)DimpiAsLong参考答案:C1-20、A)30B)31C)49D)48参考答案:B1-21、为了使文本框同时具有垂直和水平滚动条,应先把MultiLine属性设置为True,然后再把ScrollBars属性设置为()。A)0B)1C)2D)3参考答案:D1-22、文本框Text1的KeyDown事件过程如下:PrivateSubText1_KeyDown(KeyCodeAsInteger,ShiftAsInteger)...EndSub其中参数KeyCode的值表示的是发生此事件时()。A)是否按下了Alt键或Ctrl键B)按下的是哪个数字键C)所按的键盘键的键码D)按下的是哪个鼠标键参考答案:C1-23、窗体上有一个名称为HScroll1的滚动条,程序运行后,当单击滚动条两端的箭头时,立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是()。A)PrivateSubHScroll1_Change()PrintHScroll1.ValueEndSubB)PrivateSubHScroll1_Change()PrintHScroll1.SmallChangeEndSubC)PrivateSubHScroll1_Scroll()PrintHScroll1.ValueEndSubD)PrivateSubHScroll1_Scroll()PrintHScroll1.SmallChangeEndSub参考答案:A1-24、若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click事件过程被调用的操作是()。A)用鼠标右键单击此按钮B)按键盘上的Esc键C)按键盘上的回车键D)用鼠标右键双击此按钮参考答案:C1-25、要使两个单选按钮属于同一个框架,下面三种操作方法中正确的是()。①先画一个框架,再在框架中画两个单选按钮②先画一个框架,再在框架外画两个单选按钮,然后把单选按钮拖到框架中③先画两个单选按钮,再画框架将单选按钮框起来A)①B)①、②C)③D)①、②、③参考答案:A1-26、能够存放组合框的所有项目内容的属性是()。A)CaptionB)TextC)ListD)Selected参考答案:C1-27、设窗体上有一个标签Label1和一个计时器Timer1,Timer1的Interval属性被设置为1000,Enabled属性被设置为True。要求程序运行时每秒在标签中显示一次系统当前时间。以下可以实现上述要求的事件过程是()。A)PrivateSubTimer1_Timer()Label1.Caption=TrueEndSubB)PrivateSubTimer1_Timer()Label1.Caption=Time$EndSubC)PrivateSubTimer1_Timer()Label1.Interval=1EndSubD)PrivateSubTimer1_Timer()Fork=1ToTimer1.IntervalLabel1.Caption=TimerNextkEndSub参考答案:B1-28、窗体上有一个名称为CD1的通用对话框控件和由四个命令按钮组成的控件数组Command1,其下标从左到右分别为0、1、2、3,窗体外观如图所示。命令按钮的事件过程如下:PrivateSubCommand1_Click(IndexAsInteger)SelectCaseIndexCase0CD1.Action=1Case1CD1.ShowSaveCase2CD1.Action=5Case3EndEndSelectEndSub对上述程序,下列叙述中错误的是()。A)单击打开按钮,显示打开文件的对话框B)单击保存按钮,显示保存文件的对话框C)单击打印按钮,能够设置打印选项,并执行打印操作D)单击退出按钮,结束程序的运行参考答案:C1-29、窗体上有一个名称为Frame1的框架(如图),若要把框架上显示的Frame1改为汉字框架,下面正确的语句是()。A)Frame1.Name=框架B)Frame1.Caption=框架C)Frame1.Text=框架D)Frame1.Value=框架参考答案:B1-30、在窗体上画一个名称为Combo1的组合框,名称为Text1的文本框,以及名称为Command1的命令按钮,如图所示。运行程序,单击命令按钮,将文本框中被选中的文本添加到组合框中,若文本框中没有选中的文本,则将文本框中的文本全部添加到组合框中。命令按钮的事件过程如下:PrivateSubCommand1_Click()IfText1.Se1Length0ThenElseCombo1.AddItemText1EndIfEndSub程序中横线处应该填写的是()。A)Combo1.AddItemText1.TextB)Combo1.AddItemText1.SelStartC)Combo1.AddItemText1.SelTextD)Combo1.AddItemText1.SelLength参考答案:C1-31、窗体上有一个名称为Text1的文本框,一个名称为CD1的通用对话框,一个标题为打开文件的命令按钮,如图所示。命令按钮的单击事件过程如下:PrivateSubCommand1_Click()CD1.ShowOpenOpenCD1.FileNameForInputAs#1MsgBoxCD1.FileNameLineInput#1,sText1.Text=sClose#1EndSub单击命令按钮,执行以上事件过程,打开选定的文件,读取文件的内容并显示在文本框中.以下叙述中正确的是()。A)程序没有错误,可以正确完成打开文件、读取文件中内容的操作B)执行Open命令时出错,因为没有指定文件的路径C)Open语句是错误的,应把语句中的ForInput改为ForOutputD)LineInput命令格式错参考答案:A1-32、窗体上有一个如右图所示的图形控件,控件中显示了如图所示的文字,可以判断这个图形控件()。A)是图像框(Image)B)是图片框(PictureBox)C)是形状控件D)不是上述3种控件中的一种参考答案:B1-33、窗体上有一个名称为Combo1的组合框,要求在其编辑区输入文本并按回车键后,编辑区中的文本被添加到列表中。下面能实现这一功能的是()。A)PrivateSubCombo1_KeyDown(KeyCodeAsInteger,ShiftAsInteger)IfKeyCode=13ThenCombo1.AddItemCombo1.TextEndIfEndSubB)PrivateSubCombo1_KeyDown(KeyCodeAsInteger,ShiftAsInteger)IfKeyCode=13ThenCombo1.AddItemText1.TextEndIfEndSubC)PrivateSubCombo1_Click()Combo1.AddItemCombo1.TextEndSubD)PrivateSubCombo1_Click()Combo1.AddItemText1.TextEndSub参考答案:A1-34、工程文件中包含一个模块文件和一个窗体文件。模块文件的程序代码是:PublicxAsIntegerPrivateyAsInteger窗体文件的程序代码是:DimaAsIntegerPrivateSubForm_Load()DimbAsIntegera=2:b=3:x=10:y=20EndSubPrivateSubCommand1_Click()a=a+5:b=b+5:x=x+5:y=y+5Printa;b;x;yEndSub运行程序,单击窗体上的命令按钮,则在窗体上显示的是()。A)55155B)751525C)78155D)75155参考答案:D1-35、窗体上的三个命令按钮构成名称为Command1的控件数组。如图所示。程序如下:PrivateSubCommand1_Click(IndexAsInteger)IfIndex=1ThenPrint计算机等级考试EndIfIfIndex=2ThenPrintCommand1(2).CaptionEndIfEndSub运行程序,单击命令按钮2,则如下叙述中正确的是()。A)PrintCommand1(2).Caption语句有错B)在窗体上显示命令按钮2C)在窗体上显示命令按钮3D)在窗体上显示计算机等级考试参考答案:D1-36、下面程序的执行结果是()。PrivateSubCommand1_Click()a=0k=1DoWhilek4x=k^k^ak=k+1Printx;LoopEndSubA)1427B)111C)149D)000参考答案:B1-37、窗体上有名称分别为Text1、Text2的文本框,名称为Command1的命令按钮。运行程序,在Text1中输入FormList,然后单击命令按钮,执行如下程序:PrivateSubCommand1_Click()Text2.Text=UCase(Mid(Text1.Text,5,4))EndSub在Text2中显示的是()。A)formB)listC)FORMD)LIST参考答案:D1-38、窗体上有名称为Command1的命令按钮,名称分别为List1、List2的列表框,其中List1的MultiSelect属性设置为1(Simple),并有如下事件过程:PrivateSubCommand1_Click()Fori=0ToList1.ListCount-1IfList1.Selected(i)=TrueThenList2.AddItemTextEndIfNextEndSub上述事件过程的功能是将List1中被选中的列表项添加到List2中。运行程序时,发现不能达到预期目的,应做修改,下列修改中正确的是()。A)将For循环的终值改为List1.ListCountB)将List1.Selected(i)=True改为List1.List(i).Selected=TrueC)将List2.AddItem