发布时间 : 星期三 文章全国计算机等级考试VB二级上机题库,有答案(供参考)更新完毕开始阅读f278e4247d1cfad6195f312b3169a4517623e532
文档来源为:从网络收集整理.word版本可编辑.欢迎下载支持.
Print #1, Text1.Text, Text2.Text
Close #1 End Sub
编写适当的事件过程,使程序运行后,可以使图像框闪烁,其闪烁速度可以通过滚动条来调节。
提示:图像框的闪烁可以通过图像框交替地显示和隐藏来实现。 要求:程序中不得使用变量,每个事件过程中只能写一条语句。
注意:存盘时必须存放在考生文件夹中,工程文件名为“sit2.vbp”,窗体文件名为“sjt2.frm”。
解答:
Private Sub HScroll1_Scroll() Timer1.Interval = HScroll1.Value
End Sub
Private Sub Timer1_Timer() Image1.Visible = Not Image1.Visible
End Sub
文档来源为:从网络收集整理.word版本可编辑.欢迎下载支持.
题目:在名为Form1的窗体上绘制两个图像框,名称分别为Pic1和Pic2,宽度和高度均为1500,通过属性窗口把图像文件tp1.jpg放入Pic1中,把图像文件tp2.jpg放入Pic2中;再绘制一个名为Cmd1的命令按钮,标题为\图片交换\,如图1-4所示。编写适当的事件过程,使得在运行时,如果单击窗体,则交换
两个图像框中的图像。注意不允许使用第三个图像框。
Private Sub Form_Click() Dim pic As Object Set pic = Image1.Picture Image1.Picture = Image2.Picture
Image2.Picture = pic
End Sub