下面程序的功能是统计字符串中“广的个数，请填空。 Sub COU（) a$="Beijing University of

已知B的ASCII码为66，以下程序统计由键盘输入的字符串中各英文字母的使用次数 Dim【 】 For i=65 To 90 pp(i) =0 Next x$=InputBox("Enter a string"，x$) x$=UCase$(x$) For i=1 To【 】 n=Asc(Mid$(x$，i，1)) If n ＞=65 And n ＜=90 Then 【 】 End If Next i For i=65 To 90 If pp(i) ＞0 Then Print Chr$(i)；pp(i) End If Next

请帮忙给出正确答案和分析，谢谢！

随机文件使用Put语句写数据，使用【 】语句读数据。

请帮忙给出正确答案和分析，谢谢！

下面程序是用来打印九九乘法表的，请补充完整。 Dim i As Integer，j As Integer，Strl$ Strl=" " For i=1 To 9 Forj=1 To 9 If【 】Then Strl=Strl + Str$(j)+"X"+Str$(i)+"="+Str$(Val(i * j)) Else Strl=Strl & Chr(13) 【 】 End If Next j Next i Print Str

请帮忙给出正确答案和分析，谢谢！

下列程序是判断一个整数(>=3)是否为素数，请补充完整。 Dim n As Integer n=InputBox("请输入一个整数(>=3)") k=Int(Sqr(n)) i=2 swit=0 While i<=k And swit=0 If n Mod i=0 Then 【 】 Else 【 】 End If Wend If swit=0 Then Print n；"是一个素数。" Else Print n；"不是一个素数。" End If

请帮忙给出正确答案和分析，谢谢！