单选

以下程序运行后的窗体如图所示,其中组合框的名称是Combo1,已有列表项如图所示;命令按钮的名称是Command1。

Private,Sub Command1_Click(  )

If Not Check(Combo1.Text)Then

MsgBox("输入错误")

Exit Sub

End If

For k=0 To Comb01.ListCount-1

If Comb01.Text=Combo1.List(k)Then

MsgBOX("添加项目失败")

Exit Sub

End If

Next k

Cornbol.AddItem Combo1.Text

MsgBOX("添加项目成功")

End Sub

Private Function Check(ch As String)As Boolean

n=Len(ch)

For k=1 To n

c$=Ucace(Mid(ch,k,1))

If c<"A"Or c>"Z"Then

Check=False

Exit Function

End If

Next k

Check=True

End Function

程序运行时,如果在组合框的编辑区中输入“Java”,则单击命令按钮后产生的结果是(  )。

  • A.显示“输入错误”
  • B.显示“添加项目失败”
  • C.显示“添加项目成功”
  • D.没有任何显示
参考答案
您可能感兴趣的试题

设窗体文件中有下面的事件过程:

Private sub Command1 Click(  )

 Dim S

  • a%=100    Print a
  • End Sub    其中变量a和s的数据类型分别是(  )。
  • A.整型,整型
  • B.变体型,变体型
  • C.整型,变体型
  • D.变体型,整型

为了在窗体上建立2组单选按钮,并且当程序运行时,每组都可以有一个单选按钮被选中,则以下做法中正确的是(  )。

  • A.把这2组单选按钮设置为名称不同的2个控件数组
  • B.使2组单选按钮的Index属性分别相同
  • C.使2组单选按钮的名称分别相同
  • D.把2组单选按钮分别画到2个不同的框架中

在程序运行时,下面的叙述中正确的是(  )。

  • A.用鼠标右键单击窗体中任何无控件部分,会执行窗体的Form—Load事件过程
  • B.用鼠标左键单击窗体的标题栏,会执行窗体的Form—Click事件过程
  • C.只装入而不显示窗体,也会执行窗体的Form—Load事件过程
  • D.装入窗体后,每次显示该窗体时,都会执行窗体的Form—Click事件过程
¥

订单号:

遇到问题请联系在线客服

订单号:

遇到问题请联系在线客服