试题 试卷
题型：判断题 题类： 难易度：容易
新疆伊犁哈萨克自治州霍城县2023-2024学年高一上学期信息技术10月月考试卷
Private Sub Commandl_Click()
Dim a As String
a ="r"
a=Chr(Asc(a) - 4)
Label1. Caption =a
End Sub
运行程序后， Label1中的显示结果为（ ）
p ="Tel-114"
c=""
for ch in p:
if ch>= "0" and ch<= "9":
c+=str(9-int(ch))
elif ch>= "a" and ch<= "z":
ch= chr(ord(ch) - 32)
if ch>= "A" and ch<= "Z":
c=ch+c
print(c)
执行程序后，输出的结果为（ ）
试题篮
