在当前目录下有—个名为“myfile.txt”的文本文件,其中有若干行文本。下面程序的功能是读入此文件中的所有文本行,按行计算每行字符的ASCII码之和,并显示在窗体上。请填空。Private Sub Command1_ Click() Dim ch$, ascii As Integer Open "myfile.txt" For 【11】 As 1 While Not EOF(1) Line I
主观题
在当前目录下有—个名为“myfile.txt”的文本文件,其中有若干行文本。下面程序的功能是读入此文件中的所有文本行,按行计算每行字符的ASCII码之和,并显示在窗体上。请填空。Private Sub Command1_ Click() Dim ch$, ascii As Integer Open "myfile.txt" For 【11】 As 1 While Not EOF(1) Line I