填空题

下面程序的功能是统计字符串中“广的个数，请填空。　　Sub COU(　) 　　　　a$="Beijing University of Technology" 　　　　Dim n AS Integer 　　　　n=Len(a$) 　　　　For i=1 To n 　　　　b$=【】　　　　If 【】 Then x=x+1 　　　Next i 　　　Print "x="；x 　　End Sub

【参考答案】

Mid$(a$，i，1)

<上一题目录下一题>

热门试题

填空题

执行下面的程序段，x的值为【】。 Private Sub Command1_Click()For i=1 To 9a=a + iNext ix=Val(i)MsgBox xEnd Sub

填空题

在一个工程中有两个窗体，窗体Form1上有一个命令按钮Disp，单击该按钮，Form1窗体隐藏，显示Form2窗体，程序如下，请补充完整。Private Sub Disp_Click()Me．HideForm2.【】End Sub

相关试题