2.1 计算机解决问题的过程 知识点题库
-
（1） 要实现程序运行时，单击文本框 Text1 即可将文本 框 清 空 ， 则 应 在 (A 、Command1_Click/B 、 Form_Load/C 、 Text1_Click)事件处理过程中添加语句 Text1.text=””。
-
（2） 实现上述功能的 VB 程序如下，请在划线处填入合适的代码
Private Sub Command1_Click
Dim s As String, ch As String, sum As Integer
Dim fh As Integer
s = Text1.Text: fh = 1: p = 0: sum=0
For i = 1 To Len(s)
ch = Mid(s, i, 1)
If ch >= "0" And ch <= "9" Then
p =
Else
sum =
p = 0
If ch = "-" Then
fh = -1
ElseIf ch = "+" Then
fh = 1
End If
End If
Next i
Label1.Caption = Str(sum)
End Sub
-
（3） 若文本框 Text1 中输入的内容为“ 12*10=”（不包括双引号），单击“计算”按钮后，标签Label1 上将显示： .（A 、 120 / B 、 22 / C 、 0 /D 、程序出错无法显示）
执行该算法，依次输入a的值2，5，4后，变量b的值为（ ）
For i=1 To 100
For j=i To 100
If j Mod i = 0 Then a(j)=a(j)+1
Next j
Next i
Text1.Text=Str(a(30))
数组a各元素的初值为0，执行上述程序段后，文本框Text1中输出的内容为 ( )
def CaesarCipher():
c=mingwen.get("0.0"， "end")
b=""
miwen.delete("0.0"， "end")
for i in range(len(c)):
if 'a'<=c[i]<='w' or 'A'<=c[i]<='W':
b=b+chr(ord(c[i]) ① ) #生成密文
elif 'x'<=c[i]<='z' or 'X'<=c[i]<='Z':
b=b+chr(ord(c[i]) ② ) #生成密文
else:
b=b+c[i]
miwen.insert("0.0"，b)
下列说法正确的是（ ）
则执行该算法后，i和s的值分别是。
B . 
C . 
D . 
