预览加载中,请您耐心等待几秒...
1/10
2/10
3/10
4/10
5/10
6/10
7/10
8/10
9/10
10/10

在线预览结束,喜欢就下载吧,查找使用更方便

如果您无法下载资料,请参考说明:

1、部分资料下载需要金币,请确保您的账户上有足够的金币

2、已购买过的文档,再次下载不重复扣费

3、资料包下载后请先用软件解压,在使用对应软件打开

VB程序设计试题及答案(一)(C)DoWhile…Loop循环至少执行一次和Do…LoopUntil循环可能 一、单选题不执行 1.VB6.0是一种面向B的编程环境。(D)DoWhile…Loop循环可能不执行和Do…LoopUntil循环至少执 (A)机器(B)对象行一次 (C)过程(D)应用11。以下B是正确的For…Next结构。 2.要使FormI窗体的标题栏显示欢迎使用以下D语句是正(A)Forx=1ToStep10(B)Forx=3To-3Step—3 确的。…… (A)Forml。Caption=“欢迎使用VB”NextxNextx (B)Forml。Caption='欢迎使用VB’(C)Forx=1To10(D)Forx=3to10step3 (C)Forml.Caption=欢迎使用VBre:…… (D)Forml.Caption=”欢迎使用VB”NextxNexty 3。若要使命令按钮不可操作,要对A属性进行设置。Ifi=10ThenGoTOre (A)EnabIed(B)Visible12。如下数组声明语句,B是正确的。 (C)Backcolor(D)Caption(A)Dima[3,4]AsInteger 4。如果在窗体上已经创建了一个文本框对象TextI,可以通(B)Dima(3,4)AsInteger 过C事件获得输入键值的ASCII码。(C)Dima(n,n)AsInteger (A)Change(B)LostFocus(D)Dima(34)AsInteger (C)KeyPress(D)GotFocus13.下列语句中(假定变量n有值),能正确声明可变长数组的 5。下面A是合法的变量名。是A。 (A)X_yz(B)123ab。(C)integer(D)X-Y(A)Dima()AsInteger(B)Dima()As 6.以下关系表达式中,其值为False的是A。Integer ((B)女〉男”ReDima(n)ReDima(n)AsString (C)”BASIC”=UCase()(D)”123”<”23”(C)Dima()AsInteger(D)Dima(10)As 7。为了给x、y、z三个变量赋初值1,下面正确的赋值语句是A.Integer (A)x=1:y=1:z=1(B)x=1,y=1,z=1ReDima(3,4)ReDima(n+10) (C)x=y=z=1(D)xyz=1ReDimPreservea(4,4) 8。VB提供了结构化程序设计的三种基本结构,三种基本结构14.要想从子过程调用后返回两个结果,下面子过程语句说明合法的 是D。是C。 (A)递归结构、选择结构、循环结构(A)Subf2(ByValn%,ByValm%)(B)Subf1(n%, (B)选择结构、过程结构、顺序结构ByValm%) (C)过程结构、输入输出结构、转向结构(C)Subf1(n%,m%)(D)Subf1(ByVal (D)选择结构、循环结构、顺序结构n%,m%) 9.下面If语句统计满足性别为男、职称为副教授以上、年龄小于4015。设有如下程序段: 岁条件的人数,不正确的语句是D。PublicSubF1(n%) (A)男,教授)〉OThenn=n+l… (B)Ifsex=”男教授副教授n=3*n+4 Thenn=n+l… (C)Ifsex=”男”Andage=4OAndRight(duty,2)教授EndSub (D)男教授副教授”PrivateSubCommand1_Click() Thenn=n+lDimn%,m% 10.下列关于Do…Loop循环结构执行循环次数的描述正确的是D。n=3 (A)DoWhile…Loop循环和Do…LoopUntil循环至少都执行一次m=4 (B)DoWhile…Loop循环和Do…LoopUntil循环可能都不执行… ‘调用F1语句 1 …OpenFForInputAs#1 EndSub(B)F=“c:1。txt” 则在Command1_Click事件中有效的调用语句是B.Open“F”ForInputAs#2 (A)CallF1(n+m)(B)CallF1(m)(C)Call(C)Open“c:t1.txt”ForInputAs#1 F1(5)(D)CallF1(m+5)(D)Openc:1.txtForInputAs#2 16。用来设置粗体字的属性是C。23.坐标度量单位可由通过来D改变. (A)FontItalic(B)FontName(C)(A)Drawstyle属性(B)DrawWidth属性 FontBold(D)FontSize(C)Scale方法(