首页/ 题库 / [单选题]下列代码运行后输出结果是( )。 Def的答案

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

单选题
2022-06-29 12:29
A、123456
B、"123456"
C、123+"456"
D、显示出错信
查看答案

正确答案
D

试题解析

标签:
感兴趣题目
执行下列程序后,鼠标单击窗体,输出结果为。 Private Sub Form_Click() Print“Click”; End Sub Private Sub Form_MouseDown(Button As Integer,Shift_ As Integer,X As Single,Y As Single) Print “Donw” End Sub Private Sub Form_MouseUp(Button As Integer,Shift_ As Integer,X As Single,Y As Single) Print“Up” End Sub
下列程序段运行后窗体上输出结果为( )。 Private Sub Command1_Click() a=5: b=4: c=3: d=2 x=3>2*b Or a=c And b<>c Or c>d Print x End Sub
下列程序段运行后窗体上输出结果为( )。 Private Sub Command1 Click() a=5:b=4:c=3:d=2 X=3>2*b Or a=c And b<>C Or c>d Print X End Sub
下列程序运行时输出的结果是( )。 Option Base 1 Private Sub Form_Click() Dimx(10) ForI=1 to 10 x(i)=10-I+1 Next I ForI=10 to 1 step-2 Printx(i); NextI End Sub
下列代码运行后输出结果是( )。 Defstr C-F Private Sub Command1_Click() C$="123" D="456" Print C+D$ End Sub
下列代码运行后输出结果是 Defstr B-E Private Sub Command1_Click() B$="123" C="456" Print B+C$ End Sub
运行下面程序代码后,变量J的值为______。Private Sub Full () Dim j as Integer J=10 DO J=J+3 Loop While J<19 End Sub
运行下面程序代码后,变量J的值为______。 Private Sub Fun() Dim J as Integer J=10 Do J=J+3 Loop While J<19 End Sub
运行以下程序后,输出的图形是 Private Sub Command1_Click( ) Line(500,500)-(1000,500) Line(750,300)-(750,700) End Sub
运行以下程序后,输出的图形是 Private Sub Command1_Click() Line(500,500)-(1000,500) Line(750,300)-(750,700) End Sub
写出下列程序[如图1]的运行结果:若程序运行后程序= THEN输入x = -2 ,则输出的结果为 ____输出______ .
下列程序段运行后输出的结果是()。 Private Sub Form_Click Dim X#, Y# X = 5: Y = 6 Print X + Y = 11 End Sub
相关题目
下面的程序段运行后,输出结果是( )。
程序运行后的输出结果是()
以下程序运行后的输出结果是
以下程序运行后的输出结果是
运行下列程序: Private Sub Form. Click() Sum=0 For i=1 To 100 If Mid(CStr(i),1, 1)="1" Then Sum=Sum+1 End If Next i Print Sum End Sub 单击窗体后,在窗体上显示的结果是
阅读下列程序: Private Sub Form Click() Dim i As Integer, sum As Integer For i = 2 To 10 If i Mod 2 <> 0 Then Print i; Else sum = sum + i End If Next i Print sum End Sub 程序运行后,单击窗体,在窗体上的输出结果是
下面程序运行后的输出结果是 Private Sub Command1_Click() For j=1 To 10 If j Mod 3<>0 Then a=a+j3 Next Print a End Sub
编写如下程序: Private Sub Form_Click() a$="54321":b$="abcde" For j=1 To 5 Print Mid$(a$,6-j,1)+Mid$(b$,j,1); Next j Print End Sub 程序运行后,单击窗体,其输出结果为 ______。
以下程序运行后输出的结果是______。 Private Sub Form. _Click() a=0 For j=1 To 15 a=a+j Mod 3 Next j Print a End Sub
在窗体中添加一个名称为Cmd的命令按钮,然后编写如下程序: Public x As integer Private Sub Cmd_Click() x=10 Call add1 Call add2 MsgBox x End Sub Private Sub add1 ( ) x=x+20 End Sub Private Sub add2 ( ) Dim x As integer x=x+40 End Snb 窗体打开运行后,单击命令按钮,则消息框的输出结果为( )。
( 34 )假定下列语句都是程序运行后首次执行的输出语句,其中输出结果与另外三条语句不同的语句是
假定下列语句都是程序运行后首次执行的输出语句,其中输出结果与另外3条语句不同的语句是
若将子过程SUB中的PRIVATE X改为PRIVATE Y,则Y的输出结果为 ______。
若将子过程SUB中的PRIVATE X改为PRIVATE Y,则X的输出结果为 ______。
在窗体上画一个命令按钮,然后编写如下事件过程: Private Sub Command_Click( ) S=0 Do s=(s + 1) * (s +2) Number=Number+1 Loop Until S>=30 Print Number,S End Sub 程序运行后,输出的结果是
在窗体上画一个命令按钮,然后写出如下事件过程: Private Sub Command1 _ Click( ) S=1 Do S=(S + 1) ^(S + 2) Number=Number+1 Loop Until S>=6 Print Number,S End Sub 程序运行后,输出的结果是
下面代码执行后,正确的输出结果有()。
下面代码执行后,正确的输出结果是()。
以下程序运行后,输出结果是( )。
执行下列程序后,鼠标单击窗体,输出结果为 Private Sub Form_Click() Print"Click": End Sub Private Sub Form_MouseDown(Button As Integer,Shift_As Integer,X As Single,Y As Single) Print"Donw" End Sub Private Sub Form_MouseUp(Button As Integer,Shift_As Integer,X As Single,Y As Single) Print"Up" End Sub
广告位招租WX:84302438

免费的网站请分享给朋友吧