vb练习Word格式文档下载.docx
- 文档编号:6229721
- 上传时间:2023-05-06
- 格式:DOCX
- 页数:59
- 大小:403.79KB
vb练习Word格式文档下载.docx
《vb练习Word格式文档下载.docx》由会员分享,可在线阅读,更多相关《vb练习Word格式文档下载.docx(59页珍藏版)》请在冰点文库上搜索。
A、Max=IIf(x>
y,x,y)
B、Ify>
=xThenMax=y:
Max=x
C、Ifx>
yThenMax=xElseMax=y
D、Max=x:
Ify>
=xThenMax=y
循环语句Fori=20To10Step-2的循环次数为____A______。
B、4
C、不循环
D、5
执行语句receive=MsgBox("
AAAA"
,"
BBBB"
"
"
5)后,所产生的信息框的标题是B______。
A、AAAA
B、BBBB
C、空
D、出错,不能产生信息框
由Array函数建立的数组,其变量必须是C_______类型
A、字符型
B、整型
C、变体型
D、字符串类型
如果单击一个当前没有被选中的复选框,其它已被选中的复选框会处于___C_____。
A、禁止
B、不选中
C、选中
D、不显示
设置复选框或单选按钮标题对齐方式的属性是_D_____。
A、Align
B、Sorted
C、Value
D、Alignmen
使用___B_____方法将新的项添加到一个列表框中。
A、Print
B、AddItem
C、Insert
D、Add
在设计弹出式菜单时,必须把菜单名的Visible属性设置为_D______。
A、True
B、Enabled
C、Visible
D、False
用户按下键盘上任意一个键时被触发的事件是C_______。
A、Key
B、KeyUp
C、KeyDown
D、KeyPress
程序题(12)
PrivateSubform_click()
s=0
i=1
DoWhilei<
=100
IfiMod10<
>
0Then
s=s+i
i=i+1
Else
EndIf
Loop
Prints
EndSub
运行后,输出的结果是__C_____
A、4000
B、4050
C、4500
D、5050
程序题(32)
下列程序执行后M,N,D的值分别为:
B
PrivateSubForm_click()
t=365
M=tMod60
N=Int(t/60)
D=t\60
PrintM;
N;
D
EndSub
A、666
B、566
C、656
D、5;
6;
6
程序题(36)
下面程序是输出如下矩阵,请填空
123
234
345
PrivateSubForm_click()
Fori=1To3
Forj=1To3
Print___D____________;
Next
A、i+j+1
B、i
C、i+j
D、i+j-1
程序题(53)
执行下面程序段后,X的值为23,请填空D
X=5
i=20
Dowhilei>
x=x+i\5
i=i-___
Printx
B、3
C、4
D、2
程序题(63)
a=0
Forj=1To10
a=a+jMod2
Nextj
Printa
运行后,输出的结果是_C______。
A、4
B、6
C、5
D、8
如果菜单标题的某个字母前输入一个_____符号,那么该字母就成了热键字母。
&
MsgBox函数的返回值的类型为_____。
数值型
关闭所有已经打开的文件,应使用语句_____。
CLOSE
close
Close
'
【程序设计】
-------------------------------------------------
题目:
(事件)双击窗体。
(响应)求出100~200之间,能被5整除,但不能被3整除的数。
并求所有数之和,存入变量中SUM中
PrivateSubForm_dblClick()
DimsumAsInteger
sum=0
**********Begin*********
**********End*************
Printsum
TestFunc(sum)
PrivateSubTestFunc(iAsInteger)
DimOUTAsInteger
OUT=FreeFile
OpenApp.Path&
"
\17.out"
ForOutputAs#OUT
Print#OUT,i
Close#OUT
【参考代码】
DimiAsInteger
Fori=100To200
If((iMod5)=0)And((iMod3)<
0)Then
Print(CStr(i))
sum=sum+i
Next
若要使命令按钮不可操作,要对___B_______属性进行设置
A、Caption
D、BackColor
要使控件在运行时不可显示,应对__C________属性进行设置
使文本框获得焦点的方法是_A__________。
在一行语句内写多条语句时,每个语句之间用_____B_____符号分隔
A、;
B、:
C、,
D、、
当文本框的MaxLength属性值取_C_______时,该文本框能容纳的字符数最多。
A、256
B、512
C、0
D、-1
下面__D________是合法变量名
A、X-Y
B、integer
C、123abc
D、X_yz
下列控件中可用于接受用户输入文本,又可用于显示文本的是__A___。
A、TextBox控件
B、CommandButton控件
C、Label控件
D、Timer控件
rnd函数不可能为下列_____D_____值
A、0
B、0.1234
C、0.0005
D、1
与数学表达式(ab)/(3cd)对应,不正确的VB算术表达式是_D_________
A、a*b/3/c/d
B、a/3*b/c/d
C、a*b/(3*c*d)
D、a*b/3*c*d
InputBox函数返回值的类型为__B_____。
A、变体
B、字符串
C、数值
D、数值或字符串(视输入的数据而定)
循环语句Fori=10To20Step-2的循环次数为____A______。
A、不循环
B、5
D、6
VisualBasic有三种工作模式,它们分别是D________模式。
A、设计、编译和运行
B、设计、运行和调试
C、编译、运行和调试
D、设计、运行和中断
设有数组说明语句:
Dim c(1To10),则下面表示数组c的元素选项中错误的是____B____。
A、c(i)
B、c(0)
C、c(10)
D、c(3+4)
以下说法不正确的是__D__________。
A、使用Redim语句可以改变数组每维数的大小
B、使用Redim语句可以对数组的元素初始化
C、使用Redim语句可以改变数组的维数
D、使用Redim语句可以改变数组的类型
要在子过程的过程体中退出子过程应使用_A______语句。
A、ExitFor
B、ExitFunction
C、ExitSub
D、ExitDo
下面子过程说明合法的是__B______。
A、Subf1(n%)AsInteger
B、Functionf1%(ByValn%)
C、Subf1(ByValn%())
D、Functionf1%(f1%)
若能在多个窗体中访问同一定义的Sub子过程,最合适的应将过程定义放在__D________中。
A、工程
B、窗体模块
C、类模块
D、标准模块
复选框的Value属性的值表示复选框的状态,若状态为被选定时,其值为_D_______。
A、2
B、True
要使图像框可以自动调整图形的大小,则需设置__C_______属性。
A、Appearance
B、AutoRedraw
C、Stretch
D、Autosize
如果列表框List1中已有10项数据,应使用语句_C_____将数据"
Mydata"
插入到列表框的第3项。
A、List1.Insert"
3
B、List1.Insert"
2
C、List1.AddItem"
D、List1.AddItem"
3
鼠标单击时被触发的是__D_____事件。
A、DblClick
B、MouseUp
C、MouseDown
D、Click
用户释放键盘上任意一个键时被触发的事件是_C______。
A、KeyPress
B、KeyDown
C、KeyUp
D、Key
程序题(70)的功能是:
在窗体上画一个名称为Command1的命令按钮,编写下列程序:
PrivateSubCommand1_Click()
DimaAsInteger,bAsInteger
a=45:
b=36
dountila=b
ifa>
bthena=a-belseb=b-a
loop
Endsub
A、求a,b的最小公倍数
B、比较a,b大小
C、比较a,b是否相等
D、求a,b的最大公约数
Forj_C___
a(i,j)=Int(Rnd*9)+1
PrintTab(j*5);
a(i,j);
Nexti
A、=1To10-i
B、=1To10
C、=iTo10
D、=1Toi
程序题(26).
下列程序执行后,整型变量n的值为D
n=0
fori=1to100
ifimod4=0thenn=n+1
nexti
A、5050
B、33
C、26
D、25
程序题(40)
下列程序的输出结果_____B__________。
FunctionM(x,yAsInteger)AsInteger
M=x+10*y
EndFunction
PrivateSubCommand1_Click()
DimaAsInteger,bAsInteger
a=1:
b=2
PrintM(a+b,b-a)
A、21
B、13
C、-9
D、23
要使窗体在运行时不可改变窗体的大小和没有最大化和最小化按钮,只要对_C_________属性设置就有效
A、Width
B、MinButton
C、BorderStyle
D、MaxButton
要求改变窗体的标题时,应当在属性窗口中改变的属性是_A____。
B、Label
C、Name
D、Text
若要命令按钮具有图形特性可通过___A_______属性来进行。
如果文本框的Enabled属性设为False,则__B______。
A、文本框的文本将变成灰色,用户仍然能改变文本框中的内容。
B、文本框的文本将变成灰色,并且此时用户不能将光标置于文本框上
C、文本框的文本将变成灰色,用户仍然能将光标置于文本框上,但是不能改变文本框中的内容。
D、文本框的文本正常显示,用户能将光标置于文本框上,但是不能改变文本框中的内容。
rnd函数不可能为下列___D_______值
在使用InputBox时,必须设置的参数是__B___________。
A、无
B、提示
C、标题
D、缺省
VisualBasic有三种工作模式,它们分别是__D_______模式。
从循环体DoWhile...Loop中退出,继续执行循环体后面的命令,应使用___B___。
A、Exit
B、ExitDo
C、ExitDoWhile
D、ExitLoop
由Array函数建立的数组,其变量必须是_C______类型
下面子过程说明合法的是_B_______。
在VisualBasic中要将一个窗体装载到内存中进行预处理,但不显示,应该使用语句____C__。
A、UnLoad
B、Hide
C、Load
D、Show
单选按钮(OptionButton)用于一组互斥的选项中。
若一个应用程序包含多组互斥条件,可在不同的____A_______中
A、框架控件(Frame)或图片框(PictureBox)
B、框架控件(Frame)或图象控件(Image)
C、组合框(ComboBox)或图片框(PictureBox)
D、组合框(ComboBox)或图象控件(Image)
程序题(69)
DimaAsInteger
StaticbAsInteger
a=a+b
b=b+4
Printa,b
程序运行后,单击该命令按钮三次后,屏幕上显示的值是_A_______。
A、812
B、48
C、04
D、412
程序题(27)
执行下面程序段后,X的值为C
Fori=1To20Step2
A、22
B、24
C、21
判断题:
设A=3,B=4,C=5,D=6,计算表达式A>
BANDC<
=DOR2*A>
C的值是False。
C
计时器每经过一个由InterVal属性指定的时间间隔就会触发一次Timer事件。
在代码中设置窗体Form2的字体大小为20点使用的语句为Form.FontSize=20
Text1.Caption="
pencil"
的语法是正确的。
在程序运行中,要想使用按钮变成看得见但不可操作,则应设置______的属性是False。
ENABLED
Enabled
enabled
printformat(32548.5,"
##,####.##"
)的输出结果是_32,548.5
____。
为了使列表框中的项目分为多列显示,需要设置的属性是_COLUMNS
columns
Columns
VB6.0识别对象靠的是对象的_NAME
Name
name
____属性。
如果要将变量a在过程中定义为静态的整型变量,应使用的语句是_____。
statica%
staticaasinteger
Statica%
StaticaAsInteger
设a="
北京"
,b="
Shanghai"
,则表达式LEFT(a,2)+STRING(3,"
-"
)+LEFT(b,8)构成的字符串是_____。
北京---Shanghai
MsgBox函数的返回值的类型为__数值型
InputBox函数返回值的类型为_字符型
)+LEFT(b,8)构成的字符串是___北京---Shanghai
组合框有3种不同的类型,这3种类型是下拉式列表框、简单组合框和___下拉式组合框
在窗体上有一个命令按钮,其名称为Command1,然后编写如下程序:
FunctionM(xAsInteger,yAsInteger)AsInteger
M=IIf(x>
y,x,y)
PrivateSubcommand1_Click()
a=100
b=200
PrintM(a,b)
结果为:
_200
语句A=C:
C=B:
B=A的作用是实现A、B的值互换。
程序题(50)
执行下列程序段后,输出结果为_C____
PrivateSubform_Click()
n=0
ForI=1To100Step2
IfIMod9=0Thenn=n+1
NextI
Printn
A、8
B、9
C、6
D、7
程序题(11)
Dims%,i%
i=100
=120
If(i\3)*3=iThen
s=s+1
运行后,输出的结果是_D______
A、13
C、11
如果列表框(List1)中没有被选定的项目,则执行List1.RemoveItemList1.ListIndex语句的结果是_A_______。
A、以上都不对
B、移去最后加入列表的一项
C、移去最后一项
D、移去第一项
通用过程可以通过执行“工具”菜单中的__D____命令来建立。
A、添加模块
B、添加窗体
C、通用过程
D、添加过程
声明一个长度为10个字节的字符串变量mstr,应使用__D____。
A、DimmstrAsString(10)
B、Dimmstr(10)AsString
C、DimmstrAs10
D、DimmstrAsString*10
循环语句Fori=20To10Step-2的循环次数为___A_______。
要使For语句fork=__To-5Step-2循环执行20次,循环变量的初值应是__B_______。
A、35
C、32
D、34
下面__D________是不合法的单精度常数
A、100!
B、100
C、1E+2
D、100.0D+2
能够将文本框控件隐藏起来的属性是_B____。
A、Clear
B、Visible
C、New
D、Hide
由Array函数建立的数组,其变量必须是__D_____类型
C、字符串类型
D、变体型
以下各表达式中,计算结果为0的是().A
A、FIX(12.4)+FIX(-12.6)
B、CINT(12.4)+CINT(-12.6)
C、INT(12.4)+INT(-12.6)
D、FIX(13.6)+FIX(-12.6)
VisualBasic的编程机制是().B
A、面向图形
B、事件驱动
C、面向对象
D、可视化
表达式25.28Mod6.99的值是().A
C、出错
下面程序段:
Dimm
m=Int((Rn((D)+1)+5
SelectCasem
Case6
Print"
优秀"
Case5
Print"
良好"
Case4
Pr
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- vb 练习