电子科大18秋《VB程序设计》在线作业2.docx
《电子科大18秋《VB程序设计》在线作业2.docx》由会员分享，可在线阅读，更多相关《电子科大18秋《VB程序设计》在线作业2.docx（12页珍藏版）》请在冰点文库上搜索。
电子科大18秋《VB程序设计》在线作业2
（单选题）1:
下列哪种说法正确的是（）。
A:
通用对话框是VisualBasic6.0的内部标准控件
B:
要使用CommonDialog控件，必须在“工程”菜单下的“部件”对话框中选定“MicrosoftCommonDialogControl6.0”
C:
打开“部件”对话框只有一种方法
D:
程序运行过程中，通用对话框在窗体中是可见的
正确答案:
（单选题）2:
设a=3,b=5,则以下表达式值为真的是（）。
A:
a>=bAndb>10
B:
a>b）or（b>0）
C:
（a<0）Eqv（b>0）
D:
（-3=5>a）And（b>0）
正确答案:
（单选题）3:
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
PrivateSubCommand1_Click（）Dimarray1（10,10）AsIntegerDimI,jAsIntegerForI=1To3Forj=2To4array1（I,j）=I+jNextjNextIText1.Text=array1（2,3）+array1（3,4）EndSub程序运行后，单击命令按钮，在文本框中显示的值是（）。
A:
12
B:
13
C:
14
D:
15
正确答案:
（单选题）4:
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
PrivateSubCommand1_Click（）DimnumAsIntegernum=1DoUntilnum>6Printnum;num=num+2.4LoopEndSub程序运行后，单击命令按钮，则窗体上显示的内容是（）。
A:
13.45.8
B:
135
C:
147
D:
无数据输出
正确答案:
（单选题）5:
设组合框Combo1中有三个项目，则以下能删除最后一项的语句是（）。
A:
Combo1.RemoveItemText
B:
Combo1.RemoveItem2
C:
Combo1.RemoveItem3
D:
Combo1.RemoveItemCombo1.Listcount
正确答案:
（单选题）6:
为了把一个记录型变量的内容写入文件中指定的位置，要使用语句（）。
A:
Get文件号，记录号，变量名
B:
Get文件号，变量名，记录号
C:
Put文件号，变量名，记录号
D:
Put文件号，记录号，变量名
正确答案:
（单选题）7:
在窗体上画一个命令按钮（其Name属性为Command1），然后编写如下代码：
OptionBase1PrivateSubCommand1_Click（）Dimas=0a=Array（1,2,3,4）j=1Fori=4To1Step-1s=s+a（i）*jj=j*10NextiPrintsEndSub运行上面的程序，单击命令按钮，其输出结果是（）。
A:
4321
B:
1234
C:
34
D:
12
正确答案:
（单选题）8:
窗体上有一组合框Combol,窗体加载时的代码如下：
PrivateSubForm_Load（）Combol.AddItem“电视机”Combol.AddItem“录像机”Combol.AddItem“VCD”Combol.AddItem“组合音响”EndSub要在文本框Textl中显示列表中的第三个项目，则正确的语句的是（）。
A:
Textl.Text=Combol.List（0）
B:
Textl.Text=Combol.List
（1）
C:
Textl.Text=Combol.List
（2）
D:
Textl.Text=Combol.List（3）
正确答案:
（单选题）9:
在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程：
PrivateSubCommand1_Click（）n=Text1.TextSelectCasenCase1To20x=10Case2,4,6x=20CaseIs<10x=30Case10x=40EndSelectText2.Text=xEndSub程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是（）。
A:
10
B:
20
C:
30
D:
40
正确答案:
（单选题）10:
在窗体中添加一个命令按钮，然后编写如下程序：
PrivateSubCommand1_Click（）DimaAsInteger,bAsIntegera=InputBox（"EntertheFirstinteger"）b=InputBox（"EntertheSecondinteger"）Printb+aEndSub程序运行后，单击命令按钮，先后在两个输入框中分别输入123和123，则输出结果是（）。
A:
246
B:
123
C:
456
D:
123123
正确答案:
（单选题）11:
代码Command1.Caption=”退出”,其中Command1是（），Caption是（）,“退出”是（）。
请选择一个正确答案（）。
A:
方法，事件，属性
B:
对象，属性，值
C:
对象，方法，值
D:
方法，对象，值
正确答案:
（单选题）12:
目录列表框的Path属性的作用是（）。
A:
显示当前驱动器或指定驱动器上的目录结构
B:
显示当前驱动器或指定驱动器上的某目录下的文件名
C:
显示根目录下的文件名
D:
显示该路径下的文件
正确答案:
（单选题）13:
可以与ADO数据控件绑定的控件必须具有（）属性。
A:
Connectionstring
B:
Caption
C:
DataSource
D:
RecordSource
正确答案:
（单选题）14:
执行语句：
Open"Tel.dat"ForRandomAs#1Len=50后，对文件Tel.dat中的数据能够执行的操作是（）。
A:
只能写，不能读
B:
只能读，不能写
C:
既可以读，也可以写
D:
不能读，不能写
正确答案:
（单选题）15:
以下能判断是否到达文件尾的函数是（）。
A:
BOF
B:
LOC
C:
LOF
D:
EOF
正确答案:
（单选题）16:
为了保留动态数组中原有元素的值，需要使用关健字（）。
A:
Static
B:
Preserve
C:
OptionBase
D:
OptionCompare
正确答案:
（单选题）17:
如果要改变窗体的标题，则需要设置的属性是（）。
A:
Caption
B:
Name
C:
BackColor
D:
Borderstyle
正确答案:
（单选题）18:
窗体的MouseDown事件过程如下：
Form_MouseDown（ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle）其中有4个参数，关于这些参数，正确的描述是（）。
A:
通过Button参数判定当前按下的是哪一个鼠标键
B:
Shift参数只能用来确定是否按下Shift键
C:
Shift参数只能用来确定是否按下Alt键和Ctrl键
D:
参数x、y用来设置鼠标当前位置的坐标
正确答案:
（单选题）19:
在下列动作中，不能引发命令按钮Click事件的是（）。
A:
在按钮上单击鼠标左键
B:
在按钮上单击鼠标右键
C:
把焦点转移到按钮上，然后按回车
D:
如果按钮有快捷字母键，按Alt+快捷字母键
正确答案:
（单选题）20:
设有如下通用过程：
PublicSubFun（a（）,ByValxAsInteger）Fori=1To5x=x+a（i）NextEndSub在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程PrivateSubCommand1_Click（）Dimarr（5）AsVariantFori=1To5arr（i）=iNextn=10CallFun（arr（）,n）Text1.Text=nEndSub程序运行后，单击命令按钮，则在文本框中显示的内容是（）。
A:
10
B:
15
C:
25
D:
24
正确答案:
（单选题）1:
下列哪种说法正确的是（）。
A:
通用对话框是VisualBasic6.0的内部标准控件
B:
要使用CommonDialog控件，必须在“工程”菜单下的“部件”对话框中选定“MicrosoftCommonDialogControl6.0”
C:
打开“部件”对话框只有一种方法
D:
程序运行过程中，通用对话框在窗体中是可见的
正确答案:
（单选题）2:
设a=3,b=5,则以下表达式值为真的是（）。
A:
a>=bAndb>10
B:
a>b）or（b>0）
C:
（a<0）Eqv（b>0）
D:
（-3=5>a）And（b>0）
正确答案:
（单选题）3:
在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下事件过程：
PrivateSubCommand1_Click（）Dimarray1（10,10）AsIntegerDimI,jAsIntegerForI=1To3Forj=2To4array1（I,j）=I+jNextjNextIText1.Text=array1（2,3）+array1（3,4）EndSub程序运行后，单击命令按钮，在文本框中显示的值是（）。
A:
12
B:
13
C:
14
D:
15
正确答案:
（单选题）4:
在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程：
PrivateSubCommand1_Click（）DimnumAsIntegernum=1DoUntilnum>6Printnum;num=num+2.4LoopEndSub程序运行后，单击命令按钮，则窗体上显示的内容是（）。
A:
13.45.8
B:
135
C:
147
D:
无数据输出
正确答案:
（单选题）5:
设组合框Combo1中有三个项目，则以下能删除最后一项的语句是（）。
A:
Combo1.RemoveItemText
B:
Combo1.RemoveItem2
C:
Combo1.RemoveItem3
D:
Combo1.RemoveItemCombo1.Listcount
正确答案:
（单选题）6:
为了把一个记录型变量的内容写入文件中指定的位置，要使用语句（）。
A:
Get文件号，记录号，变量名
B:
Get文件号，变量名，记录号
C:
Put文件号，变量名，记录号
D:
Put文件号，记录号，变量名
正确答案:
（单选题）7:
在窗体上画一个命令按钮（其Name属性为Command1），然后编写如下代码：
OptionBase1PrivateSubCommand1_Click（）Dimas=0a=Array（1,2,3,4）j=1Fori=4To1Step-1s=s+a（i）*jj=j*10NextiPrintsEndSub运行上面的程序，单击命令按钮，其输出结果是（）。
A:
4321
B:
1234
C:
34
D:
12
正确答案:
（单选题）8:
窗体上有一组合框Combol,窗体加载时的代码如下：
PrivateSubForm_Load（）Combol.AddItem“电视机”Combol.AddItem“录像机”Combol.AddItem“VCD”Combol.AddItem“组合音响”EndSub要在文本框Textl中显示列表中的第三个项目，则正确的语句的是（）。
A:
Textl.Text=Combol.List（0）
B:
Textl.Text=Combol.List
（1）
C:
Textl.Text=Combol.List
（2）
D:
Textl.Text=Combol.List（3）
正确答案:
（单选题）9:
在窗体上画一个名称为Command1的命令按钮和两个名称分别为Text1、Text2的文本框，然后编写如下事件过程：
PrivateSubCommand1_Click（）n=Text1.TextSelectCasenCase1To20x=10Case2,4,6x=20CaseIs<10x=30Case10x=40EndSelectText2.Text=xEndSub程序运行后，如果在文本框Text1中输入10，然后单击命令按钮，则在Text2中显示的内容是（）。
A:
10
B:
20
C:
30
D:
40
正确答案:
（单选题）10:
在窗体中添加一个命令按钮，然后编写如下程序：
PrivateSubCommand1_Click（）DimaAsInteger,bAsIntegera=InputBox（"EntertheFirstinteger"）b=InputBox（"EntertheSecondinteger"）Printb+aEndSub程序运行后，单击命令按钮，先后在两个输入框中分别输入123和123，则输出结果是（）。
A:
246
B:
123
C:
456
D:
123123
正确答案:
（单选题）11:
代码Command1.Caption=”退出”,其中Command1是（），Caption是（）,“退出”是（）。
请选择一个正确答案（）。
A:
方法，事件，属性
B:
对象，属性，值
C:
对象，方法，值
D:
方法，对象，值
正确答案:
（单选题）12:
目录列表框的Path属性的作用是（）。
A:
显示当前驱动器或指定驱动器上的目录结构
B:
显示当前驱动器或指定驱动器上的某目录下的文件名
C:
显示根目录下的文件名
D:
显示该路径下的文件
正确答案:
（单选题）13:
可以与ADO数据控件绑定的控件必须具有（）属性。
A:
Connectionstring
B:
Caption
C:
DataSource
D:
RecordSource
正确答案:
（单选题）14:
执行语句：
Open"Tel.dat"ForRandomAs#1Len=50后，对文件Tel.dat中的数据能够执行的操作是（）。
A:
只能写，不能读
B:
只能读，不能写
C:
既可以读，也可以写
D:
不能读，不能写
正确答案:
（单选题）15:
以下能判断是否到达文件尾的函数是（）。
A:
BOF
B:
LOC
C:
LOF
D:
EOF
正确答案:
（单选题）16:
为了保留动态数组中原有元素的值，需要使用关健字（）。
A:
Static
B:
Preserve
C:
OptionBase
D:
OptionCompare
正确答案:
（单选题）17:
如果要改变窗体的标题，则需要设置的属性是（）。
A:
Caption
B:
Name
C:
BackColor
D:
Borderstyle
正确答案:
（单选题）18:
窗体的MouseDown事件过程如下：
Form_MouseDown（ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle）其中有4个参数，关于这些参数，正确的描述是（）。
A:
通过Button参数判定当前按下的是哪一个鼠标键
B:
Shift参数只能用来确定是否按下Shift键
C:
Shift参数只能用来确定是否按下Alt键和Ctrl键
D:
参数x、y用来设置鼠标当前位置的坐标
正确答案:
（单选题）19:
在下列动作中，不能引发命令按钮Click事件的是（）。
A:
在按钮上单击鼠标左键
B:
在按钮上单击鼠标右键
C:
把焦点转移到按钮上，然后按回车
D:
如果按钮有快捷字母键，按Alt+快捷字母键
正确答案:
（单选题）20:
设有如下通用过程：
PublicSubFun（a（）,ByValxAsInteger）Fori=1To5x=x+a（i）NextEndSub在窗体上画一个名称为Text1的文本框和一个名称为Command1的命令按钮，然后编写如下的事件过程PrivateSubCommand1_Click（）Dimarr（5）AsVariantFori=1To5arr（i）=iNextn=10CallFun（arr（）,n）Text1.Text=nEndSub程序运行后，单击命令按钮，则在文本框中显示的内容是（）。
A:
10
B:
15
C:
25
D:
24
正确答案:
升级会员 