如图16-10所示.在列表框List1中已经有若干人的简单信息,运行时在Text1文本框(即“查找对象”右边的文本框)输入一个姓或姓名,单击“查找”按钮,则在列表框中进行查找,若找到,则把该人的信息显示在Text2文本框中。若有多个匹配的列表项,则只显示第1个匹配项;若未找到,则在Text2中显示“查无此人”。请填空。
Private Sub Conmlandl_Click()
Dim k As Integer, n As Integer, found As Boolean
found=False
n=Len( 【6】 )
k=0
While k<List1. ListCount And Not found
If Text1=Left $(List1. List(k), n)Then
Text2= 【7】
found=True
End If
k=k+1
Wend
If Not found Then
Text2="查无此人"
End If
End Sub
要到微信小程序或APP查看答案哦。
实在点不开答案,可以分享到微信,
在微信里面查看答案。
APP具体操作流程为:
哪种组播的应用最常效仿传统的广播。()
(法西斯的)“授权法”
课堂教学中常采用“读读”“议议”“练练讲讲”的教学方式,这符合了大脑皮层的哪种功能活动特征()。
A.优势法则
B.保护性抑制
C.始动调节
D.动力定型
E.镶嵌式活动
在分段承包方式下,建筑工程保险的投保人一般为()。
A.工程所有人
B.工程设计人
C.贷款银行
D.工程承包人
某公司在其格式劳动合同中规定:“因公司的机器设备给职工造成的人身伤害,由公司承担赔偿责任。”该公司职工王某为完成生产定额,在下班后使用一台机器时被轧断了2根手指。王某因受伤而造成的财产损失应当由谁承担( )
A.应当由王某自己承担,该公司不承担赔偿责任
B.主要由王某自己承担,该公司亦应当承担部分赔偿责任
C.应当由该公司承担赔偿责任
D.主要由该公司承担赔偿责任,王某自己亦应当承担部分损失