第一步:用標簽工具做三個標簽
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的值,就可以得到二次函數的圖像了!
本文到此結束,希望對大家有所幫助。
責任編輯:Rex_18