网友您好， 请在下方输入框内输入要搜索的题目：
题目内容
（请给出正确答案）
（ 33 ）有一个名称为 Form1 的窗体，上面没有控件，设有以下程序（其中方法 Pset(X,Y) 的功能是在坐标X ， Y 处画一个点）：
Dim cmdmave As Boolean
Private Sub Form_MouseDown(Button As Integer,Shift As Integer, X As Single,Y As Single)
cmdmave = True
End Sub
Private Sub Form_MouseMove(Button As Integer,Shift As Integer, X As Single, Y As Single)
If cmdmave Then
Form1.Pset(X,Y)
End If
End Sub
Private Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single,Y As Single)
cmdmave = False
End Sub
此程序的功能是
A ）每按下鼠标键一次，在鼠标所指位置画一个点
B ）按下鼠标键，则在鼠标所指位置画一个点；放开鼠标键，则此点消失
C ）不按鼠标键而拖动鼠标，则沿鼠标拖动的轨迹画一条线
D ）按下鼠标键并拖动鼠标，则沿鼠标拖动的轨迹画一条线，放开鼠标键则结束画线
参考答案
更多 “ （ 33 ）有一个名称为 Form1 的窗体，上面没有控件，设有以下程序（其中方法 Pset(X,Y) 的功能是在坐标X ， Y 处画一个点）：Dim cmdmave As BooleanPrivate Sub Form_MouseDown(Button As Integer,Shift As Integer, X As Single,Y As Single)cmdmave = TrueEnd SubPrivate Sub Form_MouseMove(Button As Integer,Shift As Integer, X As Single, Y As Single)If cmdmave ThenForm1.Pset(X,Y)End IfEnd SubPrivate Sub Form_MouseUp(Button As Integer, Shift As Integer, X As Single,Y As Single)cmdmave = FalseEnd Sub此程序的功能是A ）每按下鼠标键一次，在鼠标所指位置画一个点B ）按下鼠标键，则在鼠标所指位置画一个点；放开鼠标键，则此点消失C ）不按鼠标键而拖动鼠标，则沿鼠标拖动的轨迹画一条线D ）按下鼠标键并拖动鼠标，则沿鼠标拖动的轨迹画一条线，放开鼠标键则结束画线 ” 相关考题
考题
多窗体程序由多个窗体组成，在默认情况下，VB在执行应用程序时，总是把( )指定为启动窗体。A．不包含任何控件的窗体B．设计时的第一个窗体C．命名为Form1的窗体D．包含控件最多的窗体
考题
请根据以下各小题的要求设计Visual Basic应用程序(包括界面和代码)。1．在名称为Form1的窗体上放置一个名称为Drive1的DriveListBox控件，一个名称为Dir1的DirListBox控件和一个名称为File1的FileListBox控件。程序运行时，可以对系统中的文件进行浏览；当双击File1中的文件名时，用MsgBox显示文件名(不显示路径名)。注意：程序中不得使用任何变量；保存时必须存放在考生文件夹下，窗体文件名为Sjt1. frm，工程文件名为sjt1.vbp。2．在名称为Form1的窗体上放置一个名为Text1的文本框控件和一个名为Timer1的计时器控件，程序运行后，文本框中显示的是当前的时间，而且每一秒文本框中所显示的时间都会随时间的变化而改变。注意：程序中不得使用任何变量；保存时必须存放在考生文件夹下，窗体文件名为sjt2. frm，工程文件名为sjt2.vbp，如图1—1所示。
考题
一个工程中含有窗体Form1、Form2和标准模块Modell，如果在Form1中有语句Public X As Integer，在Modell中有语句Public Y As Integer。则以下叙述中正确的是 ______。A．变量X、Y的作用域相同B．Y的作用域是ModellC．在Form1中可以直接使用XD．在Form2中可以直接使用X和Y
考题
有一个名称为Fom1的窗体，上面没有控件，设有以下程序(其中方法PSet(X，Y)的功能是在坐标X，Y处画一个点)： Dim cmdmave As Boolean Private Sub Form_MouseDown(Button As Integer，Shift As Integer，X As Single，Y As Single) cmdmave=True End Sub Private Sub Form_MouseMove(Button AS Integer，Shift As Integer，X AS Single，Y As Single) If cmdmave Then Forml．PSet(X，Y) End lf End Sub Private Sub Form_MouseUp(Button As Integer，Shift As Integer，X As Single，Y As Single) cmdmave=False End Sub 此程序的功能是。 A．每按下鼠标键一次，在鼠标所指位置画一个点 B．按下鼠标键，则在鼠标所指位置画一个点；放开鼠标键，则此点消失 C．不按鼠标键而拖动鼠标，则沿鼠标拖动的轨迹画一条线 D．按下鼠标键并拖动鼠标，则沿鼠标拖动的轨迹画一条线，放开鼠标键则结束画线
考题
一个工程中含有窗体Form1、Form2和标准模块Model1,如果在Form1中有语句PublicX As Integer,在Model1中有语句Public Y As Integer。则以下叙述中正确的是A．变量X、Y的作用域相同B．Y的作用域是Model1C．在Form1中可以直接使用XD．在Form2中可以直接使用X和Y
考题
2、关于VB的窗体下列说法中不正确的是A．窗体就是应用程序的界面，每个应用程序中至少有一个窗体B．窗体是一个容器，在窗体上可以添加很多其他控件C．窗体是一个控件，可以像标签、文本输入框、命令按钮等控件那样通过鼠标拖的方法创建D．启动VB后，VB会在其编辑界面上自动创建一个名称为Form1的窗体
考题
假设窗体Form1中用如下方式定义了二个模块级变量： Public x% Dim y% 则下面叙述正确的是___________。A．Form2窗体要访问x变量时，一定要在变量x前加窗体名Form1，即：Form1.xB．Form2窗体可以直接访问x、y变量C．Form2窗体不可以直接访问x、y变量D．Form2窗体要访问x变量时，一定要在变量x前加Me，即：Me.xE．Form2窗体要访问y变量时，一定要在变量y前加窗体名Form1，即：Form1.y
热门标签
最新试卷
