27.如果在C盘当前文件夹下已存在名为StuData.dat的顺序文件,那么执行语句Open"C:StuData.dat"For A ppend As #1之后将 ____。 A、删除文件中原有的内容 B、保留文件中原有的内容,可在文件尾添加新内容 C、保留文件中原有内容,在文件头开始添加新内容 D、以上均不对
A B C D
28.单击窗体时,下列程序代码的执行结果为 ____。 Private Sub Invert(ByVal xStr As String, yStr As String) Dim tempStr As String Dim I As Integer I = Len(xStr) Do While I > 1 tempStr = tempStr + Mid(xStr, I, 1) I = I - 1 Loop yStr = tempStr End Sub Private Sub Form_Click() Dim s1 As String,s2 As String sl="abcdef" Invert s1,s2 Print s2 End Sub A、abcdef B、afbecd C、fedcba D、defabc
A B C D
29.在窗体上画两个文本框(其Name属性分别为Text1和Text2)和一个命令按钮(其Name属性为Commandl),然后编写如下事件过程: Private Sub Commandl_Click() x=0 Do While x<50 x=(x+2)*(x+3) n=n+1 Loop Text1.Text=Str(n) Text2.Text=Str(x) End Sub 程序运行后,单击命令按钮,在两个文本框中显示的值分别为____。 A、1和0 B、2和72 C、3和50 D、4168
A B C D
30.执行下列程序: private Sub Command1_Click() For j=1 to 4 print Tab(2*j+1);12*j next j End Sub 单击命令按钮,程序的执行结果为____。 A、12 24 36 48 B、12 24 36 48 C、12 24 36 48 D、12243648