2. 计算机
  3. 注意：下面出现的“考生文件夹”均为c：\wexam\25160001。 (1) 在考生文件夹下有工程文件sjt3.vbp及窗体文件sjt3.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及所有注释符(即’号)，但不能修改其他部分。

注意：下面出现的“考生文件夹”均为c：\wexam\25160001。 (1) 在考生文件夹下有工程文件sjt3.vbp及窗体文件sjt3.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及所有注释符(即’号)，但不能修改其他部分。

admin2009-02-25  48
问题 注意：下面出现的“考生文件夹”均为c：\wexam\25160001。
   (1) 在考生文件夹下有工程文件sjt3.vbp及窗体文件sjt3.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及所有注释符(即’号)，但不能修改其他部分。存盘时不得改变文件名和文件夹。
   本题描述如下：
   在窗口中有一个名称为Image1的图像框，一个名称为Timer1的计时器，一个名称为HScroll1的滚动条，还有一个名称为C1，标题为“开始”的命令按钮。要求程序运行后，点击开始按钮，则图像框中的图片根据计时器中设定的时间间隔交替变更，如果改变滚动条中滚动框的位置，则图片交替变换的速度也随之变化。程序运行界面如图12-5和图12-6所示。
    (2) 在考生文件夹下有工程文件sjt4.vbp及窗体文件sjt4.frm，该程序是不完整的，请在有?号的地方填入正确内容，然后删除?及所有注释符(即’号)，但不能修改其他部分。存盘时不得改变文件名和文件夹。
   本题描述如下：
   在窗体中有一个名为Image1的图像框，还有两个命令按钮，名称分别是C1和C2，标题分别是“放大”和“缩小”。要求程序运行后，点击C1按钮，则图像框变大；点击C2按钮，则图像框变小。程序运行界面如图12-7所示。
选项
答案时钟控件作用是以一定的时间间隔激发计时器事件(Timer)而执行相应程序代码，Interval属性决定时间间隔的长短，以毫秒为单位，所以要改变两个图片交替的速度可将滚动框的Value值赋值给Interval属性即可：当时钟控件的 Enabled属性为True时，时钟控件才起作用，当为False时该控件不起作用。所以要使开始的时候图片不改变，将Timer控件的Enabled属性设置为False，单击命令按钮要使图片开始改变时，将时钟控件的Enabled属性设置为True；程序运行时用 LoadPicture()方法在图形框里装入图形，其格式为： 图形框．Picture=LoadPicture(图形文件名)。解题步骤： 第一步：建立界面并设置控件属性。程序中用到的控件及其属性见表12-3。 [*] 　　第二步：编写程序代码。 　　程序提供的代码： 　　　　Private Sub C1_Click() 　　　　　Timer1.Enabled=True 　　　　End Sub 　　　　Private Sub HScroll1_Change() 　　　　　’Timer1.?=1000-HScroll1.? 　　　　End Sub 　　　　Private Sub Timer1_Timer() 　　　　　Static i As Integer 　　　　　　If i=0 Then 　　　　　　　’Image1.Picture=?("2.ico") 　　　　　　　i=1 　　　　　Else 　　　　　　　’Image1.Picture=?("1.ico") 　　　　　　　i=0 　　　　　End If 　　　　End Sub 　　参考代码： 　　　　Private Sub C1_Click() 　　　　　Timer1.Enabled=True 　　　　End Sub 　　　　Private Sub HScroll1_Change() 　　　　　Timer1.Interval=1000-HScroll1.Value 　　　　End Sub 　　　　Private Sub Timer1_Timer() 　　　　　Static i As Integer 　　　　　　If i=0 Then 　　　　　　Image1.Picture=LoadPicture("2.ico") 　　　　　　　i=1 　　　　　　Else 　　　　　　Image1.Picture=LoadPicture("1.ico") 　　　　　　i=0 　　　　　End If 　　　　End Sub 　　第三步：调试并运行程序。 　　第四步：按题目要求存盘。 　　(2)在窗体上建立好控件后，先设置控件属性，再编写事件过程。 按钮标题由Caption来设置；在“属性”窗口中通过Picture属性来设置图像框的图片。控件的大小由Width属性和Height属性来设置，Width决定控件的宽，Height决定控件的高度，可在属性窗口中直接设置，也可在程序运行中用代码来设置。 解题步骤： 第一步：建立界面并设置控件属性。程序中用到的控件及其属性设置见表12-4。 [*] 第二步：编写程序代码。 程序提供的代码： Private Sub C1_Click() If Image1.Height ＜3000 Or Image1.Width＜3000 Then ’Image1.Height=Image1.?+500 Image1.Width=Image1.Width+500 End If End Sub Private Sub C2_Click() If Image1.Height＞1000 Or Imagel.Width＞1000 Then Image.Height=Image1.Height-500 ’Image1.Width=Image1.Width ? 500 End If End Sub 参考代码： Private Sub C1_Click() If Image1.Height＜3000 Or Image1.Width＜3000 Then Image1.Height=Image1.Height+500 Image1.Width=Image1.Width+500 End If End Sub Private Sub C2_Click() If Image1.Height＞1000 Or Image1.Width＞1000 Then Image1.Height=Image1.Height-500 Image1.Width=Image1.Width-500 End If End Sub 第三步：调试并运行程序 第四步：按题目要求存盘
解析
转载请注明原文地址:https://www.kaotiyun.com/show/Ch1p777K
本试题收录于： 二级VB题库NCRE全国计算机二级分类
0

二级VB

NCRE全国计算机二级

相关试题推荐
随机试题
最新回复(0)