更多"如果要将形状控件的内部设置为水平线，应将Fillstyle属性设置为【"的相关试题:
[填空题]如果要将形状控件的内部设置为水平线，应将Fillstyle属性设置为【 】。
[填空题]如果要将形状控件的内部设置为水平线，应将Fillstyle属性设置为 【7】 。
[填空题]如果表单及表单控件同时设置了INIT事件，运行表单时，后引发的是______中的 INIT事件。
[单项选择]
看体上有一个名称为Timer1的计时器控件，一个名称为shape1的形状控件，其Shape属性值为3(Cirele)。编写程序如下：
Private Sub Form_Load（ ）
Shape1.Top=0
Timer1.Interval=100
End Sub
Private Sub Timer1_Timer（ ）
Static x As Integer
Shape1.Top=Shape1.Top+100
x=x+1
If x Mod 10=0 Then
Shape1.Top=0
End If
End Sub
以下关于上述程序的叙述中，错误的是（）。
A. 每执行一次Timer1_Timer事件过程，x的值都在原有基础上增加1
B. Shape1每移动10次回到起点，重新开始
C. 窗体上的Shape1由下而上移动
D. Shape1每次移动100
[填空题]如果要为控件设置焦点，则该控件的 【10】 和Enabled属性值为真。
[单项选择]窗体上有一个名称为Timer1的计时器控件，一个名称为Shape1的形状控件，其Shape属性值为3(Circle)。编写程序如下：
Private Sub Form_Load ( )
Shape1. Top = 0
Timer1. Interval = 100
End Sub
Private Sub Timer1_Timer( )
Static x As Integer
Shapel. Top = Shape1. Top + 100
x=x+1
If x Mod 10 =0 Then
Shape1. Top = 0
End If
End Sub
以下关于上述程序的叙述中，错误的是( )。
A. 每执行一次Timer1_Timer事件过程，x的值都在原有基础上增加1
B. Shape1每移动10次回到起点，重新开始
C. 窗体上的shape1由下而上移动
D. Shape1每次移动100
[填空题]VB中的控件分为内部控件、ActiveX控件和 【7】 三类。
[简答题]完成下列问题：
在名称为Form1的窗体上画一个名称为Shape1的形状控件，位置在窗体的顶部，在属性窗口中将其设置为圆形。画一个名称为Timer1的计时器，在属性窗口中将其设置为不可用，时间间隔为0.5s，窗体如图2所示。请编写窗体的Load事件过程和计时器的事件过程，使得程序一开始运行．计时器即变为可用，且每隔0.5s形状控件向下移动100。
[*]
注意：要求程序中不得使用变量，每个事件过程中只能写一条语句。存盘时必须存放在考生文件夹下，工程文件名为sjt2.vbp，窗体文件名为sjt2.frm。
