2个回答
展开全部
VB画圆代码:主要使用函数【Circle (x, y), 半径, 颜色 】 :Circle(圆圈中心的坐标X,圆圈中心的坐标Y),圆圈的半径,圆圈线的颜色
代码start===========
'控件:
'名称:Command1,属性Caption:开始
'名称:Command2,属性Caption:结束
Private Sub Command1_Click() '****开始按钮
Circle (1500, 1000), 700, vbBlack '此为画圆函数:【Circle(圆圈中心的坐标X,圆圈中心的坐标Y),圆圈的半径,圆圈线的颜色】
End Sub
Private Sub Command2_Click() '***结束按钮
Unload Form1 '退出Form1
End Sub
Private Sub Form_Load()
Form1.AutoRedraw = True '程序开始时设置AutoRedraw属性(即重画属性)为ture,否则画的图可能消失
End Sub
代码end=============
代码start===========
'控件:
'名称:Command1,属性Caption:开始
'名称:Command2,属性Caption:结束
Private Sub Command1_Click() '****开始按钮
Circle (1500, 1000), 700, vbBlack '此为画圆函数:【Circle(圆圈中心的坐标X,圆圈中心的坐标Y),圆圈的半径,圆圈线的颜色】
End Sub
Private Sub Command2_Click() '***结束按钮
Unload Form1 '退出Form1
End Sub
Private Sub Form_Load()
Form1.AutoRedraw = True '程序开始时设置AutoRedraw属性(即重画属性)为ture,否则画的图可能消失
End Sub
代码end=============
东莞大凡
2024-08-07 广告
2024-08-07 广告
作为东莞市大凡光学科技有限公司的一员,我们深知Matlab圆点标定板在相机标定中的重要性。该标定板通过均匀分布的圆点,帮助精确计算相机参数,优化成像效果。Matlab强大的编程功能,使得我们能够灵活设计标定板,调整圆点大小、数量和分布,以满...
点击进入详情页
本回答由东莞大凡提供
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询