一起答
主观

在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Textl、Labell和Command1,然后编写如下两个事件过程:

Private Sub Commandl_Click()

S$=InputBox(”请输入一个字符串”)

Textl.Text=S$

End Sub

Private Sub Textl Change()

Label1.Caption=UCase(Mid(Text1.Text,7))

End Sub

程序运行后,单击命令按钮,将显示一个输入对话框,如果在该对话框中输入字符串“VisualBasic”,则在标签中显示的内容是【 】。

试题出自试卷《2017年计算机二级考试题库二(VB)》
参考答案
查看试卷详情
相关试题
  1. 在窗体上画一个文本框、一个标签和一个命令按钮,其名称分别为Textl、Labell和Command1,然后编写如下两个事件过程:

    Private Sub Commandl_Click()

    S$=InputBox(”请输入一个字符串”)

    Textl.Text=S$

    End Sub

    Private Sub Textl Change()

    Label1.Caption=UCase(Mid(Text1.Text,7))

    End Sub

    程序运行后,单击命令按钮,将显示一个输入对话框,如果在该对话框中输入字符串“VisualBasic”,则在标签中显示的内容是【 】。

  2. 在窗体上画一个命令按钮,然后编写如下代码:Private Type Record ID As Integer Name As String * 20End TypePrivate Sub Command1_Click()      Dim MaxSize, NextChar, MyChar      Open “d:\temp\female. txt” For Input As #1      MaxSize = LOF(1)      For NextChar = MaxSize To 1 Step -1         Seek #1, NextChar          MyChar = Input(1, # 1)         Next NextChar      Print EOF(1)      Close #1End Sub程序运行后,单击命令按钮,其输出结果为______。

    • A.True
    • B.False
    • C.0
    • D.Null
  3. 要使菜单项MenuOne在程序运行时失效,使用的语句是(  )。

    • A.MenuOne.Visible=True
    • B.MenuOne.Visible=False
    • C.MenuOne.Enabled=True
    • D.MenuOne.Enabled=False
  4. 以下事件过程可以将打开对话框的标题改为"新时代"的是

    • A.Private Sub Command2_Click() CommonDialog1.DialogTitle="新时代" CommonDialog1.ShowOpen End Sub
    • B.Private Sub Command2_Click() CommonDialog1.DialogTitle="新时代" CommonDialog1.ShowFont End Sub
    • C.Private Sub Command2_Click() CommonDialog1.DialogTitle="新时代" CommonDialog1.Show End Sub
    • D.Private Sub Command2_Click() CommonDialog1.DialogTitle="新时代" CommonDialog1.ShowColor End Sub
  5. 若深度为5的完全二叉树的第5层有3个叶结点,则该二叉树一共有______ 个结点。

    • A.15
    • B.16
    • B.16
    • C.17
    • D.18
  6. 软件需求分析时,常采用数据字典对数据流图中包含的所有元素进行定义,其定义的条目内容主要是______。

    • A.数据流、数据存储、数据项和加T
    • B.一般信息、名字、别名和描述
    • C.数据类型、数据长度和结构
    • D.数据取值范围、使用频率和方式
  7. 下列工具中为需求分析常用工具的是(  )。

    • A.PAD  
    • B.PFD 
    • C.N-S  
    • D.DFD 
  8. 在窗体上画一个名称为Text1的文本框.然后画一个名称为HScroll1的滚动条,其Min和Max属性分别为0和100。程序运行后,如果移动滚动框,则在文本框中显示滚动条的当前值,如图16-6所示。  以下能实现上述操作的程序段是______。

    • A.Private Sub HScroll1_Change() Text1.Text=HScroll1. Value End Sub
    • B.Private Sub HScroll1_Click() Text1. Text=HScroll1. Value End Sub
    • C.Private Sub HScroll1_Change() Text1. Text=HScroll1. Caption End Sub
    • D.Private Sub HScroll1_Click() Text1. Text=HScroll1. Caption End Sub
  9. 文件列表框控件的 ______属性用来确定在列表框中显示的文件类型。

    • A.Path
    • B.Pattern
    • C.FileName
    • D.List
  10. 设a=5,b=4,c=3,d=2,则表达式3>2*b Or a=c And b<>c Or c>d的值是

    • A.1
    • B.True
    • C.False
    • D.2