题目

有如下VB程序: Private Sub Command1_Click ( ) Dim t As Long, s As string s = Text1. Text For i = 1 To Len (s)     s = Mid(Text1. Text, i, 1)     If s > = “0” s < = “9” Then         t = t * 10 + Va1 (s)     ElseIF s > = “a” And s< = “z” Then         t = 10     End If Next i Text2. Text = Str(t) End Sub 运行该程序,在文本框Text1中输入“2018 Iphone7”,单击命令按钮Command1后,文本框Text2中显示的内容是(  ) A . 2018 B . 107 C . 20187 D . 7 答案:B
信息技术 试题推荐
最近更新