(7)在窗体上画一个命令按钮,其名称为 Command1,然后编写如下事件过程: Private Sub Command1_Cli
(7)在窗体上画一个命令按钮,其名称为 Command1,然后编写如下事件过程:
Private Sub Command1_Click()
a$="National Computer Rank Examination"
n=Len(a$)
s=0
For i=1 To n
b$=Mid(a$, i, 1)
If b$="n" Then
s=s+1
End If
Next i
Print s
End Sub
程序运行后,单击命令按钮,输出结果是 【7】 。