下列程序实现的功能是:当在窗体上单击时,将输出a1.txt 文件中的数字字符的个数。Private Sub form_ Click() Dim Ch As String * 1 Dim n As Integer Open "c:a1. txt" for Input As 10 do while 【7】 Ch = Input(1, 10)if 【8】 then n=n+1End if Loop 【9
主观题
下列程序实现的功能是:当在窗体上单击时,将输出a1.txt 文件中的数字字符的个数。Private Sub form_ Click() Dim Ch As String * 1 Dim n As Integer Open "c:a1. txt" for Input As 10 do while 【7】 Ch = Input(1, 10)if 【8】 then n=n+1End if Loop 【9