内容发布更新时间 : 2024/11/19 1:34:34星期一 下面是文章的全部内容请认真阅读。

常用标准控件作业

一、选择题

1．下列关于属性设置的叙述错误的是_______B__。

A．一个控件具有什么属性是Visual Basic预先设计好的，用户不能改变它 B．一个控件具有什么属性值是Visual Basic预先设计好的，用户不能改变它 C．一个控件的属性既可以在属性窗口中设置，也可以用程序代码设置

D．一个控件的属性在属性窗口中设置后，还可以再利用程序代码为其设置新值 2．以下过程是标签Label1的___A______事件。 Prviate Sub Label1_Click( ) End Sub

A.单击 B.双击 C.拖拽 D.移动

3．下列控件中可设置滚动条是____C_____。

A.检查框（复选框） B.框架 C.文本框 D.标签框 4．标签所显示的内容，由___C______属性值决定。 A. Text B. Name C. Caption D. Alignment 5．定时器的定时间隔单位是__C_______。 A. 秒 B. 微秒 C. 毫秒 D. 分

6．检查框（复选框）的控件名称为______B___。

A. OptionBotton B. CheckBox C. PictureBox D. Image

7．若要求向文本框输入密码时，只在文本框中显示&号，则应当在此文本框的属性窗口中设置______D___。 A. Text属性值为 & B. Caption属性值为 &

C. PasswordChar属性值为空 D. PasswordChar属性值为 & 8．若要设置定时器的定时间隔，可通过__A_______属性来设置。 A. Interval B. Value C. Enabled D. Text

9．若要设置定时器的定时间隔设为5秒，应将Interval属性值设为_D________。 A. 5 B. 50 C. 500 D. 5000

10．若要使不可见命令按钮显示出来，可通过设置_____A____属性的值为True来实现。 A.Visible B.Enabled C.Default D.Value

11．若要使定时器起作用，应将其__D_______属性设置值设为True。 A.Interval B.Value C.Text D.Enabled

12．若要使命令按钮失效，可设置_____B____属性为False来实现。 A.Value B.Enabled C.Visible D.Cancel 13．若要向列表框新增列表项，可使用_____D____方法来实现。 A.Add B.RemoveItem C.Clear D.AddItem

14．要获得垂直滚动条Vscrollbar控件所能表示的最大值，可通过调用该控件的_____B____ 属性来实现。

A.Value B.Max C.Min D.LargeChange

15．要将命令按钮上的文字设置为“粗体”可通过设置__B_______属性值为True来实现。 A.FontItalic B.FontBold C.FontUnderline D.FontSize

16．要将命令按钮上的文字设置为“斜体”可通过设置____A_____属性值为True来实现。 A.FontItalic B.FontBold C.FontUnderline D.FontSize 17．要将命令按钮上的字体设为“隶书”，可设置______C___的属性为“隶书”。 A.FontBold B.BackItalic C.FontName D.FontSize 18．以下选项中，不属于单选按钮属性的是____D_____ A.Enabled B.Caption C.Name D.Min

19．组合框的风格可通过____C_____属性来设置。

A.BackStyle B.BorderStyle C.Style D.Sorted 20．标签的边框由_____C____属性的设置来决定。

A.BackColor B.BackStyle C.BorderStyle D.AutoSize 21．单选按钮的控件名称为____D_____。

A.Botton B.CheckBox C.PictureBox D.OptionBotton 22．单选按钮的当前状态可通过___A______属性来访问。

A.Value B.Checked C.Selected D.Caption 23．当滚动条中的滑块位置变化时，将触发其___C______事件。

A.LostFocus B.SetFocus C.Change D.GetFocus

24．假定Picture1和Form1分别为图片框和窗体的名称，以下语句___A______可清除图片框中的文本信息。

A.Picture1.cls B.Picture1.clear C.Form1.cls D.Form1.clear 25．确定一个窗体或控件的大小的属性是_____B____。 A.Width或Height B.Width和Height C.Top或Left D.Top和Left

26．确定一个控件在窗体上的位置的属性是____D_____。 A.Width或Height B.Width和Height C.Top或Left D.Top和Left

27．若要获得当前列表项的数目，可通过访问____D_____属性来实现。 A.Columns B.Text C.ListIndex D.ListCount

28．若要获得滚动条的当前值，可通过访问_____B____属性来实现。 A.Text B.Value C.Max D.Min

29．若要将命令按钮设置为默认按钮，可设置___D______属性为True来实现。 A.Cancel B.Value C.Enabled D.Default

30．若要清除列表框中列表项，可使用____C_____方法来实现。 A.Add B.RemoveItem C.Clear D.AddItem

31．若要设置文本框最大可接收的字符数，可通设置_____D____属性值来实现。 A.Multiline B.Length C.Min D.MaxLength 32．若要使标签成为透明，可通过设置____B_____属性来实现。

A.BackColor B.BackStyle C.BorderStyle D.ForeColor

33．若要使标签的大小自动与所显示的文本相适应，可通过设置_____A____属性的值为True来实现。 A.AutoSize B.Alignment C.Apperance D.Visible

34．若要使只读文本框成为可编辑文本框，可通设置___D______属性值为False来实现。 A.ReadOnly B.Unlock C.Enabled D.Locked

35．若要在列表框中同时选择多项，可通过设置列表框对象的_____C____属性来实现。 A.Columns B.Style C.MultiSelect D.List

36．用户在组合框中所输入的数据，可通过访问组合框对象的____A_____属性来获得。 A.Text B.List C.List index D.ListCount

37．用鼠标选择列表框中的项目，将触发其____C_____事件。 A.Change B.Click C.Select D.ItemCheck

38．在VB 窗体要设计两组单选按钮，应用____D_____控件对其分组。 A.Picture B.Image C.Label D.Frame

39．在图片框(PictureBox)中显示的图形，由对象的_____A____属性决定。 A. Picture B. Image C. Icon D. LoadPic 40．标签中内容的对齐方式，由_____D____属性值决定。 A.Text B.Name C.Caption D.Alignment 41．当拖动滚动条滑块时，将触发其_____C____事件。

A.LostFocus B.SetFocus C.Scroll D.GetFocus

42．假定Picture1,Form1，Text1，Label1分别为图片框、窗体、文本框、标签的名称，程序代码如下，单击图片框时，清除下列哪个对象的内容_____C____。 Private Sub Picture1_Click() Cls

End Sub

A.Picture1 B.Text1 C.Form D.Label1

43．假定Picture1和Text1分别为图片框和文本框的名称，下列不正确的语句是_____C____。 A.Print 25 B.Picture1.Print 25 C.Text1.Print 25 D.Debug.Print 25

44．若要将图片\载入到当前的图片框(PictureBox)中，应用____B_____命令。 A.LoadFile B.LoadPicture C.LoadPic D.LoadJPG

45．若要设置列表框的选择方式，可通过____C_____属性设置来实现。 A.Columns B.Style C.MultiSelect D.List

46．若要设置命令按钮为图形风格的按钮，可通过将______A___属性设置为Graphical。 A.Style B.BorderStyle C.BackStyle D.Apperance 47．若要使命令按钮获得控制焦点，可使用____B_____方法来设置。 A.Refresh B.SetFocus C.GetFocus D.LostFocus

48．要设置Hscrollbar控件在单滚动箭头时Value属性值的变化幅度，可通过调用该控件的______B___ 属性来实现。

A.Value B.SmallChange C.Min D.LargeChange

49．要把一个命令按钮设置成无效，应设置其哪一个属性值____B_____。 A．Visible B．Enabled C．Default D．Cancel

50．执行x$=InputBox（\请输入x的值\）时，在弹出的对话框中输入123，在列表框Listl选中第1个列表项（数据为456）。使y的值是123456的语句是____D_____。

A．y=x$+Listl．List(1) B．y= Val(x$)+Val(Listl．List(0)) C．y=Val(x$)+Val(Listl．List(1)) D．y=Val(x$)&Val(Listl．List(0)) 51．要设置计时器控件的定时时间，需设置的属性是______A___。 A．Interval B．Enabled C．Value D．Text 52．移动控件位置的组合按键是_____C____。 A．Shift键+“方向箭头” B．Alt键+“方向箭头” C．Ctrl键+“方向箭头” D．Space键+“方向箭头”

53．控制名称都是系统的默认控件名，下列语句错误的是_____C____。

A．Command1.Caption=List1.Text B．Label1.Caption=List1.List(1)

C．List1.List(2)=List1.Text+Str(List1.ListIndex) D．Text1.Text=List1.Name+Text1.Caption

54．窗体中含有一个滚动条Hscroll1、一个标签Label1、一个形状控件Shape1。滚动条的属性Max、Min、LargeChange、SmallChange值分别为1000、0、50、10。形状为一个红圆。代码如下： Private Sub Hscroll1_Change() Label1.Caption = \End Sub

Private Sub Hscroll1_Scroll() Label1.Caption = \Shape1.Left = HScroll1.Value End Sub

运行时，用户单击滚动条右端箭头但是不释放左键时，标签显示_________，红圆_________；用户拖动滑块时，标签显示_________，红圆_________。 则依次填入以上各空正确的一项是____A_____。 A．Changed、不移动、Changing、向右移动 B．Changing、不移动、Changed、向右移动 C．Changed、向右移动、Changing，不移动 D．Changing、向右移动、Changed、不移动

55．窗体上有一个命令按钮Command1、一个文本框Text1和一个列表框List1。文本框用来输入要添加到列表框中的项目内容。程序运行后，单击命令按钮，会将文本框中的内容放入列表框中。程序如下： Private Sub Commandl_Click() _____________ Textl.Text=\Textl.SetFocus End Sub

程序的空白行应填写语句____D_____。

A．List1.Text=Text1.Text B．List1.List=Text1.Text

C．List1.AddItem=Text1.Text D．List1.AddItem Text1.Text 56．不能触发滚动条Change事件的操作是_____A____。 A．拖动滚动条中滑块 B．单击滚动条中滑块

C．单击滚动条两端箭头 D．单击箭头与滑块之间的滚动条 二、填空题

1．单选按钮控件（OptionButton）和复选框（CheckBox）控件都有Value属性，它们有什么区别__ Option1.value=true or false ,check1.value=0 or 1 or 2 _______。

2．向列表框控件添加项目和从列表框控件中删除项目所使用的方法的格式分别是_list1.additem 项目内容(，项目位置) _和__list1.removeitem项目位置__。

3．在设计阶段看得见，在运行阶段看不见的控件是___时钟___控件，使用该控件时一定要用到的属性项是__Interval_______。

数组作业

一、选择题

1．默认情况下，语句：Dim student(100) 定义的数组有_____D____个元素。 A.100 B.10 C.任意 D.101

2．语句：Dim student(10,5 to 100) 定义的是一个_____A____维数组。 A.2 B.3 C.5 D.10

3．控件数组是通过_________来区分控件数组元素的。

A.名称 B.Count属性 C.Index属性 D.控件标题

4．有一数组定义语句：Dim M(-2 to 1) As string，则数组M中包含的元素个数为______A___。 A.4 B.3 C.2 D.1

5．语句：Dim student(10,5) As Long定义的数组元素的类型为_____D____。 A.整型 B.字符型 C.逻辑型 D.长整型

6．默认情况下，语句：Dim student(2,3,4) 定义的数组有___A______个元素。 A.60 B.9 C.24 D.12

7．有以下数组声明语句：Option Base 1: Dim A(3,2 to 4)，则数组A有_____D____个元素。 A.3 B.4 C.12 D.9 8．下列程序 Option Base 1

Private Sub Form_Click() Dim a(100) For i=1 To 10 j=i*i a(j)=j