下列代码运行后输出结果是 Defstr B-E Private Sub Command1_Click() B$="123" C="456" Print B+C$ End Sub

A．123456

B．123456

C．123+"456"

D．显示出错信

[单选题]下列代码运行后输出结果是Defstr B£­EPrivate Sub Command1_Click()B$="123"C="456"Print B£«C$End下列代码运行后输出结果是 Ｄefstr B-E Ｐrivate Sub Command1_Click() Ｂ$="123" Ｃ="456" Ｐrint B+C$ Ｅnd SubA．123456B．123456C．123+"456"D．显示出错信

[单选题]下列代码运行后输出结果是D．efstr B-EPrivate Sub Command1_Click()B．$=" 123 "C．=" 456 "Print B+C$E．nd SubA．123456B．123456C．123+"456 "D．显示出错信

[单选题]下列代码运行后输出结果是( )。 Defstr C-F Private Sub Command1_Click() C$="123" D="456" Print C+D$ End SubA．123456B．"123456"C．123+"456"D．显示出错信

[单选题]（33）有如下事件程序，运行该程序后输出结果是Private Sub Command33_Click()D．im x As Integer,y As Integerx=1:y=0D．o Until y<=25y=y+x*xx=x+1LoopMsgBox "x="&x&",y="&yE．nd SubA．）x=1,y=0B．） x=4,y=25C．）x=5,y=30D．）输出其他结果

[单选题]执行下面的程序，输出的结果是 ______ 。 Private Sub Command1_Click() ch $ = "Welcome to China!" n = Len(ch $ ) For i =1 To n-1 s$ =Mid(ch$ ,i,1) If s$ ="o" Then m=m + 1 Next i Print m End SubA．1B．2C．8D．0

[单选题]下面程序运行后，输出结果是( )。 Private Sub mysub(b()As Integer,OptionalByValnAsInteger=2) ForI=1 to 4 b(I)=n*I NextI End Sub Private Sub Commandl_Click() Dima(1 to 4)As Integer，I As Integer Callmysub(a()，5) Mysuba() ForI=1 to 4 PrinA．5101520B．2468C．出错D．0000

[单选题]下列事件过程运行后输出结果是 Private Sub Command1_Click() Print Format$(123,456，"###,##%") End SubA．123.46%B．123.45%C．123.456%D．12345.6%

[单选题]下列事件过程运行后输出结果是Private Sub Command1_Click()Print Format$(123,456, "###,##%")E．nd SubA．123.46%B．123.45%C．123.456%D．12345.6%

[单选题]下列事件过程运行后输出结果是 Private Sub Command1_Click() Print Formats(123,456，"###,##%") End SubA．123.46%B．123.45%C．123.456%D．12345.6%

[单选题]下列程序运行后的输出结果是______。Private Sub f(k,s) s = 1 for j = 1 To k s=s*j Next jEnd SubPrivate Sub Command1_ Click () Sum = 0 for i = 1 To 3 Call f(i, s) Sum = Sum + s Next i Print Sum End SubA．0B．3C．6D．9