拉文霍德声望绝版了:如何在使画出来的函数有颜色
来源:百度文库 编辑:查人人中国名人网 时间:2024/05/09 11:59:23
Private Sub command1_click()
PSet (5, 0)
Dim x As Double
Dim y As Double
For x = 0 To 3.14159 * 10 Step 0.0001
y = Sin(x)
Line -(x * 300, y * 1000 + 2000)
Next x
End Sub
程序是上面的怎么样才能画出有颜色的曲线
PSet (5, 0)
Dim x As Double
Dim y As Double
For x = 0 To 3.14159 * 10 Step 0.0001
y = Sin(x)
Line -(x * 300, y * 1000 + 2000)
Next x
End Sub
程序是上面的怎么样才能画出有颜色的曲线
将窗口的foreColor属性改为其它颜色即可!