初中九年级信息技术涂鸦王国-鼠标控制“十市联赛”一等奖_第1页
初中九年级信息技术涂鸦王国-鼠标控制“十市联赛”一等奖_第2页
初中九年级信息技术涂鸦王国-鼠标控制“十市联赛”一等奖_第3页
初中九年级信息技术涂鸦王国-鼠标控制“十市联赛”一等奖_第4页
初中九年级信息技术涂鸦王国-鼠标控制“十市联赛”一等奖_第5页
已阅读5页,还剩8页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

涂鸦王国——鼠标控制本课将学习用VB编写可以用鼠标器在屏幕上随意画图的程序。该程序运行后可以按住鼠标左键画线,按住鼠标右键擦除画线,程序还具有更改画笔线粗、更改画笔颜色和清除屏幕涂鸦的功能。程序运行界面如图所示。1.编写“线段随意画”程序任务分折程序运行后要求,在窗体上以按下鼠标左键的位置为所画线段的起点,按住鼠标左键移动,以抬起鼠标左键的位置为线段的终点,画出起点到终点的连线。设置对象属性线段随意画窗体设计对象的默认名称(Name)属性一般与默认标识(Caption)属性相同,为了更好地识别不同的对象,可以根据对象的含义修改对象的名称属性。对象的名称属性设置应该遵循一定的规则,一般情况下,不同的控件生成的对象名称应使用不同的前缀,这样从名称上就可以区别出是哪一类控件生成的对象,常用基本对象/控件名称前缀如表所示。常用基本对象/控件名称前缀(2)编写事件过程代码线段随意画的程序代码主要由“按下鼠标键(MouseDown)”和“抬起鼠标键(MouseUp)”的事件构成。步骤1:在代码窗口对象下拉组合框中选择窗体Form,在事件下拉组合框中选择MouseDown事件。步骤2:编写按下鼠标键画点的MouseDown事件过程代码。步骤3:编写抬起鼠标键时画线的MouseUp事件过程代码。执行程序,在窗体的不同位置单击鼠标各键或键盘Shift键,通过输出的信息,试总结以下按键规律。即:按下鼠标左键时变量Button中存放的值为。按下鼠标右键时变量Button中存放的值为。按下鼠标滚轮时变量Button中存放的值为。按下键盘Shift键时变量Shif中存放的值为,否则为。

(3)保存文件

以“线段随意画.frm”为窗体文件名,保存文件到“\第2单元\8涂鸦王国”文件夹中。

2.编写“圆形随意画”程序(1)编写事件过程代码:①求圆的半径。②“圆形随意画”的程序代码。(2)保存程序以“圆形随意画.frm”为窗体文件名,保存文件到“\第2单元\8涂鸦王国”文件夹中。3.编写“涂鸦王国”程序(1)设计用户界面(2)设置对象属性(3)编写事件过程代码(4)保存程序以“涂鸦王国.f

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论