2. 计算机
  3. 下列程序实现的功能是：当在窗体上单击时，将在窗体上输出c:\a1．txt文件中的所有小写字母。 Private Sub Form_Click() Dim Ch As String*1 Open"c:\a1．txt"For In

下列程序实现的功能是：当在窗体上单击时，将在窗体上输出c:\a1．txt文件中的所有小写字母。 Private Sub Form_Click() Dim Ch As String*1 Open"c:\a1．txt"For In

admin2009-02-13  43
问题 下列程序实现的功能是：当在窗体上单击时，将在窗体上输出c:\a1．txt文件中的所有小写字母。
   Private Sub Form_Click()
      Dim Ch As String*1
      Open"c:\a1．txt"For Input As #10
      Do While【  】
         Ch=Input(1，#10)
         If【  】Then
            Print Ch；
         End If
      Loop
     【  】
   End Sub
选项
答案Not EOF(10) , Ch＞="a" And Ch＜="z" , Close #10
解析 要将a1．txt中的所有小写字母输出，可采用下述方法：首先读打开该文件，然后从文件中读取一个字符，判断该字符是否为小写字母，若是，则输出该字母，重复上述过程直到文件结尾。在读字符前应要测试文件内部读写指针是否位于文件尾，只有不是在文件结尾时才能读取字符，故[13]处应填“Not EOF(10)”，读取一个字符后，应判断该字符是否为小写字母，故[14]处应填“Ch＞="a" And Ch＜="z"”，文件读写过后，应关闭文件，故[15]处应填“Close #10”。
转载请注明原文地址:https://www.kaotiyun.com/show/UE1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)