设窗体上有一个名称为label1的标签，程序运行时，单击鼠标左键，再移动鼠标，鼠标的位置坐标会实时地显示在label1标签中，单击鼠标右键则停止实时显示，并将标签中内容清除，下面的程序可实现这一功能，请填空。

D．im down as Boolean

Private Sub form_mousedown(button as integer,shIft as integer,X as single, Y as single)

Select Case(8)

C．ase 1

D．own=true

C．ase2

D．own=false

E．nd select

E．nd Sub

Private Sub form. mousemove(button as integer,shIft as integer,X as single, Y as single)

If (9)then

(10)=”X-” & X & ” Y-” & Y

E．lse

Label1.caption=””

E．nd If

E．nd Sub

[单选题]要求在程序运行时，如果按住鼠标左键不放而移动鼠标，鼠标的位置坐标同步显示在窗体右上角的标签（名称为Label1）中，如图所示，放开鼠标左键后，停止同步

[试题]在窗体上有一个名称为Label1的标签和一个名称List1的列表框。程序运行后，在列表框中添加若干列表项。当双击列表框中的某个项目时，在标签Labe1中显示所选中的项目，如图所示。请在空白处填入适当的内容，将程序补充完整。Private Sub Form_Load（）List1.AddItem "北京"List1.AddItem "上海"List1.AddItem "河北"E．nd SubPrivate Sub List1 (9) （）Labe1.Caption= (10)E．nd S

[单选题]下面程序运行时用鼠标左键单击窗体,输出的值是( )Privatesubform_click()l$="x£«&quo下面程序运行时用鼠标左键单击窗体，输出的值是( )Privatesubform_click()l$="x+":m$="y":n$="z"forj=1to2l$=m$:m$=n$:n$=l$nextjPrintl$+m$+n$endsubA．ZXYB．YZXC．YZYD．ZYZ

[单选题]在窗体上有一个计时器控件Timer1和一个标签控件Label1，在程序运行时可通过每隔30毫秒让Lable1左移100缇，从而产生文字移动动画效果。文字从右向左移动，当移动到接近窗体左边界时停止移动。空格处应填 ______。 Private Sub Form1_Load() LabelLeft=FormWidth TimerInterval=30 ______ End Sub Private Sub Timer1_Timer() Lable1.Left=LableLeft -100 If La

[单选题]窗体上有一个名称为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

[问答题]在考生目录下有一个工程文件sjt3.vbp。窗体上有个钟表图案，其中代表指针的直线的名称是Line1，还有一个名称为Label1的标签和其他一些控件（

[单选题]在窗体上画一个文本框(名称为Text1)和一个标签(名称为Label1)，程序运行后如果在文本框中输入文本，则标签中立即显示相同的内容。以下可以实现上述操作的事件过程是( )。A．Private Sub Text1_Change() Label1．Caption=Text1．Text End SubB．Private Sub Label 1_Change() Label1．Caption=Text1．Text End SubC．Private Sub Text1_Click() Label1．C

[单选题]（ 16 ） 窗体上有一个名称为 Option 1 的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程Private Sub Option1_C1ick （ Index As Integer ）…E．nd Sub下面关于此过程的参数 Index 的叙述中正确的是A． ） Index 为 1 表示单选按钮被选中，为 O 表示未选中B． ） Index 的值可正可负C． ） Index 的值用来区分哪个单选按钮被选中D． ） Index 表示数组中单选按钮的数量

[主观题]下列程序运行时，单击窗体，执行结果为[ ]。说明：在窗体上有一Label控件，名为lblDate。D．im Y As Integer,m As Integer,d As Integer,w1 As IntegerD．im Rq As DateD．im W2 As StringPrivate Sub Form_Click()Rq=DateY=Year(Rq): m=Month(Rq)∶d=Day(Rq)w1=Weekday(x)Select Case w1C．ase 1W2="日"C．ase

[单选题]窗体上有一个名称为Optionl的单选按钮数组，程序运行时，当单击某个单选按钮时，会调用下面的事件过程Private Sub Optionl_Click(Index As Integer)E．nd Sub下面关于此过程的参数Index的叙述中正确的是A．Index为1表示单选按钮被选中，为0表示未选中B．Index的值可上正可负C．Index的值用来区分哪个单选按钮被选中D．Index表示数组中单选按钮的数量