当执行以下过程时，在窗体上将显示（）。 Private Sub Command1_Click（) Print "VB" Print "Hello!"; Print "VB" End SubA．VB Hello! VBB．VBHello!VBC．VB Hello! VBD．VB Hello! VB
当执行以下过程时，在窗体上将显示（）。 Private Sub Command1_Click（) Print "VB" Print "Hello!"; Print "VB" End Sub
A．VB Hello! VB
B．VBHello!VB
C．VB Hello! VB
D．VB Hello! VB
参考答案和解析
VBHello！VB
相关考题：
下面程序运行后，窗体中显示【 】。Private Sub Command1_Click) ( )aS ="*" :b$ ="$"For k = 1 To 3x$ =Strings (Len(a$) +k,b$ )Print x $;NextPrintEnd Sub
执行下列程序后，鼠标单击窗体，输出结果为 。Private Sub Form_Click（）Print "Click";End SubPrivate Sub Form_MouseDown（Button As Integer, Shift _As Integer, X As Single, Y As Single）Print "Donw"End SubPrivate Sub Form_MouseUp（Button As Integer, Shift _As Integer, X As Single, Y As Single）Print " Up"End Sub（ ）。A．DownUpClickB．ClickDownUpC．DownClickUpD．UpDownClick
执行以下语句过程，在窗体上显示的内容是Option Base 0Private Sub Command3_Click（）Dim dd=Array（"a", "b", "c", "d"）Print d（1） ; d（3）End Sub（ ）。A．abB．bdC．acD．出错
窗体上有两个按钮，则执行程序后按键盘Cance1键的输出结果是 【7】 。Private Sub Command1_Click（）Print "北京";End SubPrivate Sub Command2_Click（）Print "南京";End SubPrivate Sub Form_Load（）Command2.Cancel=TrueCommand1.Cancel=TrueEnd Sub
对窗体编写如下事件过程： Private Sub Form_ MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) If Button =2 Then Print “AAAAA” End If End Sub Private Sub Form_ MouseUp (Button As Integer，Shift As Integer，X As Single，Y As Single) Print “BBBBB” End Sub 程序运行后，如果单击鼠标右键，则输出结果为______ 。A．AAAAA BBBBBB．BBBBBC．AAAAAD．BBBBB AAAAA
在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：Private Sub Form_Click（）Text1.Text = "VB程序设计"End SubPrivate Sub Text1_Change（）Picture1.Print "VB Programming"End Sub程序运行后，单击窗体，则在文本框中显示的内容是______，而在图片框中显示的内容是_____。
（10）在窗体上画一个文本框和一个图片框，然后编写下列两个事件过程： Private Sub Form_Click() Text1.Text="VB Programming" End Sub Private Sub Text1_Change() Picture1.Print"VB程序设计" End Sub 程序运行后，单击窗体，则在文本框中显示的内容是，而在图片框中显示的内容是 。
下列程序输出的结果为【 】。Private Sub Commandl_Click( )Dim a As Booleana = TrueIf a Then GoTo 11 Else GoTo 2211:Print "VB";22:Print "VC"End Sub
执行以下Command1的Click事件过程，在窗体上显示 Option Base 0 Private Sub Command1_Click() Dim a a = Array("a", "b", "c", "d", "e", "f", "g") Print a(1); a(3); a(5) End SubA．abcB．bdfC．aceD．出错
以下能够正确计算n!的程序是A．Private Sub Command1_Chck( ) n=5：x=1 Do x=x*i i=i+1 Loop While i＜n Print x End SubB．Private Sub Command1_Click( ) n=5：x=1：i=l Do x=x*i i=i+1 Loop While i＜n Print x End SubC．Private Sub Command1_Click( ) n=5：x=1：i=l Do x=x*i i=i+1 Loop While i＜=n Print x End SubD．Private Sub Command1_Click( ) n=5：x=1：i=l Dox=x*i i=i+1 Loop While i＞n Print x End Sub
以下能够正确计算n!的程序是A．Private Sub Command1 Click() n=5：x=1 Do x=x * I I=I + 1 Loop While I ＜ n Print x End SubB．Private Sub Command1_Click() n=5：X=1：I=1 Do X=X*I I=I + 1 Loop While I ＜n Print x End SubC．Private Sub Command1_Click() n=5：X=1：I=1 Do X=X * I I=I + 1 Loop While I＜=n Print X End SubD．Private Sub Command1_Click() n=5：X=1：I=1 Do x=x * I I=I + 1 Loop While I＞n Print X End Sub
窗体上有一个名称为HScroll 1的滚动条，程序运行后，当单击滚动条两端的箭头时，立即在窗体上显示滚动框的位置(即刻度值)。下面能够实现上述操作的事件过程是( )。A． Private Sub HScroll 1_Change() Print HScroll1.Value End SubB．Private Sub HScroll 1_Change() Print HScroll1.SmallChange End SubC．Private Sub HScroll1 Scroll() Print HScroll1.Value End SubD．Private Sub HScroll1_Scroll() Print HScroll1.SmallChange End Sub
执行下列程序后，鼠标单击窗体，输出结果为Private Sub Form_Click()Print "Click"；End SubPrivate Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single)Print "Donw"End SubPrivate Sub Form_MouseUp(ButtonAs Integer，Shift As Integer，X As Single，Y As Single)Print "Up"End SubA．DownUpClickB．ClickDownUpC．DownClickUpD．UpDownCliek
在窗体上画一个名称为Commandl的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a$="VisualBasic" Print String(3，a$) End Sub 程序运行后，单击命令按钮，在窗体上显示的内容是A．VVVB．VisC．sicD．11
以下能够正确计算n!的程序是A．Privas Sub Command1_Click() n=5：x=1 Do x=x*i i=i+1 Loop While i＜n Print x End SubB．Private Sub Command1_Click() n=5：x=1：i=1 Do x=x*i i=i+1 Loop While i＜n Print x End SubC．Private Sub Command1_Click() n=5：x=1：i=1 Do x=x*i i=i+1 Loop while i＜=n Print x End SubD．Private Sub Command1_Click() n=5：x=1：i=1 Do x=x*i i=i+1 Loop While i＞n Print x End Sub
在窗体中画一个命令按钮，然后编写以下事件过程： Private Sub Command1_Click() For j=1 To 3 Print Tab(3(j)；11((2(j-1)； Next j Print End Sub 程序的执行结果为A．11B．33C．11 33D．11 33 55
以下能够正确计算1+2+3+…+10的程序是A．Private Sub Command1_Click() Sum=0 ForI=1 To 10 Sum=Sum+I Next I Print Sum End SubB．Private Sub Command1_Click() Sum=0，I=1 Do While I＜=10 Sum=Sum+I I=I+1 Print Sum End SubC．Private Sub Command1_Click() Sum=0： I=1 Do Sum=Sum+I I=I+1 Loop While I＜10 Print Sum End SubD．Private Sub Command1_Click() Sum=0： I=1 Do Sum=Sum+I I=I+1 Loop Until I＜10 Print Sum End Sub
设在窗体Forml上有一个列表框Listl，其中有若干个项目。要求单击列表框中某一项时，把该项显示在窗体上，正确的事件过程是。 A．Private Sub Listl_Click B．Private Sub Forml_Click Print Listl．Text Print Listl．Text End Sub End Sub C．Private Sub Listl_Click D．Private Sub Forml_Click Print Forml．Text Listl．Print Listl．Text End Sub End Sub
以下能够正确计算n!的程序是A．Private Sub Command1_Click( ) n=5: x=1 Do x=x*i i=i+1 Loop While i＜n Print x End SubB．Private Sub Command1_Click( ) n=5: x=1: i=1 Do x=x*i i=i+1 Loop While i＜n Print x End SubC．Private Sub Command1_Click( ) n=5:x=1:i=1 Do x=x*i i=i+1 Loop While i＜= n Print x End SubD．Private Sub Command1_Click( ) n=5:x=1:i=1 Do x=x*i i=i+1 Loop While i＞n Print x End Sub
在窗体上画一个命令按钮，名称为Command1，然后编写如下程序： Private Sub Command1_Click() For i=1 To 2 For j=1 To i Print String(i,"Hello") Next j Print Next i End Sub 程序运行后，如果单击命令按钮，则在窗体上显示的内容是( )。A．H HH HHB．H HHHHC．HHHHH HH HHHHD．H
以下能够正确计算n!的程序是______。A．Private Sub Commeadl_Click() n=5: x=1 Do x=x*i i=i+1 Loop While i＜n Print x End SubB．Private Sub Command1_Click() n=5: x=1: i=1 Do x=x*i i=i+1 Loop While i＜n Print x End SubC．Private Sub Command1_Click() n=5: x=1: i=1 Do x=x*i i=i+1 Loop Whilei＜=n Print x End SubD．Private Sub Commsndl_Click() n=5: x=1: i=1 Do x=x*i i=i+1 Loop While i＞n Print x End Sub
在窗体上画了两个按钮控件Command1和Command2，有如下程序： Private Sub Command1_Click() Print "Visual"； End Sub Private Sub Command2_Click() Print "Basic"； End Sub Private Sub Form_Load() CommandCancel=True Command1.Cancel=True End Sub 执行程序后，按键盘Cancel键，在窗体上输出的结果是A．BasicB．VisualC．CancelD．True
执行下列程序后，鼠标单击窗体，输出结果为 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 SubA．DownUpClickB．CfickDownUpC．DownClickUpD．UpDownClick
当执行以下过程时，在窗体上将显示( )。Private Sub Command1_Click( )Print "VB";Print "Hello! ";Print "VB"End SubA、 VBHello!VBB、 VBHello!VBC、 VBD、 VBHello! VB Hello!VB
下列程序段的执行结果为______。 Private Sub Command1_Click() a=1：b=1 Select Case a Case 1 Select Case b Case 0 Print "你好!" Case 1 Print "Hello!" End Select Case 2 Print"谢谢使用!" End Select End SubA．你好!B．谢谢使用!C．Hello!D．你好!谢谢使用!
在窗体上画一个文本框和一个图片框，然后编写如下两个事件过程：Private Sub Form_Click()Textl.Text="VB程序设计"End SubPrivate Sub Textl_Change()Picturel.Print"VB programming"End Sub程序运行后，单击窗体，则在文本框中显示的内容是【 】，而在图片框中显示的内容是【 】。
执行以下Command1的Click事件过程在窗体上显示（） Private Sub Command1_Click（ ） Dim a a = Array(“a”,”b”,”c”,”d”,”e”,”f,”,”g”) Print a(1); a(3); a(5) End SubA、a；b；cB、b；d；fC、a；c；eD、出错
单选题执行以下Command1的Click事件过程在窗体上显示（） Private Sub Command1_Click（ ） Dim a a = Array(“a”,”b”,”c”,”d”,”e”,”f,”,”g”) Print a(1); a(3); a(5) End SubAa；b；cBb；d；fCa；c；eD出错