private sub mn22_click()
cls
scale (-15,1000)-(15,-1000)
fill syle=0
fill color=qbcolor(9)
circle (0.0),5,qbcolor(12)
end sub
程序执行的时候说函数程序未定义，请问错在哪里了？

circle (0.0),5,qbcolor(12)
请仔细检查黄底红字部分


Private Sub mn22_Click()　　　　　
Cls　　　　　　　　　　　　　
Scale (-15, 1000)-(15, -1000)
FillStyle = 0　　　　　　　　　
FillColor = QBColor(9)　　　　
Circle (0, 0), 5, QBColor(12)　
End Sub　　　　　　　　　　　　　　

自己对比一下错了多少地方？全是打字打错！

[此贴子已经被作者于2007-7-14 17:32:28编辑过]