求一个vb绘图程序,将一个圆周16等分,每个等分点标记成数字0-16,具体联系594227686

来源：学生作业帮助网编辑：作业帮时间：2024/05/16 08:30:34

求一个vb绘图程序,将一个圆周16等分,每个等分点标记成数字0-16,具体联系594227686
求一个vb绘图程序,将一个圆周16等分,每个等分点标记成数字0-16,具体联系594227686

Private Sub Command2_Click()

Dim x As Double, y As Double, ang As Double

Dim i As Integer, r As Integer

Const Pi As Single = 3.14

Me.ScaleMode = vbPixels

x = (Me.ScaleWidth - 20) / 2

y = (Me.ScaleHeight - 20) / 2

r = (Me.ScaleHeight - 40) / 2

Circle (x, y), r

For i = 1 To 16 Step 1

ang = (i / 16) * 2 * Pi '转换成弧度

Line (x, y)-(x + r * Cos(ang), y + r * Sin(ang)), vbRed

Me.Print i

End Sub

求一个vb绘图程序,将一个圆周16等分,每个等分点标记成数字0-16,具体联系594227686 仅用圆规将一个圆周四等分将一个圆沿着它的半径分成16等分,可以拼成一个近似的三角形.如果将这个圆沿着它的半径分成64等分,此时拼成的近似三角形的底相当于这个圆周长的（）把一个圆周16等分,每份是一个多少度的角? 怎么将圆周十二等分用等分圆周的方法画一个正五角星形一个圆分成16等分,求快在一个圆周上有6个点,正好将圆周6等分.以这些顶点作三角形,可以做出多少个等腰三角形? 在一个圆周上有7个点,正好将圆周七等分,以这些点为顶点,作三角形,一共可以做几个等腰三角形?急如何将一个角五等分用VB编一个程序,求从1至100的自然数的和编写一个vb程序,输入两个正整数,求他们的最大公约数和最小公倍数,谢谢! 将一圆周长光用圆规分成4等分..郁闷.想了一天.仅剩的脑细胞也不见了..中国就这么少了一个栋梁之才啊~... 要把一个圆周n等分,只要把周角n等分即可,每一个圆心角的度数是? 一个圆周长分成五等分,那么他每一等分的弧所对的弦长度是多少? VB 编写程序,请用户输入一个自然数N,求前N个质数,并将其存放一个数组中(质数是除了1和本身之外没有其他约数的数,第一个质数是2） VB 编写程序,请用户输入一个自然数N,求前N个质数,并将其存放一个数组中.(质数是除了1和本身之外没有其他约数的数,第一个质数是2）求VB小程序!设计一个VB小程序,给定三角形任意两边的长度,和夹角的度数,求三角形的面积.S=absinα求VB小程序!设计一个VB小程序,给定三角形任意两边的长度,和夹角的度数,求三角形的面积.S=absin