填空题下列这个Sub过程的功能是：统计字符串中“a”的个数，请在空白处填上合适的代码，将程序补充完整。 Private Sub numCount() Dim num As Integer s$="software And hardware" num=Len(s$) For i=1 To hum b$=______ If b$ = "a" Then x=x + 1 Next i Print "x="; x End Sub

1、

【正确答案】 1、Mid(s$,i,1)

【答案解析】[解析] 分析题目和程序段可知，空白处的作用是取出字符串。中的第i个字符，这里我们可以使用Mid函数来取出第i个字符，然后对比该字符是否是字符a，如果是，则变量x加1，如果不是则跳过if后面的语句继续循环，最后输出x。