百年教育职业培训中心 百年教育学习服务平台
题库试卷

国开学习网电大VisualBasic程序设计形考任务四答案

来源: 更新时间:

报名本机构合作学校,赠送复习资料,复习课程,确保录取。并且可以申请学校奖学金500元~1500元不等!答案:微信搜索【渝粤教育】公众号请同学选择课程【第6章】-【实战演练】“实验6word

报名本机构合作学校,赠送复习资料,复习课程,确保录取。并且可以申请学校奖学金500元~1500元不等!

答案:微信搜索【渝粤教育】公众号

请同学选择课程【第6章】-【实战演练】“实验6 word文件显示程序”或【第7章】-【实战演练】“实验7 绘制图形程序”或【第8章】-【实战演练】“实验8 网络下载程序”的其中之一,在VB集成开发环境中认真完成实验。

实验完成后,将调试好的程序保存在以“姓名+实验名称”命名的文件夹下,并将该文件夹压缩成.rar或者.zip格式进行提交。 本次实验满分15分,提交后需要辅导教师批阅打分。

实验目的

1掌握建立图形坐标系的方法。

2掌握VB图形控件和图形方法以及常见几何图形的绘制方法。

实验内容

我们上网浏览一些精彩的网页时,会经常看到一串五颜六色的字符或漂亮的图片尾随着鼠标不断移动。在VB程序中要实现这一功能非常容易,只需要一个MouseMove事件就可以了,本实验就是要学习这种编程技巧。

实验步骤

1实验步骤

新建标准EXE工程,将默认窗体Form1的Caption属性改为“绘制三角函数图形”,在窗体上添加3个命令按钮Command1、Command2和Command3,将其Caption属性分别改为“建立坐标系”“y=Sin(x)”和“y=Cos(x)”,并按图7.18调整好位置。

2编写代码

双击窗体上的“建立坐标系”按钮,进入代码编辑器窗口,在代码编辑区的Command1_Click()中添加代码:

'绘制坐标轴和坐标刻度

Private Sub Command1_Click()

Cls

Form1.Scale (-8, 2)-(8, -2) ??? ?'用Scale方法定义坐标系

Line (-7.5, 0)-(7.5, 0) ???? '用Line方法画X轴

Line (0, 1.7)-(0, -1.7) ??? ?'画Line方法画Y轴

CurrentX = 7.6: CurrentY = 0.1: Print "X" ?? ??'标识X轴

CurrentY = 0.5: CurrentY = 1.8: Print "Y" ??? ?'标识X轴

For i = -7 To 7

Line (i, 0)-(i, 0.1) ??? ?'在X轴上标记坐标刻度

CurrentX = i - 0.2: CurrentY = -0.1: Print I???? '在X轴上输出数字标识

Next i

For i = -1 To 1

If i <> 0 Then

CurrentX = -0.7: CurrentY = i + 0.1: Print I???? '在Y轴上输出数字标识

Line (0.5, i)-(0, i) ???? '在Y轴上标记坐标刻度

End If

Next i

End Sub

' 绘制正弦曲线

Private Sub Command2_Click()

CurrentX = -6.283: CurrentY = 0 ???? '曲线的起点坐标

For i = -6.283 To 6.283 Step 0.01

x = i: y = Sin(i)

Line -(x, y) ???? '用Line方法绘制正弦曲线

Next i

CurrentX = 2.5: CurrentY = 1: Print "y=Sin(x)"??? ?'输出y=Sin(x)

End Sub

Private Sub Command3_Click() ??? ?'绘制余弦曲线

DrawWidth = 2 ???? '设置线宽

CurrentX = -6.283: CurrentY = 1

For i = -6.283 To 6.283 Step 0.01

x = i: y = Cos(i)

Line -(x, y) ??? ?'绘制余弦曲线

Next i

CurrentX = -7: CurrentY = 1.2: Print "y=Cos(x)"??? ?'输出y=Cos(x)

End Sub

运行程序,并单击“建立坐标系”按钮,即绘制出坐标系,然后单击“y=Sin(x)”“y=Cos(x)”按钮,分别绘制出正弦、余弦曲线。


报名联系方式

1、报名热线:13662661040(微信),0755-21017149,QQ:2864330758 郭老师

2、报名地址:深圳市龙华新区工业西路68号中顺商务大厦B704


2022年广 东理工学院成人高考招生简章

2022年广 州城建职业学院成人高等教育招生简章

2022年广 东科学技术职业学院招生简章

2022年广 工业大学 成人 高考 招生简章

2022年广 东生态工程职业学院成人高考招生专业

2022年清 远职业技术学院 成人高考 招生专业简介

2022年韶 关学院成人高考招生简章

2022年广 东财经大学成人 高考 高等教育招生简介

2022年广 东理工学院成人高考招生简章

2022年广 东第二师范学院成人高考招生简章

2022年广 东南方职业学院成人高考招生简章

电话咨询