有一个名称为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．按下鼠标键并拖动鼠标，则沿鼠标拖动的轨迹画一条线，放开鼠标键则结束画线

[单选题]（ 33 ）有一个名称为 Form1 的窗体，上面没有控件，设有以下程序（其中方法 Pset(X,Y) 的功能是在坐标X ， Y 处画一个点）：D．im cmdmave As BooleanPrivate Sub Form_MouseDown(Button As Integer,Shift As Integer, X As Single,Y As Single)cmdmave = TrueE．nd SubPrivate Sub Form_MouseMove(Button As Integer,S

[单选题]窗体上有一个名称为Picturel的图片框控件，一个名称为Label1的标签控件，如下图所示。现有如下程序： Public Sub display (x As Control) If TypeOf x Is Label Then x.Caption="计算机等级考试" Else x.Picture=LoadPicture("piC.jpg") End If End Sub Private Sub Labell_Click() Call display(Labell) End Sub Pr

[单选题]在窗体上有一个文本框控件，名称为TxtTime一个计时器控件，名称为Timer1，要求每1秒钟在文本框中显示一次当前的时间，程序为： Private Sub Timer1 ______() TxtTime. text=Time End Sub 在下划线上应填入的内容是 ______。A．EnabledB．VisibleC．IntervalD．Timer

[单选题]在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timer1。要求每一秒在文本框中显示一次当前的时间。程序为:Private Sub Timer1_ _________( )TxtTime.text=TimeE．nd Sub在下划线上应填入的内容是A．EnabledB．VisibleC．IntervalD．Timer

[单选题]在窗体上有一个文本框控件，名称为TextTime；一个计时器控件，名称为Timed。要求每一秒在文本框中显示一次当前的时间。程序为： Private Sub Timerl_ ______ TextTime.text=Time End Sub 在下划线上应填入的内容是( )。A．Ena bledB．ViSibleC．IntervalD．Timer

[单选题]在窗体上有一个文本框控件，名称为TextTime，一个计时器控件，名称为Timer1。要求每一秒在文本框中显示一次当前的时间。 Private Sub Timer1______ TextTime.Text=Time End Sub 在横线上应填入的内容是( )。A．EnabledB．VisibleC．Timer()D．Interval

[单选题]在窗体上有一个文本框控件,名称为TextTime;一个计时器控件,名称为Timerl。要求每一秒在文本框中显示一次当前的时间。程序为:Private Sub Timer1_ ________TxtTime.text=TimeE．nd Sub在下划线上应填入的内容是A．EnabledB．VisibleC．IntervalD．Time

[单选题]在窗体上有一个文本框控件，名称为TxtTime；一个计时器控件，名称为Timer1，要求每一秒钟在文本框中显示一次当前的时间。程序为： Private Sub Timerl ______ TxtTime.text=Time End Sub 在下划线上应填入的内容是A．EnabledB．VisibleC．IntervalD．Timer

[单选题]在窗体上有一个文本框控件，名称为TxtTime，一个计时器控件，名称为Timerl，要求每一秒钟在文本框中显示一次当前的时间。程序为：Private Sub Timer1_（）【】Txt Time.text=TimeEnd Sub在【】中填入合适的事件（）A . EnabledB . VisibleC . IntervalD . Timer

[单选题]在窗体上有一个文本框控件，名称为TxtTime，一个计时器控件，名称为Timer1，要求每一秒钟在文本框中显示一次当前的时间。程序为： Privme SubTimer1_ ______( ) TxtTime.text=Time End Sub 在下划线上应填入的内容是A．EnabledB．VisibleC．IntervalD．Timer