VB VBWord格式.docx

上传人:b****5 文档编号:19631188 上传时间:2023-01-08 格式:DOCX 页数:60 大小:41.13KB
下载 相关 举报
VB VBWord格式.docx_第1页
第1页 / 共60页
VB VBWord格式.docx_第2页
第2页 / 共60页
VB VBWord格式.docx_第3页
第3页 / 共60页
VB VBWord格式.docx_第4页
第4页 / 共60页
VB VBWord格式.docx_第5页
第5页 / 共60页
点击查看更多>>
下载资源
资源描述

VB VBWord格式.docx

《VB VBWord格式.docx》由会员分享,可在线阅读,更多相关《VB VBWord格式.docx(60页珍藏版)》请在冰豆网上搜索。

VB VBWord格式.docx

条件>

则以下叙述中错误的是(C)

A.循环体中可以使用ExitDo语句

B."

条件"

可以是关系表达式、逻辑表达式或常数

C.若"

是一个为0的常数,则一次也不执行循环体

D.如果"

总是为True,则不停地执行循环体

C$=UCase(Left$(a$,7))&

b$&

Right$(a$,12)

后,变量C$的值为(A)。

A.VISUALC++Programming

B.VISUALBASICProgramming

C.VisualBASICProgramming

D.VisualC++Programming

设a=2,b=3,c=4,d=5,则下面语句的输出是(B)。

Print3>

2*bOra=cAndb<

>

cOrc>

d

A.真

B.False

C.1

D.-1

表达式Int(Rnd(0)*50)所产生的随机数范围是(B)。

A.(1,50)

B.(0,49)

C.(1,49)

D.(0,50)B)

下列关于过程的叙述中,错误的是(A)。

A.函数过程的返回值可以有多个

B.可以在事件过程中调用通用过程

C.事件过程是由某个事件触发而执行的过程

D.不能在事件过程中定义函数过程

设窗体上有一个文本框,名称为Text1,程序运行后,要求该文本框只能显示信息,不能接受输入的信息,以下能实现该操作的语句是(C)。

A.Text1.MaxLength=0

B.Text1.Visible=Flase

C.Text1.Enabled=Flase

D.Text1.Width=0

要使一个文本框可以显示多行文本,应设置为True的属性是(A)。

A.MultiLine

B.MaxLenth

C.Width

D.Enabled

设菜单中有一个菜单项为"

Open"

若要为该菜单命令设置访问键,即按下Alt及字母O时,能够执行"

命令,则在菜单编辑器中设置"

命令的方式是(B)。

A.把Name属性设置为O&

pen

B.把Caption属性设置为&

Open

C.把Caption属性设置为O&

D.把Name属性设置为&

Open

设在窗体Form1上有一个列表框List1,其中有若干个项目。

要求单击列表框中某一项时,把该项显示在窗体上,正确的事件过程是(C)。

A.PrivateSubList1_Click()

PrintForm1.Text

EndSub

B.PrivateSubForm1_Click()

List1.PrintList1.Text

C.PrivateSubList1_Click()

PrintList1.Text

D.PrivateSubForm1_Click()

在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程:

PrivateSubCommand1_Click()

  a$="

VisualBasic"

  PrintString(3,a$)

EndSub

程序运行后,单击命令按钮,在窗体上显示的内容是(A)。

A.VVV  

B.Vis  

C.11

D.sic

下列叙述中错误的是(C)。

A.一个VisualBasic应用程序可以含有多个标准模块文件

B.标准模块文件的扩展名是.bas

C.标准模块文件可以属于某个指定的窗体文件

D.一个VisualBasic工程可以含有多个窗体文件

设a=4,b=5,c=6,执行语句Printa<

bAndb<

c后,窗体上显示的是(A)。

B.出错信息

C.0

D.假

以下选项中,不合法的VisualBasic的变量名是(D)。

A.a_b

B.andif

C.a5b

D._xyz

执行下列程序段后,变量c$的值为(D)。

a$="

VisualBasicProgramming"

b$="

Quick"

c$=b$&

UCase(Mid$(a$,7,6))&

A.VisualBASICProgramming

B.QuickBasicProgramming

C.QUICKBasicProgramming

D.QuickBASICProgramming

在窗体(名称为Form1)上画一个名称为Text1的文本框和一个名称为Command1的命令按钮,然后编写一个事件过程。

程序运行后,如果在文本框中输入一个字符,则把命令按钮的标题设置为"

计算机等级考试"

下列能实现上述操作的事件过程是(B)。

A.PrivateSubCommand1_Click()

Text1.Text="

B.PrivateSubText1_Change()

Command1.Caption="

C.PrivateSubForm1_Click()

Text1.Caption="

D.PrivateSubCommand1_Click()

Caption="

设窗体上有1个滚动条,要求单击滚动条右端的按钮一次,滚动块移动一定的刻度值,决定此刻度值的属性是(B)。

A.Max

B.SmallChange

C.Min

D.LargeChange

若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click事件过程被调用的操作是(B)。

A.用鼠标右键单击此按钮

B.按键盘上的回车键

C.用鼠标右键双击此按钮

D.按键盘上的Esc键

以下关于多窗体的叙述中,正确的是(A)。

A.任何时刻,只有一个当前窗体

B.向一个工程添加多个窗体,存盘后生成一个窗体文件

C.只有第一个建立的窗体才是启动窗体

D.打开一个窗体时,其他窗体自动关闭

设窗体上有一个标签Label1和一个计时器Timer1,Timer1的Interval属性被设置为1000,Enabled属性被设置为True。

要求程序运行时每秒在标签中显示一次系统当前时间。

以下可以实现上述要求的事件过程是(B)。

A.PrivateSubTimer1_Timer()

Label1.Caption=True

EndSub

B.PrivateSubTimer1_Timer()

Label1.Caption=Time$

C.PrivateSubTimer1_Timer()

Fork=1ToTimer1.Interval

Label1.Caption=Timer

Nextk

D.PrivateSubTimer1_Timer()

Label1.Interval=1

设x=4,y=8,z=7,以下表达式的值是(A)。

  x>

zOrz=y

A.False

B.True  

C.-1

D.1

DimaAsInteger,sAsInteger

a=8

s=1

s=s+a

a=a-1

LoopWhilea<

=0

Prints;

a

程序运行后,单击命令按钮,则窗体上显示的内容是(B)

A.死循环

B.97

C.340

D.79

在窗体上画一个命令按钮和一个标签,其名称分别为Command1和Label1,然后编写下列事件过程:

PrivateSubCommand1_Click()

Counter=0

Fori=1To4

Forj=6To1Step-2

Counter=Counter+1

Nextj

Nexti

Label1.Caption=Str(Counter)

程序运行后,单击命令按钮,标签中显示的内容是(D)。

A.16

B.11

C.20

D.12

在窗体上画一个命令按钮(名称为Command1),并编写如下代码:

Functionfun1(ByValaAsInteger,bAsInteger)AsInteger

DimtAsInteger

t=a-b

b=t+a

fun1=t+b

EndFunction

DimxAsInteger

x=10

Printfun1(fun1(x,(fun1(x,x-1))),x-1)

程序运行后,单击命令按钮,输出结果是(C)。

A.21

D.10

若在窗体模块的声明部分声明了如下自定义类型和数组

PrivateTyperec

CodeAsInteger

CaptionAsString

EndType

Dimarr(5)Asrec

则下面的输出语句中正确的是(A)。

A.Printarr

(2).Code,arr

(2).Caption

B.Printarr.Code

(2),arr.Caption

(2)

C.Printarr.Code,arr.Caption

D.PrintCode

(2),Caption

(2)

在窗体上面有1个名称为Command1的命令按钮,然后编写下列事件过程

OptionBase1

Dima(5,5)AsInteger

Fori=1To5

Forj=1To5

a(i,j)=(i+j)*5\10

s=0

Fori=1To5

s=s+a(i,i)

Prints

程序运行后,单击命令按钮,输出结果是(B)。

A.9

B.15

D.13

某人编写了下面的程序,希望能把Text1文本框中的内容写到out.txt文件中

PrivateSubComand1_Click()

Open"

out.txt"

ForOutputAs#2

Print"

Text1"

Close#2

调试时发现没有达到目的,为实现上述目的,应做的修改是(A)。

A.把Print"

改为Print#2,Text1

B.把Print"

改为Write"

C.把所有#2改为#1

D.把Print"

改为PrintText1

在窗体上画一个命令按钮,其名称为Command1,然后编写如下代码:

Dima

a=Array(1,2,3,4)

j=1

Fori=4To1Step-1

s=s+a(i)*j

j=j*10

程序运行后,单击命令按钮,其输出结果是(D)。

A.34

B.12

C.4321

D.1234

在窗体上画一个命令按钮,名称为Command1。

然后编写如下程序:

Fori=1To4

Forj=0Toi

PrintChr$(65+i);

Print

程序运行后,如果单击命令按钮,则在窗体上显示的内容是(A)

A.BB

CCC

DDDD

EEEEE

B.B

CC

DDD

EEEE

C.A

BB

D.AA

BBB

CCCC

DDDDD

微处理器处理的数据基本单位为字,一个字的长度通常是(C)。

A.32个二进制位

B.16个二进制位

C.与微处理器芯片的型号有关

D.64个二进制位

Windows中,若已选定某文件,不能将该文件复制到同一文件夹下的操作是(B)。

A.无

B.用鼠标左键将该文件拖动到同一文件夹下

C.用鼠标右键将该文件拖动到同一文件夹下

D.先执行"

编辑"

菜单中的复制命令,再执行粘贴命令

Windows中,进行"

剪切"

操作的快捷键是(B)。

A.Ctrl+A

B.Ctrl+X

C.Ctrl+C

D.Ctrl+V

在页眉或页码插入的日期域代码在打印时(C)。

A.变或不变根据用户设置

B.固定不变

C.随实际系统日期改变

D.无法预见

在Excel中,对工作表的数据进行一次排序,排序关键字是(A)。

A.最多三列

B.任意多列

C.只能两列

D.只能一列

在PowerPoint中,设置幻灯片放映时间的命令是(A)。

A.“幻灯片放映→排练计时”命令

B.“插入→日期和时间”命令

C.“幻灯片放映→预设动画”命令

D.“幻灯片放映→动作设置”命令

ADSL可以在普通电话线上提供10Mbps的下行速率,即意味着理论上ADSL可以提供下载文件的速度达到每秒__A____。

A.10×

1024×

1024位

B.1024字节

C.10×

1024位

D.10×

1024字节

在程序运行时,下面的叙述中正确的是(D)。

A.用鼠标右键单击窗体中无控件的部分,会执行窗体的Form_Load事件过程

B.装入窗体后,每次显示该窗体时,都会执行窗体的Form_Click事件过程

C.用鼠标左键单击窗体的标题栏,会执行窗体的Form_Click事件过程

D.只装入而不显示窗体,也会执行窗体的Form_Load事件过程

下列关于VisualBasic特点的叙述中,错误的是(C)。

A.构成VisualBasic程序的多个过程没有固定的执行顺序

B.VisualBasic程序既可以编译运行,也可以解释运行

C.VisualBasic程序不是结构化程序,不具备结构化程序的3种基本结构

D.VisualBasic是采用事件驱动编程机制的语言

设窗体中有一个文本框Text1,若在程序中执行了Text1.SetFocus,则触发(A)。

A.Text1的GotFocus事件

B.Text1的SetFocus事件

C.窗体的GotFocus事件

D.Text1的LostFocus事件

在VisualBasic中,表达式3*2\5Mod3的值是(B)。

A.0

B.1

C.3

D.出现错误提示

下面哪个属性肯定不是框架控件的属性(C)。

A.Caption

B.Enabled

C.Text

D.Left

下列可以正确定义2个整型变量和1个字符串变量的语句是(B)。

A.Dimn,mAsInteger,sAsString

B.Dimx%,yAsInteger,zAsString

C.Dima%,b$,cAsString

D.DimaAsInteger,b,cAsString

下列关于菜单的叙述中错误的是(C)。

A.弹出式菜单也用菜单编辑器编辑

B.各级菜单中的所有菜单项的名称必须惟一

C.同一子菜单中的菜单项名称必须惟一,但不同子菜单中的菜单项名称可以相同

D.弹出式菜单用PopupMenu方法弹出

以下关于菜单的叙述中,错误的是(D)。

A.当窗体为活动窗体时,用Ctrl+E键可以打开菜单编辑器

B.弹出式菜单在菜单编辑器中设计

C.程序运行时,利用控件数组可以实现菜单项的增加或减少

D.把菜单项的Enabled属性设置为False,则可删除该菜单项

设窗体的名称为Form1,标题为Win,则窗体的MouseDown事件过程的过程名是(D)。

A.Form1_MouseDown

B.MouseDown_Form1

C.Win_MouseDown

D.Form_MouseDown

设a=5,b=6,c=7,d=8,执行下列语句后,x的值为(D)。

x=IIF((a>

b)And(c>

d),10,20)

A.10

B.假

C.真

D.20

设a="

VisualBasic"

,下面使b="

Basic"

的语句是(D)。

A.b=Left(a,8,5)

B.b=Rigth(a,5,5)

C.b=Left(a,8,12)

D.b=Mid(a,8,5)

下列叙述中正确的是(D)

A.在调用过程时,所有局部变量被系统初始化为0或空字符串

B.局部变量的作用域可以超出所定义的过程

C.在窗体的Form_Load事件过程中定义的变量是全局变量

D.在某个Sub过程中定义的局部变量可以与其它事件过程中定义的局部变量同名,但其作用域只限于该过程

以下关于弹出式菜单的叙述中,错误的是(D)。

A.弹出式菜单在菜单编辑器中建立

B.弹出式菜单的菜单名(主菜单项)的“可见”属性通常设置为False

C.弹出式菜单通过窗体的PopupMenu方法显示

D.一个窗体只能有一个弹出式菜单

以下叙述中错误的是(D)。

A.移动鼠标时,会触发MouseMove事件

B.双击鼠标可以触发DblClick事件

C.控件的名称可以由编程人员设定

D.窗体或控件的事件的名称可以由编程人员确定

窗体的MouseDown事件过程

Form_MouseDown(ButtonAsInteger,ShiftAsInteger,XAsSingle,YAsSingle)

有4个参数,关于这些参数,正确的描述是(C)

A.参数X,Y用来设置鼠标当前位置的坐标

B.Shift参数只能用来确定是否按下Alt和Ctrl键

C.通过Button参数判定当前按下的是哪一个鼠标键

D.Shift参数只能用来确定是否按下Shift键

以下关系表达式中,其值为False的是(B)

A."

the"

<

"

they"

B.ABC"

AbC"

C."

VISUAL"

=UCase("

Visual"

D."

Integer"

Int"

为了消除窗体上的一个控件,下列正确的操作是(C)。

A.按回车键

B.选择(单击)要清除的控件,然后按回车键

C.选择(单击)要清除的控件,然后按<

Del>

D.按<

Esc>

用来设置文字字体是否斜体的属性是(A)。

A.FontItalic

B.FontBold

C.FontUnderline

D.FontSlope

列表框中的项目保存在一个数组中,这个数组的名字是(A)。

A.List

B.Style

C.Column

D.MultiSelect

设程序中有如下数组定义和过程调用语句:

Dima(10)AsInteger

......

Callp(a)

如下过程定义中,正确的是(B)。

A.PrivateSubp(a(n)AsInteger)

B.PrivateSubp(a()AsInteger)

C.PrivateSubp(aAsInteger)

D.PrivateSubp(a(10)AsInteger)

在窗体上画一个名称为Text1的文本框,然后画一个名称为HScroll1的滚动条,其Min和Max属性分别为0和100。

程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值。

以下能实现上述操作的程序段是(B)。

A.PrivateSubHscroll1_Click()

  Text1.Text=HScroll1.Value

 EndSub

B.PrivateSubHscroll1_Change()

C.PrivateSubHscroll1_Click()

  Text1.Text=Hscroll1.Caption

D.PrivateSubHscroll1_Change()

以下能正确定义数据类型TelBook的代码是(A)。

A.TypeTelBook

NameAsString*10

TelNumAsInteger

EndType

B.TypedefTelBook

NameString*10

TelNumInteger

EndType

C.TypeTelBook

NameString*10

TelNumInteger

EndTypeTelBook

D.TypeTelBook

NameAsString*10

TelNumAsInteger

End

展开阅读全文
相关资源
猜你喜欢
相关搜索

当前位置:首页 > 高中教育 > 理化生

copyright@ 2008-2022 冰豆网网站版权所有

经营许可证编号:鄂ICP备2022015515号-1