下列程序的执行结果s的值是____。 Private Sub Command_Click() Dim i, As Integer i=0 s=1 Do i=i+1 s=s*i Loop Until i>=4 Print s End Sub

假定有下列函数过程:Function Fun(S As String)As StringDim sl As StringFor i=1 To Len(S)s1=Mid(S, i,1)+s1Next iFun=s1End Function窗体上有一个命令按钮 Command1,然后编写如下事件过程:Private Sub Commandl_Click()Dim Strl As String, Str2 As StringStrl=InputBox(“请输入字符串”)Str2=Fun(Str1)Print Str2End Sub程序运行后,单击命令按钮,如果在输入对话框中输人字符串“abc589”,则单击“确定”按钮后在窗体上的输出结果为____。程序运行后,单击命令按钮,如果在输入对话框中输人字符串“abc589”,则单击“确定”按钮后在窗体上的输出结果为____。

窗体上有一个命令按钮(Com mand1)和一个文本框(Text1)，编写如下程序,当运行程序后,单击命令按钮,依次输入85,65,50后,文本框Text1最后显示的内容是____。Private Sub Command1_Click()Dim i,j As Integer, As Strings=“”Forj=1 To 3i= InputBox(“请输入分数”)Ifi<6 0 Then=“不及格”If i> 90 Thens=“优秀”Elself i> 80 Thens=“良好”Elses=“及格”End IfNextText1.Text=sEnd Sub窗体上有一个命令按钮(Com mand1)和一个文本框(Text1)，编写如下程序,当运行程序后,单击命令按钮,依次输入85,65,50后,文本框Text1最后显示的内容是____。

编写程序，求200以内所有素数的和。

编写程序，用随机数产生32个三位正整数，计算并输出这32个数的和。要求输出数据时，每8个数一行。

InputBox（）函数的返回类型是（）

下列关键字中，不能定义变量的是（）

用八进制表示Visual Basic的整型常数时， 前面要加上的符号是（）

表达式Int(6.7)的结果是（）

下列语句中，可以用来在列表框Listl中插入一行文本的是（）