窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是( )。 Private Sub Commandl_Click() Picturel.Picture=LoadPicture("c：/picture.jpg") Picmrel.Cls Picturel.Print "picture" End Sub

A．窗体无显示，图片框显示图片和文字picture

B．窗体上出现picture文本，图片框无显示

C．窗体上出现picture文本，图片框显示图片picture.jpg

D．窗体无显示，图片框只显示picture文字

[单选题]窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是( )。 Private Sub Command1_Click() Picture1.Picture=LoadPicture("C:/picture.jpg") Picture1.Cls Picture1.Print"picture" End SubA．窗体无显示，图片框显示图片和文字pictureB．窗体上出现picture文本，图片框无显示C．窗体上出现picture文本，图片框显示图片picture.jpgD．窗体无显示，图片

[单选题]窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是( )。 Pfivate Sub Command1_click() Picture1.Picture=LoadPicture("C:/picture.ipg") Picture1.Cis Picture1.Print"picture" End SubA．窗体无显示，图片框显示图片和文字pictureB．窗体上出现picture文本，图片框无显示C．窗体上出现picture文本，图片框显示图片picture.jpgD．窗体无显示，图片

[单选题]（18）窗体上有一个图片控件和一个按钮控件，下列程序执行的结果是。 Privte Sub Command1_Click() Picture1.Picture=LoadPicture("c:/picture.jpg") Picture1.Cls Picture1.Print"Picture" End SubA.窗体无显示，图片框显示图片和文字Picture B.窗体上出现Picture文本，图片框无显示C.窗体上出现Picture文本，图片框显示图片picture.jpg D.窗体无显示，

[主观题]窗体上有一个按钮和一个列表框，执行下列程序后的输出结果为[ ]。Private Sub Command1_Click()List1.Addltem"China"List1.Addltem"USA"List1.Addltem"Japan"，1Print List1.List(2)E．nd Sub

[单选题]窗体上有一个按钮和一个列表框，执行下列程序后，输出的结果为 Private Sub Command1_Click() List1.AddItem "Visual" List1.AddItem "Basic" List1.AddItem "Programming", 1 Print list1.List(2) End SubA．VisualB．BasicC．ProgrammingD．2

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

[单选题]在窗体上添加一个命令按钮控件，名为Command1，事件过程如下，则执行结果是 Option Base 1 Private Sub Command1_Click() Dim a(5)As Integer Dim k As Integer Dim total As Integer a(1) = 2 a(2) = 5 a(3) = 4 a(4) = 10 a(5) = 6 For k = 1 To 5 Total = total + a(k) Next k Print total End SubA.

[单选题]在一个窗体上添加一命令按钮控件，名为Command1，事件过程如下，则执行结果是( )。Option Base 1Private Sub Command1_Click()D．im a(5) As IntegerD．im k As IntegerD．im total As Integera(1)=2a(2)=5a(3)=4a(4)=10a(5)=6F．or k=1 To 5total=total+a(k)Next kPrint totalE．nd SubA．10B．15C．27D．35

[单选题]在一个窗体上添加一个命令按钮控件，名为Command1，事件过程如下，则执行结果是( )。 Option Base 1 Private Sub Command1_Cliek() Dim a(5) As Integer Dim k As Integer Dim tota1 As Integer a(1)=2 a(2)=5 a(3)=4 a(4)=10 a(5)=6 Fork=1 To 5 tota1=tota1+a(k) Next k Print total End SubA．10B．15C．27

[单选题]在窗体上有一个计时器控件Timer1和一个标签控件Labe11，在程序运行的时候，可通过每隔30ms让Labe11左移100缇，从而产生文字移动动画效果。文字从右向左移动，当移动到接近窗体左边界时停止移动，如图20-9所示。空格处应填( )。 Private Sub Form_Load() Labell．Left=Form1．Width Timer1．Interval=30 Timer1．Enabled=True End Sub Private Sub Timer1_Timer() Labell