题型:填空题 题类:常考题 难易度:普通
广西壮族自治区田阳高中2018-2019学年高一上学期信息技术11月月考试卷
绘制函数图象y=x2的VB源代码如下,请补充完整。
Private Sub Command1_Click() '按钮的单击事件 Dim x, y As Single '定义x,y两个变量 Picture1.Scale (-10, 25)-(10, -25) '定义坐标系 Picture1.Line (-10, 0)-(10, 0), RGB(0, 0, 255) '画横坐标轴,颜色为蓝色 Picture1.Line (0, 25)-(0, -25), RGB(0, 0, 255) '画纵坐标轴,颜色为蓝色 For x = -10 To 10 Step 0.0001 'x值从-10变化到10,每次增量为0.0001 '本行代码计算函数y=x2 Picture1.PSet (x, y), RGB(255, 0, 0) '根据x,y的值用红色描点 Next x '取下一个增量后的x值 End Sub |
以上的VB计算机语言是语言。(已知计算机语言有:机器语言、汇编语言、高级语言)
试题篮