已知文本框Text1中输入了一篇英文短文,并编写了如下程序段: Str_x = Text1.Text n = Len(Str_x) m = 0 t = 0 For i = 1 To n w = UCase(Mid(

admin2015-09-23  32

问题 已知文本框Text1中输入了一篇英文短文,并编写了如下程序段:
   Str_x = Text1.Text
   n = Len(Str_x)
   m = 0
   t = 0
   For i = 1 To n
      w = UCase(Mid(Str_x, i, 1))
      If w >= "A" And w <= "Z" Then
         If t = 0 Then m = m + 1
         t = t + 1
      Else
        t = 0
      End If
   Next
   Print m
该程序段的功能为统计并输出英文短文中(    )。

选项 A、首字母大写的单词的个数
B、大写字母的个数
C、字母的个数
D、单词的个数

答案D

解析 在变量Str_x中存放文本框中输入的一篇英文短文,通过Len函数获得短文的长度,并将其长度赋值给变量n。在外层For循环中,循环变量i从1开始到n结束。表达式Mid(Str_x,i,1)依次截取字符串Str_x中第i个字符,然后通过大写转换函数UCase转换成大写字母赋值给变量w。紧接着判断变量w中存放的字符是否为英文字母,若是,则通过变量t判断该字符是否为该单词的第一个字符,若是第一个字符,则计数器变量m加1。程序最终的功能是统计一篇英文短文中单词的个数,故选项D正确。
转载请注明原文地址:https://kaotiyun.com/show/0LLp777K
0

最新回复(0)