题型：单选题 题类：常考题 难易度：普通
【bj】高中信息技术综合库——基本数据类型1
Private Sub Command1_Click()
Dim r As Single, s As Single '①
r="10米" '②
s=3.14159*r*r '③
Text2.Text ="某个半径为"+ Str(r)+"米的圆,其面积为"+ Str(s)+"平方米." '④
End Sub
则程序中出错的语句是（ ）
按钮，可以{#blank#}1{#/blank#}程序；单击工具栏上的 
进入中断模式；单击工具栏上的 
按钮结束运行。 绘制函数图象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 {#blank#}2{#/blank#} '本行代码计算函数y=x2 Picture1.PSet (x, y), RGB(255, 0, 0) '根据x,y的值用红色描点 Next x '取下一个增量后的x值 End Sub |
以上的VB计算机语言是{#blank#}3{#/blank#}语言。（已知计算机语言有：机器语言、汇编语言、高级语言）
试题篮
