大学职业资格刷题搜题APP
创建自己的小题库
搜索
【单选题】
窗体上有1个名称为List1的列表框，其中已经输入了若干个项目，如图所示；还有 2个文本框，名称分别为Text1、Text2，1个名称为Command1的命令按钮，并有下列事件过程。 Private Sub Command1_Click() Dim str As String，S As String．k As Integer s=Text1 str ="" For k=Listl．ListCount-1 To 0 Step-1 If InStr(List1．List(k)，s)>0 Then str=str ＆ List1．List(k)＆"" End If Next k If str=""Then Text2="没有匹配的项目" Else Text2=str End If End Sub
程序运行时，在Text1中输入"京"，单击命令按钮，则在Text2中显示的内容是( )。
A.
京
B.
北京南京
C.
南京北京
D.
没有匹配的项目
手机使用
分享
复制链接
新浪微博
分享QQ
微信扫一扫
反馈
收藏
举报
参考答案：
举一反三
【单选题】我国已被选入“世界文化遗产”的项目是( )。
A.
安徽古村落、长城、武夷山
B.
澳门历史名城、北京故宫、苏州古典园林
C.
福建土楼、丽江古城、布达拉宫
D.
大同云冈石窟、五台山、泰山
【单选题】有如下事件过程：Private Sub Form_Load() Show Dim Arr() As Variant Arr = Array(1, 3, 5, 7, 9, 11, 13, 15) Call converse(Arr) For i = 0 To 7 Print arr(i); Next iEnd Sub 以上程序的功能是，通过调用Converse过程，将数组Arr中的元素逆序存放并输出...
A.
Private Sub converse(dim a() as Variant ) Dim T For i = LBound(A) To UBound(A) T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
B.
Private Sub converse(dim a() as Variant) Dim T Dim J As Integer J = (LBound(A) + UBound(A)) / 2 For i = LBound(A) To J T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
C.
Private Sub converse(a() As Variant) Dim T For i = LBound(A) To UBound(A) T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
D.
Private Sub converse(a() As Variant) Dim T Dim J As Integer J = Int((LBound(A) + UBound(A)) / 2) For i = LBound(A) To J T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
【多选题】在相同的条件下重复一个行为或试验，不确定性事件所出现的结果的特点是( )。
A.
所出现的结果有多种
B.
出现的结果只有一种
C.
具体是哪种结果事前不可预知
D.
出现的结果能事前预知
E.
出现的结果是确定的
【单选题】标志着清政府被迫放弃闭关政策，开始面向世界，基本上完成了从传统的理藩向近代外交转化的事件是1861年( )。
A.
辛酉政变
B.
总理各国事务衙门的设立
C.
洋务运动的兴起
D.
外务部的成立
【单选题】根据风险报酬原理，应投资于（ ）的项目。
A.
期望报酬率较高，风险也较高
B.
期望报酬率较高，而风险较低
C.
期望报酬率较低，而风险较高
D.
期望报酬率较低，风险也较低
相关题目：
【单选题】我国已被选入“世界文化遗产”的项目是( )。
A.
安徽古村落、长城、武夷山
B.
澳门历史名城、北京故宫、苏州古典园林
C.
福建土楼、丽江古城、布达拉宫
D.
大同云冈石窟、五台山、泰山
【单选题】有如下事件过程：Private Sub Form_Load() Show Dim Arr() As Variant Arr = Array(1, 3, 5, 7, 9, 11, 13, 15) Call converse(Arr) For i = 0 To 7 Print arr(i); Next iEnd Sub 以上程序的功能是，通过调用Converse过程，将数组Arr中的元素逆序存放并输出...
A.
Private Sub converse(dim a() as Variant ) Dim T For i = LBound(A) To UBound(A) T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
B.
Private Sub converse(dim a() as Variant) Dim T Dim J As Integer J = (LBound(A) + UBound(A)) / 2 For i = LBound(A) To J T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
C.
Private Sub converse(a() As Variant) Dim T For i = LBound(A) To UBound(A) T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
D.
Private Sub converse(a() As Variant) Dim T Dim J As Integer J = Int((LBound(A) + UBound(A)) / 2) For i = LBound(A) To J T = a(i) a(i) = a(UBound(A) - i) a(UBound(A) - i) = T Next i End Sub
【多选题】在相同的条件下重复一个行为或试验，不确定性事件所出现的结果的特点是( )。
A.
所出现的结果有多种
B.
出现的结果只有一种
C.
具体是哪种结果事前不可预知
D.
出现的结果能事前预知
E.
出现的结果是确定的
【单选题】标志着清政府被迫放弃闭关政策，开始面向世界，基本上完成了从传统的理藩向近代外交转化的事件是1861年( )。
A.
辛酉政变
B.
总理各国事务衙门的设立
C.
洋务运动的兴起
D.
外务部的成立
【单选题】根据风险报酬原理，应投资于（ ）的项目。
A.
期望报酬率较高，风险也较高
B.
期望报酬率较高，而风险较低
C.
期望报酬率较低，而风险较高
D.
期望报酬率较低，风险也较低
参考解析：
题目纠错 0
发布
