若将PRIVATE Y改为PRIVATE X，则程序执行后的显示结果为 ______。

A．20 30

B．40 50

C．20 50

D．40 30

[单选题]若将子过程SUB中的PRIVATE X改为PRIVATE Y，则Y的输出结果为 ______。A．5B．11C．8D．3

[单选题]若将PRIVATE Y删除，则程序执行后的显示后果为 ______。A．20 30B．40 50C．30 40D．40 30

[单选题]若将子过程SUB中的PRIVATE X改为PRIVATE Y，则X的输出结果为 ______。A．5B．11C．8D．3

[单选题]若在PRIVATE Y后加一条PRIVATE X语句，则程序执行后的显示结果为 ______。A．20 30B．40 50C．20 50D．40 30

[主观题]执行下列程序，输入数字3，则输出结果为______。Private Sub Command1_Click()a=inputBox("Input a Number")If a＞5 ThenG．oTo L5E．lse If a＞2 ThenG．oTo L2E．lseG．oTo L3E．nd IfE．xit SubL5:Print a Mod 5E．xit SubL3:Print a Mod 3E．xit SubL2：Print a Mod 2E．nd Sub

[单选题]若将程序中的&& 删除，则X，Y的输出结果为 ______。A．0 2B．2 4C．6 6D．1 3

[单选题]执行下面的程序，单击窗体后在窗体上显示的结果是 ______。Private Sub form_ Click() Dim Str1 As String, Str2 As String Dim Str3 As String, I As Integer Str1 = "e" for I = t To 2 Str2 = Ucase (Str1) Str1 = Str2 & Str1 Str3 = Str3 & Str1 str1 = Chr (Asc(Str1) + I) Next

[单选题]下列程序运行后，单击命令按钮，窗体显示的结果为( )。 Private Function pl(x As Integer,y As Integer,z As Integer) pl=2*x+y+3*z End Function Private Function p2(X As Integer,y As Integer,z As Integer) p2=p1(z,y,x)+x End Function Private Sub Commandl_Click()A．23B．19C．21D．22

[单选题]有如下程序：Private type stuX as stringY as integerE．nd typePrivate Sub Command1_Click()D．im a as stua.x=”ABCD”a.Y=12345print aE．nd Sub程序运行时出现错误，错误的原因是A．)Type定义语句没有放在标准模块中B．)变量声明语句有错C．)赋值语句不对D．)输出语句print不对

[单选题]下列程序的执行结果为 Private Sub Comrnandl_Click( ) Dim p As Integer, q As Integer p=12：q=20 Call Value(p, q) Print p; q End Sub Private Sub Value(ByVal m As Integer, ByVal n As Integer) m=m * 2: n=n - 5 Print m; n End SubA．20 12 20 15B．12 20 12 25C．24 15 12 2