界面练习及答案.docx

界面练习及答案.docx

《界面练习及答案.docx》由会员分享，可在线阅读，更多相关《界面练习及答案.docx（27页珍藏版）》请在冰豆网上搜索。

界面练习及答案

用户界面设计

一、单选题

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

A）框架         B）列表框             

C）复选框        D）单选按钮

2．复选框的Value属性为1时，表示________。

A）复选框未被选中                 B）复选框被选中

C）复选框内有灰色的勾               D）复选框操作有误

3．用来设置斜体字的属性是________。

A）FontItalic      B）FontBold      

C）FontName       D）FontSize

4．将数据项“China”添加到列表框List1中成为第二项应使用________语句。

A）List1.AddItem"China",1               

B）List1.AddItem"China",2     

C）List1.AddItem1,"China"           

D）List1.AddItem2,"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.AddItem3,"China"

B）List1.AddItem"China",List1.ListCount-1

C）List1.AddItem"China",3     

D）List1.AddItem"China"，List1.ListCount   

7．执行了下面的程序后，列表框中的数据项有________。

  PrivateSubForm_Click（）

    Fori=1to6

        List1.AddItemi

    Nexti

    Fori=1to3

        List1.RemoveItemi

    Nexti

  EndSub

A）1，5，6        B）2，4，6       

C）4，5，6        D）1，3，5

8．如果列表框List1中没有选定的项目，则执行

List1.RemoveItemList1.ListIndex语句的结果是________。

A）移去第一项                 B）移去最后一项

C）移去最后加入列表中的一项          D）以上都不对

9．如果列表框List1中只有一个项目被用户选定，则执行

Debug.PringList1.Selected（List1.ListIndex）语句的结果是________。

A）在Debug窗口输出被选定的项目的索引值

B）在Debug窗口输出True

C）在窗体上输出被选定的项目的索引值

D）在窗体上输出True

10.假定时钟控件的Interval属性为1000，Enabled属性为True,并且有下面的事件过程，程序结束后变量x的值为________。

DimxAsInteger

PrivateSubTimer1_Timer（）

   Fori=1to100

       x=x+1

       beep

   Nexti

EndSub

A）1155          B）1000                  

C）100          D）以上都不对

11.下列说法中正确的是________。

A）通过适当的设置，可以在程序运行期间，让时钟控件显示在窗体上

B）在列表框中不能进行多项选择

C）在列表框中能够将项目按字母从大到小排序

D）框架也有Click和DblClick事件

12.为了防止用户随意将光标置于控件之上，应________。

A）将控件的TabIndex属性设置为0

B）将控件的TabStop属性设置为True

C）将控件的TabStop属性设置为False

D）将控件的Enabled属性设置为False

13.滚动条产生Change事件是因为________值改变了。

A）SmallChange   B）Value               

C）Max      D）LargeChange

14.如果要每隔15s产生一个Timer事件，则Interval属性应设置为________。

A）15           B）900          C）15000         D）150

15.列表框的________属性是数组。

A）List和ListIndex                   B）List和ListCount

C）List和Selected                    D）List和Sorted

16.当用户按下并且释放一个键后会触发KeyPress、KeyUp、KeyDown事件，这三个发生的顺序是________。

A）KeyPress、KeyDown、KeyUp      B）KeyDown、KeyUp、KeyPress

C）KeyDown、KeyPress、KeyUp      D）没有规律

17.下列关于键盘事件的说法中，正确的是________。

A）按下键盘上的任意一个键，都会引发KeyPress事件

B）大键盘上的“1”键和数字键盘的“1”键的KeyCode码相同

C）KeyDown和KeyUp的事件过程中有KeyAscii参数

D）大键盘上的“4”键的上档字符是“$”，当同时按下Shift和大键盘上的“4”键时，KeyPress事件过程的KeyAscii参数值是“$”的ASCII值

18.为确保文本框中输入的全部是数字的最佳方法是________。

A）在KeyDown或KeyUp的事件过程中摒弃非数字输入

B）在Validate事件过程中利用IsNumeric函数

C）在Chinge事件过程中利用IsNumeric函数

D）在KeyPress的事件过程中摒弃非数字输入

19.用户在使用ActiveX控件之前，需要将他们加载到工具箱中，下面________操作可进行ActiveX控件的加栽。

A）工程"部件… B）视图"工具箱    C）工具"选项…  D）工程"引用…

20．把窗体的KeyPreview属性设置程为True，然后编写如下事件过程：

PrivateSubForm_KeyPress（KeyAsciiAsInteger）

 DimchAsString

 ch=Chr（KeyAscii）

 KeyAscii=Asc（UCase（ch））

 PrintChr（KeyAscii+2）

 EndSub

程序运行后，按键盘上的“A“键，则在窗体上显示的内容是______。

A）A         B）B           C）C          D）D

21．表示滚动条控件取值范围最大值的属性是______。

A）Max           B）LargeChange    

C）Value          D）Max-Min

22．在窗体上画一个名称为Timer的计时器控件，要求每隔0.5秒发生一次计时事件，则以下正确的属性设置语句是______。

A）Timer.Interval=0.5          

B）Timer.Interval=5

C）Timer.Interval=50             

D）Timer.Interval=500

23．通过设置Line控件的______属性可以绘制多种形状的图形。

A）Shape          B）Style       C）FillStyle       D）BorderStyle

24．若在Shape控件内以FillStyle属性所指定的图案填充区域，而填充图案的线条的颜色由FillColor属性指定，非线条的区域由BackColor属性填充，则应______。

A）将Shape控件的FillStyle属性设置为2至7间的某个值，BackStyle属性设置为1

B）将Shape控件的FillStyle属性设置为0或1，BackStyle属性设置为1

C）将Shape控件的FillStyle属性设置为2至7间的某个值，BackStyle属性设置为0

D）将Shape控件的FillStyle属性设置为0或1，BackStyle属性设置为0

25．设窗体上有一个列表框控件List1，且其中有若干列表项，则以下能表示当前被选中的列表项内容的是______。

A）List1.list     B）List1.Text    C）List1.Intdex    D）List1.listIndex

26．下列______程序段能删除列表List1中的所有项。

A）PrivateSubCommand1_Click（）

   ForI=0ToList.ListCount-1

     List1.RemoveItem0

   NextI

 EndSub

B）PrivateSubCommand1_Click（）

  ForI=0ToList.ListCount-1

    List1.RemoveItem1

  NextI

 EndSub

C）PrivateSubCommand1_Click（）

ForI=0ToList1.ListCount

 List1.RemoveItem0

NextI

 EndSub

D）PrivateSubCommand1_Click（）

  ForI=0ToList1.ListCount-1

    List1.RemoveItem1

  NextI

 EndSub

27．下面______控件不支持Change事件。

A）TextBox      B）ListBox     C）Label        D）PictureBox

28．在窗体上画一个列表框和一个文本框，然后编写如下两个事件过程：

PrivateSubForm_Load（）

  List1.AddItem"357"

  List1.AddItem"245"

  List1.AddItem"123"

  List1.AddItem"456"

  Text1.Text=""

EndSub

PrivateSubList1_DblClick（）

 a=List1.Text

 Printa+Text1.Text

EndSub

程序运行后，在文本框中输入“789”，然后双击列表框中的“456”，则输出结果是______。

A）1245        B）456789        C）789456       D）0

29．要使用列表中的列表显示成复选框形式，则应将其Style属性设置为______。

A）0         B）1             C）True              D）False

30．窗体上画一个列表框和一个命令按钮，其名称分别为List1和Command1，然后编写如下事件过程：

PrivateSubForm_Load（）

    List1.Addltem"Item1"

    List1.Addltem"Item2"

    List1.Addltem"Item3"

EndSub

PrivateSubCommand1_Click（）

   List1.List（List1.Listcount）="AAAA"

EndSub

程序运行后，单击命令按钮，其结果为______。

A）把字符串“AAAA”添加到列表框中，但位置不能确定

B）把字符串“AAAA”添加到列表框的最后（即item3的后面）

C）把列表框中原有的最后一项改为“AAAA”

D）把字符串“AAAA”插入到列表框的最前面（即item1的前面）

31．在窗体上画一个名称为List1的列表框，一个名称为Label1的标签，列表框中显示若干城市的名称。

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

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

A）PrivateSubList_Click（）

      Label1.Caption=List1.ListIndex

      List1.RemoveItemList1.Text

    EndSub

B）PrivateSubList_Click（）

      Label1.Name=List1.ListIndex

      List1.RemoveItemList1.Text

    EndSub

C）PrivateSubList_Click（）

      Label1.Caption=List1.Text

      List1.RemoveItemList1.ListIndex

    EndSub

D）PrivateSubList_Click（）

      Label1.Name=List1.Text

      List1.RemoveItemList1.ListIndex

    EndSub

32．以下叙述中错误的是______。

A）在KeyPree事件过程中不能识别键盘的按下与释放

B）在KeyPree事件过程中不能识别回车键

C）在KeyDown和KeyUp事件过程中，将键盘输入的“A”和“a”视作相同字母

D）在KeyDown和KeyUp事件过程中，从大键盘输入的“1”和从小键盘输入的“1”被视作不同的字符

33．以下关于KeyPress事件过程中参数KeyAscii的叙述中正确的是______。

A）KeyAscii参数是所按键的ASCII码

B）KeyAscii参数的数据类型为字符串

C）KeyAscii参数可以省略

D）KeyAscii参数是所按键上标注的字符

34．假定编写如下事件过程：

PrivateSubForm_MouseMove（ButtonAsInteger,ShiftAsInteger,_

XAsSingle,YAsSingle）

 If（ButtonAnd2）=2Then

   Print"Hi"

  EndIf

EndSub

程序运行后，为了在窗体上输出“Hi”，应在窗体上执行以下______操作。

A）只能按下左按钮并拖动              B）只能按下右按钮并拖动

C）必须同时按下左）右按钮并拖动     D）按下左按钮拖动或按下右按钮拖动都可

35．编写如下事件过程：

PrivateSubForm_MouseDown（ButtonAsInteger,ShiftAsInteger,_

XAsSingle,YAsSingle）

 IfShift=6AndButton=2Then

   Print"Hello"

 EndIf

EndSub

程序运行后，为了在窗体上输出“Hello”，应在窗体上执行以下______操作。

A）同时按下Shift键和鼠标左按钮

B）同时按下Shift键和鼠标右按钮

C）同时按下Ctrl、Alt键和鼠标左按钮

D）同时按下Ctrl、Alt键和鼠标右按钮

36．在窗体上画一个文本框和一个计时器控件，名称分别为Text1和Timer1,在属性窗口中把计时器的Interval属性设置为1000，Enabled属性设置为False,程序运行后，如果单击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间。

以下是实现上述操作的程序：

PrivateSubCommand1_Click（）

 Timer1._________

EndSub

PrivateSubTimer1_Timer（）

Text1.Text=Time

EndSub

在______处应填入的内容是______。

A）Enabled=True      B）Enabled=False      C）Visible=True         D）Visible=False

37．假定在图片框Picture1中装入了一个图形，为了清除该图形（不删除图片框），应采用的正确方法是____。

：

A）选择图片框，然后按Del键

B）执行语句Picture1.Picture=LoadPicture（“”）

C）执行语句Picture1.Picture=””

D）选择图片框，在属性窗口中选择Picture属性，然后按回车键

38.在窗体上画一个List1的列表框，一个名称为Label1的标签，列表框中显示若干个项目，当单击列表框中的某个项目时，在标签中显示被选中的项目的名称，下列能正确实现上述操作的程序是____。

A）PrivateSubList1_Click（）

         Label1.Caption=List1.ListIndex

      EndSub

B）PrivateSubList1_Click（）

         Label1.Name=List1.ListIndex

      EndSub

C）PrivateSubList1_Click（）

         Label1.Name=List1.Text

      EndSub

D）PrivateSubList1_Click（）

         Label1.Caption=List1.Text

      EndSub

40.在窗体上画一个名称为Text1的文本框，然后画一个名称为HScroll1的滚动条，其Min和Max属性分别为0和100，程序运行后，如果移动滚动框，则在文本框中显示滚动条的当前值。

以下能实现上述操作的程序段是

A）PrivateSubHScroll1_Change（）

    Text1.Text=HScroll1.Value

   EndSub

B）PrivateSubHScroll1_Click（）

    Text1.Text=HScroll1.Value

   EndSub

C）PrivateSubHScroll1_Change（）

    Text1.Text=HScroll1.Caption

   EndSub

D）PrivateSubHScroll1_Click（）

    Text1.Text=HScroll1.Value

   EndSub

41.在窗体上画一个列表框，然后编写如下两个事件过程：

PrivateSubForm_Click（）

 List1.RemoveItem1

 List1.RemoveItem3

 List1.RemoveItem2

EndSub

PrivateSubForm_Load（）

 List1.AddItem"ItemA"

 List1.AddItem"ItemB"

 List1.AddItem"ltemC"

 List1.AddItem"ItemD"

 List1.AddItem"ItemE"

EndSub

运行上面的程序，然后单击窗体，列表框中所显示的项目为____。

A）ItemA与 ItemB                         B）ItemB与 ItemD  

C）ItemD与 ItemE                         D）ItemA与 ItemC

42.编写如下事件过程：

PrivateSubForm_MouseMove（ButtonAsInteger,ShiftAsInteger,XasSingle,YasSingle）

  If（ButtonAnd3）=3Then

     Print“AAAA”

  Endif

程序运行后，为了在窗体上输出”AAAA”，应按下的鼠标键为____。

A）左       B）右    C）同时按下左、右      D）按什么键都不显示

45.在窗体上画两个滚动条，名称分别为HScroll1、HScroll2；六个标签，名称分别为Label1、Label2、Label3、Label4、Label5、Label6，其中标签Label4~Label6分别显示“A”、“B”、“A*B”等文字信息，标签Label1、Label2分别显示其右侧的滚动条数值，Label3显示“A*B”的计算结果。

当移动滚动框时，在相应的标签中显示滚动条的值。

当单击命令按钮“计算”时，对标签Label1、Label2中显示的两个值求积，并将结果显示在Label3中，以下不能实现上述功能的事件过程是：

A）PrivateSubCommand1_Chick（）

    Label3.Caption=Str（Val（Label1.Caption）*Val（Label2.Caption））

  EndSub

B）PrivateSubCommand1_Chick（）

    Label3.Caption=HScroll1.Value*HScroll2.Value

  EndSub

C）PrivateSubCommand1_Chick（）

    Label3.Caption=HScroll1*HScroll2

  EndSub

D）PrivateSubCommand1_Chick（）

    Label3.Caption=HScroll1.Text*HScroll2.Text

  EndSub

46.在窗体上有一个文本框控件，名称为为TxtTime；一个计时器控件，名称为Timer1，要求每一秒在文本框中显示一次当前的时间。

程序为：

PrivateSubTimer1______（）

  TxtTime.text=Time

EndSub

在下划线上应填入的内容是______。

A）Enabled         B