设有如下程序:Private Sub Form_Cliok() Dima As Integer,S As Integer n=8 s=0 Do s=s+n n=n-1 Loop While n>0 Print s End Sub 以上程序的功能是 [7] ;程序运行后,单击窗体,输出结果为 [8] 。
已知B的ASCⅡ码为66,以下程序统计由键盘输入的字符串中各英文字母的使用次数。 Dim [10] Fori=65 To 90 pp(i)=0 Next x$=InputBox("Enter a string",K$) x$=U Case$(x$) Fori=1 To Len(x$) n=Asc(Mid$(x$,i,1)) If n>=65Andn<=90Then [11] End If Nexti