VB练习题之常用控件

合集下载

国家二级VB机试(常用标准控件)模拟试卷19

国家二级VB机试(常用标准控件)模拟试卷19

国家二级VB机试(常用标准控件)模拟试卷19(总分:60.00,做题时间:90分钟)一、选择题(总题数:30,分数:60.00)1.下列说法中,错误的是(分数:2.00)A.将焦点移至命令按钮上,按Enter键,则引发命令按钮的Click事件B.单击命令按钮,将引发命令按钮的Click事件C.命令按钮没有Picture属性√D.命令按钮不支持DblClick事件解析:解析:命令按钮最常用的事件是单击(Click)事件,当单击一个命令按钮或者焦点在命令按钮上时按下Enter键,都可以触发Click事件。

命令按钮不支持DblCIick事件。

命令按钮的Picture属性用于设置命令按钮中要显示的图形。

(注意:要使Picture属性的设置有效,命令按钮的style属性必须设置为“2.以下关于命令按钮的叙述中正确的是(分数:2.00)A.命令按钮上可以显示图片√B.命令按钮能够分别响应单击、双击事件C.程序运行时,不能改变命令按钮上的文字D.若命令按钮的Cancel属性设为True,焦点在其他控件上时,按下回车键与单击该按钮的效果相同解析:解析:命令按钮的Picture属性用来设置命令按钮上显示的图片;命令按钮只能响应单击事件而不能响应双击事件;程序运行时可以通过改变按钮的Caption属性值来改变命令按钮上的文字;Cancel属性用来设置窗体的“取消”按钮,程序运行时,按下<Esc>键将执行该命令按钮的单击事件过程,Defaull 属性用于设置窗体的缺省命令按钮,程序运行时,按下<Enter>键将执行该命令按钮的单击事件过程。

3.若已把一个命令按钮的Default属性设置为True,则下面可导致按钮的Click事件过程被调用的操作是(分数:2.00)A.用鼠标右键单击此按钮B.按键盘上的Esc键C.按键盘上的回车键√D.用鼠标右键双击此按钮解析:解析:本题考查的考点是有关Defaull属性的。

当某控件DefauIt属性设置为True时,运行状态下按下回车键等同于左键单击,即触发其Click事件。

vb6.0实验六习题与答案

vb6.0实验六习题与答案

vb6.0实验六习题与答案实验六专业_1、认识常用控件:单选按钮、复选框、框架、列表框、组合框、滚动条、滑动器(slider)、时钟、图形控件;2.学习在表单中创建常用控件2、学习在属性窗口和在程序代码中设置属性3、学习调用控件的方法4.学习编写每个控件、鼠标和键盘的事件过程。

二、实验内容1、单选按钮、复选框、框架1)将表格F1的标题设置为“复选框、框架和单选按钮”;将表格中复选框ch1、ch2ch1和CH2的高度和宽度分别设置为360和1000;程序运行时,check2处于非零状态。

FR1帧包含单选按钮OP1和op2。

2)设计窗体,要求①标题为“设置字体”;② 带边框的标签控件Label1以表格形式设置,高度和宽度分别为450和3800,标题为“欢迎VB”,字体大小为“4”,并显示在中间;③标题为“字体”框架包含两个标题分别为“楷体_gb2312”和“华文新魏”的单选按钮op1和op2;④ 标题为“Italic”的框架包含两个标题为“是”和“否”的单选按钮。

⑤ 编写相应控件的事件进程,使程序运行时,点击“Kaiti_gb2312”,标签控件的字体为Kaiti_gb2312,点击“Chinese New Wei”,标签控件的字体为Chinese New Wei;单击Yes,label控件的字体将为斜体。

单击“否”取消标签控件字体的斜体化。

privatesuboption1_click()标签1。

fontname=option1。

说明文字endsubprivatesuboption2_uu单击()label1.fontname=option2.captionendsubprivatesuboption3_click()label1.fontitalic=trueendsubprivatesuboption4_click()label1.fontitalic=falseendsub3)在窗体是设置设置框text1,其中文字为:黑体、四号、居中;设置单选按钮option1和option2,标题分别为“福州大学”和“阳光学院”,编写行当的事件过程,使得程序时,单击“福州大学”或“阳光学院”,在文本框中显示“福州大学”或“阳光学院”。

vb常用控件

vb常用控件
X=4
For i=1 to 4
For j=1 to 3
x=x+6
Next j
Next i
Print x
End Sub
以上程序段,程序的循环次数是
A.4 B.12 C.3 D.6
12.有如下Visual Bastc程序段:
Dim num As Integer
num=3
Do While num<8
Num=num+2
15.下面程序执行的结果是
Private Sub Form_Click()
A = "123": B = "456"
C = Val(A) + Val(B)
Print C \ 100
End Sub
A.123 B.3 C.5 D.579
16.有如下程序段
x = 1
y = 4
Do While y>4
x = x * y
2.在VB程序中,对于语句:
Text1.Text="admin2006@" ‘电子信箱
“‘”后面的部分为
A、注释,不是可执行代码
B、注释,是可执行代码
C、程序代码的一部分
D、程序代码的另一种写法
3.以下程序段执行后整型变量n的值为
n=0
for i=1 to 20 step 5
n=n+i
则在文本框Text1中显示的信息是
A、software and hadrwareB、software
C、hadrwareD、1
19、有如下程序段
a=4
b=5
a=a^2+b
b=b^2+a

VB常用控件填空题

VB常用控件填空题

班级姓名座号
一、VB常用控件填空题
Visual Basic语言预定义了窗体、按钮、文本框、标签等控件类,正是VB编程人员在创建设计应用程序所需的常用控件,了解掌握这些控件的属性数据项、方法程序和响应事件的接口是学习使用VB编程的关键内容,请同学们回答问题,识记并掌握好以下题目所体现的知识内容:
1)窗体
二、判断题
三、VB编程体验
创建一个统计奖牌总数统计的应用程序,如下图所示,包括form窗体、label标签、textbox文本框、commandbutton按钮对象。

执行示范
'标题为“计算”按钮的“单击”事件过程
Private Sub Command1_Click()
Dim a As Integer, b As Integer, c As Integer
a = Text1.Text
b = Text1.Text
c = Text1.Text
Label4.Caption = "奖牌总数为" & a + b + c
End Sub
'标题为“退出”按钮的“单击”事件过程
Private Sub Command2_Click()
End
End Sub
体验完毕,保存后,把其中扩展名为Frm的窗体文件、扩展名为vbp的工程文件,连同本作业文件一并上交到作业收件箱。

vb常用控件习题(含答案)

vb常用控件习题(含答案)

1.下列控件中没有Caption属性的是。

A)框架B)列表框C)复选框D)单选按钮2.复选框的Value属性为1时,表示。

A)复选框未被选中B)复选框被选中C)复选框内有灰色的勾D)复选框操作有误3.用来设置斜体字的属性是。

A)FontItalicB)FontBoldC)FontNameD)FontSize4.将数据项“China”添加到列表框Listl中成为第二项应使用语句。

A)List1.AddItem“China”,1B)List1.AddItem“China”,2C)List1.AddItem1,“China”D)List1.AddItem2,“China”5.引用列表框Listl最后一个数据项,应使用语句。

A)List1.List(List1.ListCount)B)List1.List(ListCount)C)List1.List(List1.ListCount-1)D)List1.List(ListCount-1)6.假如列表框Listl有四个数据项,那么把数据项“China”添加到列表框的最后,应使用语句。

A)List1.AddItem3,“China”B)List1.AddItem“China”,List1.ListCount-1C)List1.AddItem“China”,3D)List1.AddItem“China”,List1.ListCount7.执行了下面的程序后,列表框中的数据项有。

PrivateSubForm_Click()Fori=1to6List1.AddItemiNextiFori=1to3List1.RemoveItemiNextiEndSubA)1,5,6B)2,4,6C)4,5,6D)1,3,58.如果列表框List1中没有选定的项目,则执行List1.RemoveItemList1.ListIndex语句的结果是。

A)移去第一项B)移去最后一项C)移去最后加入列表中的一项D)以上都不对9.如果列表框List1中只有一个项目被用户选定,则执行Debug.PrintList1.Selected(List1.ListIndex)语句的结果是。

国家二级VB机试(常用标准控件)模拟试卷31(题后含答案及解析)

国家二级VB机试(常用标准控件)模拟试卷31(题后含答案及解析)

国家二级VB机试(常用标准控件)模拟试卷31(题后含答案及解析) 题型有:1. 选择题选择题1.下面控件中,没有Caption属性的是( )。

A.复选框B.单选按钮C.组合框D.框架正确答案:C解析:Caption属性是设置或返回控件的标题。

组合框没有Caption属性。

故选C)。

知识模块:常用标准控件2.窗体上有名称为List1的列表框。

以下能够将列表框当前选定的列表项替换为字符串“Basic”的语句是( )。

A.List1.Addhem“Basic”B.List1.List(Listl.ListIndex)=“Basic”C.List1.Text=“Basic”D.以上都可以正确答案:B解析:AddItem用于将列表项添加到列表框。

Text属性是被选定的选项的文本内容。

列表框的List属性用来列出表项的内容,也可以改变数组中的已有值,属性ListIndex用于返回当前选择的列表项的索引号。

选项B)正确。

知识模块:常用标准控件3.如果在列表框List1中没有选中项目,则List1.ListIndex的值为( )。

A.一1B.0C.1D.2正确答案:A解析:列表框List1中没有选中项目,则List1.ListIndex的值为一1。

知识模块:常用标准控件4.在窗体上画一个名称为Listl的列表框,然后编写如下程序:Private Sub Form_Click( ) For i=l To 10 Item=“Item”&i Listl.AddItem Item Next i End Sub程序运行时,单击窗体,所完成的功能是( )。

A.向列表框中添加10个项目B.向列表框中添加11个项目C.向列表框中添加10个数字D.向列表框中添加1~10的和正确答案:A解析:Addhem为添加项目。

循环体执行10次,添加了10个项目。

选A)。

知识模块:常用标准控件5.列表框中被选中的数据项的位置可以通过一个属性获得,这个属性是( )。

国家二级VB机试常用标准控件-试卷5_真题-无答案

国家二级VB机试常用标准控件-试卷5_真题-无答案

国家二级VB机试(常用标准控件)-试卷5(总分62,考试时间90分钟)1. 选择题1. 为了使文本框显示滚动条,除要设置ScrollBars外,还必须设置的属性是A. AutoSizeB. AlignmentC. MultilineD. MaxLength2. 在窗体上画一文本框,其名称为Text1,为了在程序运行后隐藏该文本框,应使用的语句为A. Text1.ClearB. Text1.Visible=FalseC. Text1.HideD. Text1.Enabled=False3. 如果把文本框的Enabled属性设置为False并运行程序,则以下叙述中正确的是A. 文本框中的文本变为灰色,且不能将光标置于文本框上B. 文本框中的文本变为灰色,可以将光标置于文本框上,但不能改变文本框中的内容C. 文本框中的文本变为灰色,可以改变文本框中的内容D. 文本框中的文本正常显示,可以将光标置于文本框上,但不能改变文本框中的内容4. 要使标签中的文本靠右显示,应将其Aligment属性设置为A. 0-Left JustifyB. 1-Right JustifyC. 2-CenterD. 35. 下列关于标签的描述中,错误的是A. 标签可以响应Click事件B. 标签不能响应DblClick事件C. 为了使标签的WordWrap属性起作用,必须将其AutoSize属性设置为TrueD. 标签上显示的文本就是Caption属性的值6. 以下关于图片框控件的说法中,错误的是A. 可以通过Print方法在图片框中输出文本B. 图片框控件中的图形可以在程序运行过程中被清除C. 图片框控件中可以放置其他控件D. 用Stretch属性可以自动调整图片框中图形的大小7. 窗体上有1个Timer1计时器,1个Shape1形状控件,还有下面程序代码:Dim flag As Boolean Private Sub Timer1_Timer()Private Sub Form_Load() If flag Thenflag=True Shape1.Height=Shape1.Height*2Timer1.Enabled=True Shape1.Width=Shape1.Width*2Timer1.Interval=1000 ElseEnd Sub Shape1.Height=Shape1.Height*0.5Shape1.Width=Shape1.Width*0.5End Ifflag=Not flagEnd Sub执行程序所产生的效果是A. Shape1的尺寸在缩小到原来一半和恢复原状这2种状态间切换,每秒切换一一次B. Shape1的尺寸在扩大到原来2倍和恢复原状这2种状态问切换,每秒切换一次C. Shape1的尺寸在缩小到原来一半和扩大到原来2倍这2种状态问切换,每秒切换一一次D. Shaoe1的尺寸会不断扩大8. 以下不能用形状控件画出的图形是A. 矩形B. 圆形C. 椭圆D. 扇形9. 设窗体上有3个图像框:Image1、Image2、Image3,并有下面的程序代码:Private Sub Form_Load() Private Sub Image2_Click()Image1.Picture=LoadPicture("LEAF.bmp") Image3.Picture=Image2.PictureImage2.Picture=LoadPicture("OPEN.bmp") Image2.Picture=Image1.PictureImage3.Visible=False Image1.Picture=Image3.PictureEnd Sub End SubPrivate Sub Image1_Click()Image2.Picture=Image1.PictureEnd Sub在程序运行期间单击Image2,则在窗体上看到的结果是A. 在Image3中显示Image2中的图片B. Image1、Image2中原有图片被交换了C. Image1、Image2中都是原来Imegel中的图片D. Image1、Image2中都是原来Imege2中的图片10. 下列说法中,错误的是A. 将焦点移至命令按钮上,按Enter键,则引发命令按钮的Click事件B. 单击命令按钮,将引发命令按钮的Click事件C. 命令按钮没有Picture属性D. 命令按钮不支持DblClick事件11. 下面关于命令按钮的叙述中错误的是A. 命令按钮上可以显示图片B. 命令按钮上的文字就是其Caption属性的值C. 在程序运行过程中,不能改变命令按钮的标题D. 运行程序时,当命令按钮获得焦点后,按下回车键也能激活它的Crick事件12. 设窗体上有名称为Option1的单选按钮,且程序中有语句:If Option1.Value=True Then 下面语句中与该语句不等价的是A. If Option1.Value ThenB. If Option1=True ThenC. If Value=Tree ThenD. If Option1 Then13. 能够将组合框Combo1中最后一个数据项删除的语句为A. Combo1.RemoveItem Combo1.ListCountB. Combo1.RemoveItem Combo1.ListCount-1C. Combo1.RemoveItem Combo1.ListIndexD. Combo1.RemoveItem Combo1.ListIndex-114. 为了使一个复选框被禁用(灰色显示),应把它的Value属性设置为A. 0B. 1C. 2D. False15. 能够存放组合框的所有项目内容的属性是A. CaptionB. TextC. ListD. Selected16. 要将单选按钮Opt1设为被选中,应设置的属性是A. ValueB. SelectedC. EnabledD. SetFocus17. 窗体一卜有名称为List1的列表框。

VB常用控件介绍

VB常用控件介绍

VB常用控件介绍VB(Virtual Basic)是一种面向对象的编程语言,常用于开发各种图形用户界面(GUI)应用程序。

在VB中,控件是构成用户界面的基本元素,通过控件可以实现用户与程序的交互。

下面是一些常用的VB控件的介绍。

1. 按钮控件(Button):按钮是VB中最常用的控件之一,用于触发一些事件或执行一些动作。

通过设置按钮的文字、大小、位置和事件处理程序,可以实现各种用户交互功能。

3. 文本框控件(TextBox):文本框用于接收用户的输入,并可以将输入的文本保存到变量中。

可以设置文本框的大小、位置、边框样式等属性,并可以通过事件处理程序响应用户输入的变化。

4. 列表框控件(ListBox):列表框用于显示一组选项,并允许用户从中选择一个或多个选项。

可以通过添加和移除选项,以及设置列表框的大小、位置、滚动条等属性来定制列表框的外观和功能。

6. 复选框控件(CheckBox):复选框用于表示一个状态,可以被选中或取消选中。

常用于表示一个二进制选项,比如启用/禁用一些功能。

可以设置复选框的大小、位置、文本等属性,并可以通过事件处理程序获取用户的选择。

7. 单选按钮控件(RadioButton):单选按钮用于表示一组互斥的选项,用户只能选择其中的一个。

常用于表示一个多项选择,比如选择性别。

可以设置单选按钮的大小、位置、文本等属性,并可以通过事件处理程序获取用户的选择。

8. 进度条控件(ProgressBar):进度条用于显示任务的进度,可以根据任务的完成情况来改变进度条的长度和显示。

可以通过设置进度条的最小值、最大值、当前值等属性,以及处理进度改变的事件来定制进度条的功能。

9. 图像框控件(PictureBox):图像框用于显示图像或图表,可以加载本地或网络上的图像文件,并可以设置图像框的大小、位置等属性。

可以通过处理鼠标点击、鼠标移动等事件来实现与图像相关的交互功能。

10. 文件对话框控件(FileDialog):文件对话框用于让用户选择文件或保存文件,可以通过设置对话框的类型、过滤条件、默认目录等属性来限制用户的选择范围,并可以通过事件处理程序获取用户选择的文件路径。

  1. 1、下载文档前请自行甄别文档内容的完整性,平台不提供额外的编辑、内容补充、找答案等附加服务。
  2. 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
  3. 3、如文档侵犯您的权益,请联系客服反馈,我们会尽快为您处理(人工客服工作时间:9:00-18:30)。

1.下列控件中没有Caption属性的是________。

A)框架B)列表框C)复选框D)单选按钮2.复选框的V alue 属性为 1 时,表示________。

A)复选框未被选中B)复选框被选中C)复选框内有灰色的勾D)复选框操作有误3.用来设置斜体字的属性是________。

A)FontItalic B)FontBold C)FontName D)FontSize4.将数据项“China”添加到列表框List1中成为第二项应使用________语句。

A)List1.AddItem “China”,1 B)List1.AddItem “China ”, 2C)List1.AddItem 1,“China”D)List1.AddItem 2,“China ”5.引用列表框List1最后一个数据项,应使用________语句。

A)List1.List(List1.ListCount)B)List1.List(ListCount)C)List1.List(List1.ListCount-1)D)List1.List(ListCount-1)6.假如列表框List1有四个数据项,那么把数据项“China”添加到列表框的最后,应使用________语句。

A)List1.AddItem 3,“China ”B)List1.AddItem “China ”, List1.ListCount-1C)List1.AddItem “China ”, 3D)List1.AddItem “China”,List1.ListCount7.执行了下面的程序后,列表框中的数据项有________。

Private Sub Form_Click()For i = 1 to 6List1.AddItem iNext iFor i = 1 to 3List1.RemoveItem iNext iEnd SubA)1,5,6 B)2,4, 6 C )4,5,6 D)1,3,58.如果列表框List1中没有选定的项目,则执行List1.RemoveItem List1.ListIndex 语句的结果是________。

A)移去第一项B)移去最后一项C)移去最后加入列表中的一项D)以上都不对9.如果列表框List1中只有一个项目被用户选定,则执行Debug.Pring List1.Selected(List1.ListIndex)语句的结果是________。

A)在Debug窗口输出被选定的项目的索引值B)在Debug窗口输出TrueC)在窗体上输出被选定的项目的索引值D)在窗体上输出True10.在窗体上画一个名称为List1的列表框,一个名称为Label1的标签,列表框中显示若干城市的名称。

但单击列表框中的某个城市名时,该城市名从列表框中消失,并在标签中显示出来。

下列能正确实现上述操作的程序是______。

A)Private Sub List1_Click()Label1.Caption=List1.ListIndexList1.RemoveItem List1.TextEnd SubB)Private Sub List1_Click()=List1.ListIndexList1.RemoveItem List1.TextEnd SubC)Private Sub List1_Click()Label1.Caption=List1.TextList1.RemoveItem List1.ListIndexEnd SubD)Private Sub List1_Click()=List1.TextList1.RemoveItem List1.ListIndexEnd Sub11.下列说法中正确的是________。

A)通过适当的设置,可以在程序运行期间,让时钟控件显示在窗体上B)在列表框中不能进行多项选择C)在列表框中能够将项目按字母从大到小排序D)框架也有Click和DblClick事件12.为了防止用户随意将光标置于控件之上,应________设置。

A)将控件的TabIndex属性设置为0B)将控件的TabStop属性设置为TrueC)将控件的TabStop属性设置为FalseD)将控件的Enabled属性设置为False13.滚动条产生Change事件是因为________值改变了。

A)SmallChange B)V alueC)Max D)LargeChange14.如果要每隔15s产生一个Timer事件,则Interval属性应设置为________。

A)15 B)900 C )15000 D)15015.列表框的________属性是数组。

A)List 和ListIndex B)List 和ListCountC)List 和Selected D)List 和Sorted16.用户在使用ActiveX控件之前,需要将他们加载到工具箱中,下面________操作可进行ActiveX控件的加载。

A)工程-部件…B)视图-工具箱C)工具-选项…D)工程-引用17.在窗体上画一个列表框和一个文本框,然后编写如下两个事件过程:Private Sub Form_Load ()List1.AddItem"357"List1.AddItem"246"List1.AddItem"123"List1.AddItem"456"Text1.Text=""End SubPrivate Sub List1_ DblClick ( )a =List1.TextPrint a+Text1.TextEnd Sub程序运行后,在文本框中输入"789",然后双击列表框中的"456",则输出结果为________。

A)1245 B)456789 C )789456 D)018.在窗体上画一个列表框,然后编写如下两个事件过程:Private Sub Form_Click()List1.RemoveItem 1List1.RemoveItem 3List1.RemoveItem 2End SubPrivate Sub Form_Load()List1.AddItem "ItemA"List1.AddItem "ItemB"List1.AddItem "ltemC"List1.AddItem "ItemD"List1.AddItem "ItemE"End Sub运行上面的程序,然后单击窗体,列表框中所显示的项目为________。

A)ItemA与ItemB B)ItemB与ItemDC)ItemD与ItemE D)ItemA与ItemC19.假定在图片框Picture1中装入了一个图形,为了清除该图形(不删除图片框),应采用的正确方法是____。

:A)选择图片框,然后按Del键B)执行语句Picture1.Picture=LoadPicture(“”)C)执行语句Picture1.Picture=””D)选择图片框,在属性窗口中选择Picture属性,然后按回车键20.在窗体上画一个名称为Text1的文本框,然后画一个名称为HScroll1的滚动条,其Min和Max属性分别为0和100,程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值。

以下能实现上述操作的程序段是A) Private Sub HScroll1_Change()Text1.Text = HScroll1.ValueEnd SubB) Private Sub HScroll1_Click()Text1.Text = HScroll1.ValueEnd SubC) Private Sub HScroll1_Change()Text1.Text = HScroll1.CaptionEnd SubD) Private Sub HScroll1_ DblClick ()Text1.Text = HScroll1.ValueEnd Sub21.如果只允许在列表框中每次只能选择一个列表项时,则应将其Multiselect属性设置为:_____。

A)0 B)1 C)2 D)322.要将一个组合框设置为简单组合框(Simple Combo),则应该将其Style属性设置为______。

A)0 B)1 C)2 D)3答案:填空:下列程序段是允许用户按Enter键将一个组合框(CboComputer)中没有的项目添加到组合框中。

Sub CboComputer_Keypress(KeyAscii As Integer)Dim flag As BooleanIf KeyAscii = 13 Thenflag = FalseFor i = 0 To CboComputer.ListCount – 1If 【1】Thenflag = TrueExit forEnd IfNext iIf 【2】Then【3】ElseMsgBox(“组合框中已有该项目!”)End IfEnd IfEnd Sub【1】CboComputer.Text = CboComputer.List(i) 【2】Not flag 或flag=false 【3】CboComputer.AddItem CboComputer.Text。

相关文档
最新文档