窗体中有图片框（Pieture1)和计时器（Timer1)两个控件。运行程序时，将图片加载到图片框中，然后图片框以每2秒钟一次的速度向窗体的右下角移动，每次向左，向右移动100twip。请填空。 Private Sub Form_ Load（) Picture1_icture=LoadPicture（“c:picmouth.ico”) 【6】 .Interval=2000 End Sub Priv

在窗体上画一个名称为Timer1的计时器控件，要求每隔0.5秒发生一次计时器事件，则以下正确的属性设置语句是（ ）。 在窗体上有一个文本框控件，名称为TextTime，一个计时器控件，名称为Timer1。要求每一秒在文本框中显示一次当前的时间。 窗体上有一个名为Command1的命令按钮和一个名为Timer1的计时器，并有下面事件过程： Private Sub Command1_Click（) Timer1.Enabled=True End Sub Private Sub Form_Load（) Timer1.Interval=5 Timer1.Enabled=False End Sub Private Sub Timer1_Timer（ 窗体上有一个名称为Picture11的图片框控件，一个名称为Timer1的计时器控件，其Interval属性值为1000。要求每隔5秒钟图片框右移100。现编写程序如下：分析以上程序，以下叙述中正确的是（） 在考生文件夹下有一个工程文件sjt3.vbp，窗体中有两个图片框，名称分别为P1、P2，其中的图片内容分别是一架航天飞机和一朵云彩，一个命令按钮，名称为C1，标题为“发射”，还有一个计时器，名称为Timer1。并给出了两个事件过程，但并不完整，要求如下。 ①设置Timer1的属性，使其在初始状态下不计时。 ②设置Timer1的属性，使其每隔0.1秒调用Timer事件过程一次。 ③去掉程序中的注释符 在考生文件夹下有一个工程文件sjt3.vbp，窗体中有两个图片框，名称分别为P1、P2，其中的图片内容分别是一架航天飞机和一朵云彩；一个命令按钮，名称为C1，标题为“发射”；一个计时器，名称为Timer1。并给出了两个事件过程，但并不完整，要求：①设置Timer1的属性，使其在初始状态下不计时；②设置Timer1的属性，使其每隔0.1s调用Timer事件过程一次；③去掉程序 在窗体上有一个文本框控件，名称为TxtTime;一个计时器控件，名称为Timer1，要求每一秒钟在文本框中显示一次当前的时间，程序为 Private Sub Timer1 TxtTime.text=Time End Sub 在横线上应填入的内容是()。 在窗体上画一个标签（名称为Label1)和一个计时器（名称为Timer1)，然后编写如下几个事件过程： Private Sub Form_Load（) Timer1.Enabled=False Timer1.Interval= （10) End Sub Private Sub Form_Click（) Timer1.Enabled= （11) End Sub Private Sub Timer1_ 设窗体上有一个名称为Command1的命令按钮和一个名称为Timer1的计时器，并有下面程序代码：下面叙述中正确的是（） 在窗体上画一个标签（名称为Label1)和一个计时器（名称为Timer1)，然后编写如下几个事件过程： Private Sub Form_Load（)Timer1.Enabled=FalseTimer1.Interval= 【6】 End Sub Private Sub Form_Click（)Timer1.Enabled= 【7】 End Sub Private Sub Timer1_Tim 窗体上有一个名称为Picture1的图片控件，一个名称为Timer的计时器控件，其Interval属性值为1000。要求每隔5秒钟图片框右移100。现编写程序如下：Private Sub Timer1_Timer( )Static n As Integern=n+1If (n/5)=Int(n/5) And Picture1.Left 在窗体上有一个文本框控件，名称为TextTime，一个计时器控件，名称为Timer1。要求每一秒在文本框中显示一次当前的时间。Private Sub Timer1______ TextTime.Text=Time End Sub 在横线上应填入的内容是( )。 窗体上有一个名为Command1的命令按钮和一个名为Timer1的计时器，并有下面的事件过程：程序运行时单击命令按钮，则产生的结果是（） 窗体上有一个名称为Picture1的图片控件，一个名称为Timer的计时器控件，其Interval属性值为1000。要求每隔5秒钟图片框右移100。现编写程序如下：Private Sub Timer1_Timer（)Static n As Integern=n+1If （n/5)=Int（n/5) And Picture1.Left Picture1.Left=Picture1.Left+100 在窗体上画一个文本框和一个计时器控件，名称分别为Text1和Timer1，在属性窗口 中把计时器的Interval属性设置为1000，Enabled属性设置为False。程序运行后，如果单 击命令按钮，则每隔一秒钟在文本框中显示一次当前的时间。以下是实现上述操作的程 序：Private Sub Command1_Click() Timer1.______End SubPrivate Sub Timer1_Timer() Text1.Text = TimeEnd Sub在下划线处应填入的内容是______。 窗体上有一个名称为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 在窗体上画一个标签（名称为Label1)和一个计时器（名称为Timer1)，如图16-11所示，然后编写如下几个事件过程： Private Sub Form_Load（) Timer1. Enabled=False Timer1. Interval= 【8】 End Sub Private Sub Form_Cliek（) Timer1. Enabled= 【9】 End Sub Private 以下程序的功能是每隔一定的时间在窗体的文本框中显示当前时间，刷新的时间间隔由滚动条来设定。窗体中有三个控件：文本框控件Text1用来显示当前时间，水平滚动条控件Hscroll1用来设置Timer1控件发生Timer事件的时间间隔，计时器控件Timer1用来控制每隔一定的时间在Text1中显示一次时间。程序运行的界面如图20-11所示，代码如下，请填空。 Private Sub HScroll1_C 窗体上有一个名称为Label1的标签；一个名称为Timer1的计时器，其Enabled和Interval属性分别为True和1000。编写 如下程序： Dim n As Integer Private Sub Timer1_Timer（) ch = Chr（n + Asc（"A" ) ) Label1. Caption = ch n=n+1 n = n Mod 4 End Sub 运行程序，将 在窗体上有一个文本框控件，名称为TxtTime；一个计时器控件，名称为Timer1。为了使得每一秒钟在文本框中显示一次当前的时间，应将Interval属性值设置为