若看到程序中有以下事件过程，则可以肯定的是，当程序运行时（）。 Private Sub Click MouseDown(Button As Integer,Shift As Integer,X As Single，Y As Single) Print”Visual Basic Program” End Sub -题库考试答案搜索网

若看到程序中有以下事件过程，则可以肯定的是，当程序运行时（）。 Private Sub Click MouseDown(Button As Integer,Shift As Integer,X As Single，Y As Single) Print”Visual Basic Program” End Sub

单选题

2022-01-04 17:33

A、用鼠标左键单击名称为“Command1”的命令按钮时，执行此过程
B、用鼠标左键单击名称为“MouseDown”的命令按钮时，执行此过程
C、用鼠标右键单击名称为“MouseDown”的控件时，执行此过程
D、用鼠标左键或右键单击名称为“Click”的控件时，执行此过程

查看答案

正确答案

D

试题解析

D) 【解析】鼠标按下事件(MouseDown)适用于窗体和大多数控件，包括复选框、命令按钮、单选按钮、框架、文本框、目录框、文件框、图像框、图片框、标签、列表框等。事件过程名格式为：控件名事件名，故本题Private Sub Click MouseDown 中的Click应为控件名。

标签：

感兴趣题目

下列程序运行时输出的结果是( )。 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

有下列程序： Private Sub Command1_Click() X$="Nanchang" y$="Beijing" z$="Nanjing" z$=InStr(Left(x$，3)+Right(y$，4)，z$) Print z$ End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是

Private Sub Command1_Click（） a=Val（InputBox（"请输入a的值="）） b=Val（InputBox（"请输入a的值="）） x=a+b Ifa＞b Then x=a-b End If Print x End Sub 若运行时从键盘输入a和b分别为3和4，则程序输出的结果为（）

若程序中有宏定义行 :#define N 100 则以下叙述中正确的是

若程序中有宏定义行：#define N 100 则以下叙述中正确的是（）。

若程序中有宏定义行：#define N 100则以下叙述中正确的是( )。

设有如下程序： Private Sub Command1_Click（） Dim a Dim I As Integer a=Array（1，2，3，4，5，6，7，8，9） For I=0 To 3 Print a（5-I）； Next I End Sub 程序运行后，单击窗体，则在窗体上显示的是（）

（ 30 ）下面程序运行时，若输入 395 ，则输出结果是

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Sum=0 For x=1 To 5 Call subl(x, s) Sum=Sum+s Next x Print Sum End Sub Private Sub subl(y, w) w=1 For i=1 To y w=w*i Next i 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

下列程序段运行后输出的结果是（）。 Private Sub Form_Click Dim X#, Y# X = 5: Y = 6 Print X + Y = 11 End Sub

相关题目: 在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() Dim a As Integer, s As Integer a = 8 a = 1 Do s = s + a a = a - 1 Loop While a <= 0 Print s; a End Sub 程序运行后，单击命令按钮，则窗体上显示的内容是_____; 有以下程序: 运行时,若输入1<回车>,则输出结果是( )。; 在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click()Dim x As Integerx = Val(InputBox("请输入一个整数"))Print x + Text1TextEnd Sub程序运行时,在文本框中输入12,然后单击窗体,在输入对话框中输入34,单击"确定"按钮后,在窗体上显示的内容为______。; 在窗体上画1个命令按钮，并编写如下事件过程：Private Sub Command1_Click()For i=5 to 1 step -08Print Int(i);Next iEnd Sub运行程序,单击命令按钮,窗体上显示的内容为________。; 在代码窗口中,有如下事件过程,以下叙述正确的是______。Private Sub Option1_Click(Index As Integer)……End Sub; 在窗体上画一个文本框，然后编写如下事件过程：Private Sub Form_Click() Dim x As Integer x = Val(InputBox("请输入一个整数")) Print x + Text1TextEnd Sub程序运行时，在文本框中输入12，然后单击窗体，在输入对话框中输入34，单击"确定"按钮后，在窗体上显示的内容为______。; 下面程序运行后的输出结果是 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 窗体打开运行后，单击命令按钮，则消息框的输出结果为( )。; 在Visual Basic程序运行期间，若改变窗体大小，则自动触发的窗体事件是（）。; 当运行程序时，系统自动执行启动窗体的（）事件。; 当运行程序时，系统会自动执行启动窗体的某个事件过程，该事件过程是 ______ 。; 下面程序的输出是______。Private Sub Command1_Click() Print 73End Sub; 在窗体上画一个命令按钮，然后编写如下事件过程： 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 Click—MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) Print"VB Program" End Sub; 若看到程序中确以下事件过程，则可以肯定的是，当程序运行时（）。Private Sub Click—MouseDown(Button As Integer，Shift As Integer，X As Single，YAs Single)Print"VB Program"End Sub; 若看到程序中有以下事件过程，则可以肯定的是，当程序运行时（）。 Private Sub Click MouseDown(Button As Integer,Shift As Integer,X As Single，Y As Single) Print”Visual Basic Program” End Sub; 若看到程序中有以下事件过程，则可以肯定的是，当程序运行时Private Sub Click_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single)Print”VB Program”End Sub

广告位招租WX:84302438

题库考试答案搜索网

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