填空题

下列程序实现的功能是：当在窗体上单击时，将输出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+1 End if Loop 【9】 Close #10 End Sub