题目

有VB 程序如下： Private Sub Command1_Click()Dim s1 As String, s2 As String, ch As Strings1 ＝ Text1.Texts2 ＝””ch ＝””For i ＝ 1 To Len(s1) ch ＝ Mid (s1, i, 1) If Asc(ch) <＝ 122 And Asc(ch) >＝ 97 Then ch ＝Chr(Asc(ch) － 32) End If If Asc(ch) >＝ 65 And Asc(ch)<＝ 90 Then ch ＝ Chr(65 ＋ (Asc(ch) － 62) Mod 26) End If s2 ＝ s2 ＋ chNext iText2.Text ＝ s2 End Sub 已知大写字母A的ASCII码值为65，且小写字母的 ASCII 码为对应的大写字母的ASCII码加上32。运行上述程序，若文本框Text1 中的内容为“Text1”(2013·安徽名校联盟模拟)What made my father satisfied was　　　over 50% of the students in his class had been admitted to key universities. A．because B．that C．what D．why