在某学校里，每位同学都会得到一张一卡通卡，一卡通的卡号是唯一的，卡内会记录每位同学的姓名、住址、班级、金额等信息。每当同学刷卡时，卡号就被输入电脑，然后进行查找，如果找到就显示姓名，否则显示“查无此人”。下列程序的功能是根据卡号查找对应的姓名，程序中数组a保存所有已发放一卡通的卡号，数组b保存卡号对应的姓名，第i位同学的卡号保存在a（i）中，姓名保存在b（i）中。
程序界面如图1所示，左边列表框列出所有同学的卡号和姓名，在右边文本框Text1中输入卡号，单击“开始查询”按钮（Command1），程序就按卡号进行查找，如果找到就在标签Label3中输出卡号对应同学的姓名，否则就输出“查无此人”。
解决此问题的算法流程图如图2所示，相应的程序如下，在程序①和②横线处，填入适当的语句或表达式，把程序补充完整。
Private Sub Command1_Click （ ）
Dim x As String,i As Integer,s As String,f As Boolean
x=Text1．textText1．text
i=0：f=False'f为找到标志变量，值为True表示找到，否则表示没找到
Do While （i＜n） And （f=False）
i=i+1
If x=a（i） Then
f=True
End If
Loop
If f=True Then
s=b（i）s=b（i）
Else
s=“查无此人！“
End If
Label3．Caption=s
End Sub
程序中①横线处应填入 Text1．textText1．text
程序中②横线处应填入 s=b（i）s=b（i）
【考点】编辑事件处理过程的代码．
【答案】Text1．text；s=b（i）；Text1．text；s=b（i）
【解答】
【点评】
声明：本试题解析著作权属菁优网所有，未经书面同意，不得复制发布。
发布：2024/6/27 10:35:59组卷：0引用：1难度：0.1
相似题
-
1．根据AQI值判断城市的空气质量。若城市的AQI值（整数）不超过100则空气质量优良，否则空气质量有污染。当输入的AQI值为-1时则退出程序。不要更改程序结构，将题中的①②③④填入正确的语句。
city=input（“请输入城市名：”）
AQI=int（input（“请输入空气质量指数AQI的值：”））
①______ AQI!=-1：
if ②______：
print（city,“的空气质量优良。”）
③______：
print（city,“的空气质量有污染。”）
city=input（“请输入城市名：”）
AQI=④（input（“请输入空气质量指数AQI的值：”））
（1）序号①答案为。
A．if
B．while
C．for
D．def
（2）序号②答案为。
A．AQI＞=100
B．AQI＜=100
C．AQI＞100
D．AQI＜100
（3）序号③答案为。
A．elif
B．break
C．if
D．else
（4）序号④答案为。
A．int
B．float
C．str
D．else发布：2025/1/2 11:0:1组卷：0引用：0难度：0.4 -
2．一球从100米高度自由落下，每次落地后反跳回原高度的一半，再下落。编写一个C程序，求它在第10次落地时，其经过了多少米？第10次反弹多高？
发布：2025/1/2 11:0:1组卷：1引用：3难度：0.3 -
3．利用海伦公式求解三角形面积。已知a,b,c为三角形的三条边长，p为三角形的半周长，即p=（a+b+c）/2，计算此三角形面积S的海伦公式为：
。不要更改程序结构，将题中的①②③填入正确的语句。
（1）序号①答案为import math#导入数学模块
def hl（a,b,c）：#定义求三角形面积的函数
p=①
s=math.jye.ai（②）#sqrt用于计算算术平方根
return ③#返回面积的值
a,b,c=3，4，5#边长依次赋值
print（“此三角形的面积S为：“，hl（a,b,c））
A． （a+b+c）/2 B．p*（p-a）*（p-b）*（p-c）
C． （a+b+c）*2 D．s
（2）序号②答案为
A．（a+b+c）/2 B．p*（p-a）*（p-b）*（p-c）
C．（a+b+c）*2 D．（3+4+5）/2
（3）序号③答案为
A．p B．s
C．p*（p-a）*（p-b）*（p-c） D．0发布：2025/1/2 11:0:1组卷：0引用：0难度：0.4
