vb中画圆的代码怎么写啊
展开全部
下边是个实例，放一个text，一个按钮，text里输入几个就画几个
private
sub
command2_click()
dim
i
as
integer
for
i
=
1
to
val(text2.text)
form3.picture1.circle
(120,
260),
i
*
10,
vbred
'在左边为120.260的位置为圆心，i*10的数量为半径画个圆
next
form3.picture1.refresh
end
sub
private
sub
command2_click()
dim
i
as
integer
for
i
=
1
to
val(text2.text)
form3.picture1.circle
(120,
260),
i
*
10,
vbred
'在左边为120.260的位置为圆心，i*10的数量为半径画个圆
next
form3.picture1.refresh
end
sub
已赞过
已踩过<
评论
收起
你对这个回答的评价是？
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
