第一范文网 - 专业文章范例文档资料分享平台

全国计算机等级考试VB二级上机题库 - 有答案

来源:用户分享 时间:2025/5/24 2:15:01 本文由loading 分享 下载这篇文档手机版
说明:文章内容仅供预览,部分内容可能不全,需要完整文档或者需要复制内容,请下载word后使用。下载word有问题请添加微信号:xxxxxxx或QQ:xxxxxx 处理(尽可能给您提供完整文档),感谢您的支持与谅解。

晨曦制作

要求:程序中不得使用变量,每个事件过程中只能写一

条语句。

注意:存盘时必须存放在考生文件夹中,工程文件名为

“sit2.vbp”,窗体文件名为“sjt2.frm”。

解答:

Private Sub HScroll1_Scroll() Timer1.Interval = HScroll1.Value

End Sub

第 21 页 共 23

晨曦制作

Private Sub Timer1_Timer() Image1.Visible = Not Image1.Visible

End Sub

题目:在名为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

第 22 页 共 23

晨曦制作

第 23 页 共 23

全国计算机等级考试VB二级上机题库 - 有答案.doc 将本文的Word文档下载到电脑,方便复制、编辑、收藏和打印
本文链接:https://www.diyifanwen.net/c4ssa14rnfs4x67j2puoe_5.html(转载请注明文章来源)
热门推荐
Copyright © 2012-2023 第一范文网 版权所有 免责声明 | 联系我们
声明 :本网站尊重并保护知识产权,根据《信息网络传播权保护条例》,如果我们转载的作品侵犯了您的权利,请在一个月内通知我们,我们会及时删除。
客服QQ:xxxxxx 邮箱:xxxxxx@qq.com
渝ICP备2023013149号
Top