“猜币程序”对象属性设置.ppt
《“猜币程序”对象属性设置.ppt》由会员分享,可在线阅读,更多相关《“猜币程序”对象属性设置.ppt(5页珍藏版)》请在三一办公上搜索。
“猜币程序”主界面如下:,设置对象属性,Private Sub Command1_Click()Rem 定义x,n 为整型变量 Dim x As Integer Dim n As Integer Rem 模拟掷币程序 Randomize n=Int(2*Rnd)If n=1 Then Image1.Picture=LoadPicture(正.gif)Label2.Caption=正面 Else Image1.Picture=LoadPicture(背.gif)Label2.Caption=背面 End If Rem 判断程序 x=Val(Text1.text)If n=x Then Label3.Caption=哈,您猜对了!Else Label3.Caption=哈,您猜错了!End IfEnd Sub,“命令按钮”代码提示:,正、背面图片:,跟着老师操作:,1.启动VB6.0工具;,2.新建工程和窗体,添加各个对象,设置对象属性;,3.双击命令按钮,添加程序代码;,4.运行程序,观察结果。,
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- 程序 对象 属性 设置
三一办公所有资源均是用户自行上传分享,仅供网友学习交流,未经上传用户书面授权,请勿作他用。
链接地址:https://www.31ppt.com/p-6055658.html