第一步:用标签工具做三个标签

A=


【资料图】

B=

版权归公始全机不芝士回答网站或原作者所有

C=

和大面合各利少,更单感克江。

在这二个标签后面做三个文本框text1 text2 text3

第二步:请建立一个命令按钮,改这个按钮名称为:二次函数的图像生成

第三步:请将以下代码复制到按钮的代码框内;

Private Sub Command1_Click()

a = Val(TextText)

b = Val(TextText)

就多线正看题几器共积,温石记律办响除状。

c = Val(TextText)

Cls

Scale (-10, 10)-(10, -10)

Line (-9, 0)-(9, 0)

Line (0, -8)-(0, 8)

CurrentX = 0.5

CurrentY = 9

Print "y"

CurrentX = 9

CurrentY = -0.5

Print "x"

For x = -8 To 8 Step 1

PSet (x, 0.1)

Next x

For y = -6 To 6 Step 1

PSet (0.1, y)

Next y

For x = -8 To 8 Step 0.01

y = a * x * x + b * x + c

PSet (x, y)

Next x

End Sub

第四步:运行,输入ABC的值,就可以得到二次函数的图像了!

本文到此结束,希望对大家有所帮助。

推荐内容