在窗体上画1个名称为Picturel的图片框，其Picture属性为piel．bmp（在考生文件夹中）。画两个名称分别

窗体上已有1个名称为Picturel的图片框，要求实现下面2个功能之一：

①在窗体上移动鼠标时，立即将Picturel显示在鼠标位置

②在窗体上单击鼠标时，立即将Picturel显示在鼠标位置

下面不能实现上述任何功能的事件过程是

在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Textl)，然后编写如下事件过程：

程序运行后，在文本框中输入3，然后单击命令按钮，则Y的值变为__________。

在窗体上画1个名称为Command1的命令按钮，然后编写如下事件过程：

Private Sub Command1_Click（）

a=0

For i=1 To 2

For j=1 To 4

If j Mod 2＜＞0 Then

a=a-1

End If

a=a+1

Next j

Next i

Print a

End Sub

程序运行后，单击命令按钮，输出结果是（）。

A．0

B．2

C．3

D．4

在窗体上画1个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1 Click() a=0 For i=1 To 2 For j=1 To 4 If j Mod 2＜＞0 Then a=a-1 End If a=a＋1 Next j Next i Print a EndSub 程序运行后，单击命令按钮，输出结果是______。

A．0

B．2

C．3

D．4

在窗体上画1个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1 Click() a=0 For i=1 To 2 For j=1 To 4 If j Mod 2＜＞0 Then a=a-1 End If a=a＋1 Next j Next i Print a EndSub 程序运行后，单击命令按钮，输出结果是______。

A．0

B．2

C．3

D．4

3在窗体上画1个命令按钮(名称为Commandl)和1个文本框(名称为Text1)，然后编写如下事件过程： Private Sub Commandl_Click() x=Val(Text1.Text) SelectCaseX Case 1，3 y=X*X CaseIS＞=10，IS＜=-10 y=X Case-10 To 10 y=-X End Select End S

A．执行y=x*x

B．执行y=-x

C．先执行y=x*x，再执行y=-x

D．程序出错

在窗体上画两个单选按钮(名称分别为Optionl、Option2，标题分别为“宋体”和“黑体”)、1个复选框(名称为Checkl，标题为“粗体”)和1个文本框(名称为Text1．Text属性为“改变文字字体”)，窗体外观如图所示。程序运行后，要求“宋体”单选按钮和“粗体”复选框被选中，则以下能够实现上述操作的语句序列是（）

在窗体上画1个命令按扭(名称为Command1)和1个文本框(名称为Text1)，然后编写如下事件过程： Private Sub Command1_click() x=Val(Text1.Text) Select Case x Case 1,3 y=x*x Case Is＞=10,Is＜=-10 y=x Case-10 To 10 y=-x End Select End Sub 程序运行后，在文本框中输入3，然后单击命令按扭，则以下叙述中正确的是______。

A．执行y=x*x

B．执行y=-x

C．先执行y=x*x，再执行y=-x

D．程序出错

在窗体上画3个标签、3个文本框(名称分别为Text1、Text2和Text3)和1个命令按钮 (名称为Command1)，外观如下图所示。编写如下程序： Private Sub Form_Load() Text1.Text="" Text2.Text="" Text3.Text="" End Sub Private Sub Commandl_Click() x=Val(Text1.Text) y=Val(Text2.Text

A．4

B．6

C．8

D．12

在窗体上画一个名称为Command1的命令按钮，然后编写如下事件过程： Private Sub Command1_Click() a$=“VisualBasic” Print String(3，a$) End Sub程序运行后，单击命令按钮，在窗体上显示的内容是

A．VVV

B．Vis

C．sic

D．11