资源描述:
《vb语言画圆程序设计》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库。
1、VB语言画圆程序设计1由圆组成的标志:2Circle(x,y),r画圆语句的格式PrivateSubForm_Click()Circle(2500,2000),1000EndSub圆心位置半径大小3圆心与半径·圆心(2500,2000)XYO·····10002000300040005000·····4000100020003000PrivateSubForm_Click()Circle(2500,2000),1000EndSub程序:运行结果:半径1000Circle(x,y),r格式:4实践任务一(参照学案要求)2、编写程序,画如下指定圆心(20
2、00,1500)的圆:PrivateSubForm_Click()Circle(2000,1500),800EndSub1、启动VB程序,新建工程文件,调整“窗体窗口”到合适大小;将“Load”事件过程修改为“Click”事件过程。5实践任务二(参照学案要求)2、修改四个圆的圆心,体会圆的位置变化。PrivateSubForm_Click()Circle(2000,1500),800Circle(3000,2500),1000……EndSub1、用复制、粘贴的方法,画出四个圆。6RGB(a,b,c)颜色参数设置①RGB颜色参数的格式:RGB(a,b,
3、c)a,b,c的值为:0-255RGB(0,0,0)表黑色RGB(255,0,0)表红色RGB(0,255,0)表绿色RGB(0,0,255)表蓝色RGB(255,255,255)表白色……了解更多颜色,请看学案。三基色图黄7画圆语句呈现颜色的方法PrivateSubForm_Click()Circle(2500,2000),1000,RGB(255,0,0)Circle(5000,4000),1000,RGB(0,255,0)Circle(5500,3000),1000,RGB(0,0,255)EndSub画红圆画绿圆画蓝圆8实践任务三(参照学案要
4、求)1、给刚才画的四个圆加上RGB颜色参数,显示不同颜色;2、改变RGB颜色参数,看一看相对应的圆是否改变颜色.9实践任务四(参照学案要求)1、基本任务:设计由若干个彩圆组成的有规律或创意的图案;2、探索性任务(选做):有能力的同学,根据学习资料的提示,可尝试画“奥运五环”等更有创意或复杂的图案。10Circle(2000,2500),1000Circle(4500,2500),1000Circle(7000,2500),1000Circle(3250,3500),1000Circle(5750,3500),100011Inputbox函数r=inp
5、utbox(“请输入圆的半径:”,“输入圆半径”)其作用是显示一个提示输入圆半径的对话框,并把用户所输入圆半径的值赋给左边的变量r。12小结圆心和半径是控制圆位置和大小的关键;书写程序要严格按照语法规则进行;13