回复：我要被我数学老师气死

黄欣先生咋跑这来了……

老师说的都是“对的”

Picture1.Line (-(Fix(hzd / 10) + 1), 0)-((Fix(hzd / 10) + 1) * 10, 0)
r = 0
Do While r <= (Fix(zzd / 10) + 1) * 10
Picture1.Print r
r = r + Fix(zzd / 10) + 1
Picture1.PSet (0, r), RGB(0, 255, 0)
Loop
s = 0
Do While s <= (Fix(hzd / 10) + 1) * 10
Picture1.Print s
s = s + Fix(hzd / 10) + 1
Picture1.PSet (s, 0), RGB(0, 255, 0)
Loop
Picture1.PSet (0, 0), RGB(0, 255, 0)
End Sub
Sub sd()
Dim m As Integer
m = 0
Do While m < k
m = m + 1
Picture1.PSet (Val(a(m)), Val(b(m))), RGB(255, 0, 0)
Loop
End Sub
Private Sub Command3_Click()
Picture1.Cls
Call jx
Call sd
End Sub
Private Sub Form_Click()
Picture1.Width = 2 * Form1.Width / 3
Picture1.Height = 2 * Form1.Height / 3
Picture1.Left = Form1.Width / 35
Picture1.Top = Form1.Height / 16
Picture2.Width = Form1.Width / 4
Picture2.Height = 2 * Form1.Height / 3
Picture2.Left = 17 * Form1.Width / 24
Picture2.Top = Form1.Height / 16
Picture3.Width = 3 * Command1.Width
Picture3.Height = Command1.Height
Picture3.Left = Form1.Width / 2 - Picture2.Width / 2
Picture3.Top = Picture1.Height + 2 * Picture1.Top
End Sub
我是数学老师

Picture1.Line (-(Fix(hzd / 10) + 1), 0)-((Fix(hzd / 10) + 1) * 10, 0)
r = 0
Do While r <= (Fix(zzd / 10) + 1) * 10
Picture1.Print r
r = r + Fix(zzd / 10) + 1
Picture1.PSet (0, r), RGB(0, 255, 0)
Loop
s = 0
Do While s <= (Fix(hzd / 10) + 1) * 10
Picture1.Print s
s = s + Fix(hzd / 10) + 1
Picture1.PSet (s, 0), RGB(0, 255, 0)
Loop
Picture1.PSet (0, 0), RGB(0, 255, 0)
End Sub
Sub sd()
Dim m As Integer
m = 0
Do While m < k
m = m + 1
Picture1.PSet (Val(a(m)), Val(b(m))), RGB(255, 0, 0)
Loop
End Sub
Private Sub Command3_Click()
Picture1.Cls
Call jx
Call sd
End Sub
Private Sub Form_Click()
Picture1.Width = 2 * Form1.Width / 3
Picture1.Height = 2 * Form1.Height / 3
Picture1.Left = Form1.Width / 35
Picture1.Top = Form1.Height / 16
Picture2.Width = Form1.Width / 4
Picture2.Height = 2 * Form1.Height / 3
Picture2.Left = 17 * Form1.Width / 24
Picture2.Top = Form1.Height / 16
Picture3.Width = 3 * Command1.Width
Picture3.Height = Command1.Height
Picture3.Left = Form1.Width / 2 - Picture2.Width / 2
Picture3.Top = Picture1.Height + 2 * Picture1.Top
End Sub
我是数学老师

这是数学课内容？