要获得当前驱动器应使用驱动器列表框的属性是

试卷相关题目

• 1下列语句中，获得列表框List1中项目个数的语句是

  A.x=List1.ListCount

  B.x=ListCount

  C.x=List1.ListIndex

  D.x=ListIndex

  开始考试点击查看答案
• 2在Visual Basic中，要强制用户对所用的变量进行显式声明，这可以在哪里设置、

  A."属性"对话框

  B."程序代码"窗口

  C."选项"对话框

  D.对象浏览器

  开始考试点击查看答案
• 3下列符号常量的声明中，不合法的是

  A.Const a As Single=1.1

  B.Const a="OK"

  C.Const a As Double=Sin(1)

  D.Const a As Integer="12"

  开始考试点击查看答案
• 4可以实现从键盘输入一个作为双精度变量a的值的语句是

  A.a=InputBox()

  B.a=InputBox("请输入一个值")

  C.a=Val(InputBox("请输入一个值") )

  D.a=Val(InputBox() )

  开始考试点击查看答案
• 5任何控件都有的属性是

  A.BackColor

  B.Caption

  C.Name

  D.BorderStyle

  开始考试点击查看答案
• 6如果将文本框的MaxLength属性设置为0，则文本框中的字符不能超过

  A.8K

  B.16K

  C.32K

  D.64K

  开始考试点击查看答案
• 7当在滚动条内拖动滚动块时触发

  A.KeyUp事件

  B.KeyPress事件

  C.Scroll事件

  D.Change事件

  开始考试点击查看答案
• 8设有声明语句Dim b(-1 To 10, 2 To 9, 20) As Integer则数组b中全部元素的个数

  A.2310

  B.2016

  C.1500

  D.1658

  开始考试点击查看答案
• 9设在窗体上有个文本框，然后编写如下的事件过程：Private Sub Text1_KeyDown(KeyCode As Integer, Shift As Integer)Const Alt=4Const Key_F2=&H71altdown%=(Shift And Alt) > 0f2down%=(KeyCode=Key_F2)If altdown% And f2down% ThenText1.Text="BBBBB"End IfEnd Sub上述程序运行后，如果按 【Shift+F2】 ，则在文本框中显示得是

  A.Alt+F2

  B.BBBBB

  C.随机出几个数

  D.文本框平均内容无变化

  开始考试点击查看答案
• 10设已经在"菜单编辑器"中设计了窗体的快捷菜单，其顶级菜单为Bs，取消其"可见"属性，运行时，在以下事件过程中，可以使快捷菜单响应鼠标右键菜单的是

  A.Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _X As Single, Y As Single)If Button=2 Then PopupMenu Bs, 2End Sub

  B.Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _X As Single, Y As Single)PopupMenu BsEnd Sub

  C.Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _X As Single, Y As Single)PopupMenu Bs,0End Sub

  D.Private Sub Form_MouseDown(Button As Integer, Shift As Integer, _X As Single, Y As Single)If (Button=vbLeftButton) Or (Button=vbRightButton) Then PopupMenu BsEnd Sub

  开始考试点击查看答案