Windows窗体中的动态复选框 [英] Dynamic checkbox in windows forms

问题描述

我正在尝试向表单中动态添加10个复选框.我正在使用以下代码-

Hi, I''m trying to add 10 checkbox to my form dynamically . I''m using the following code-

Dim offset = 10
       For i As Integer = 0 To 10
           Dim checkBox = New CheckBox()
           Me.Controls.Add(checkBox)
           checkBox.Location = New Point(offset, 10)
           checkBox.Text = i.ToString()
           checkBox.Checked = True
           checkBox.Size = New Size(100, 20)
           offset = offset + 30
       Next i

但是它只显示1个复选框.是什么问题?

Thanx

But it''s showing only 1 checkbox.. What''s the problem?

Thanx

推荐答案

那是因为它们彼此吸引.
改变

That''s because they are drawn upon eachother.
change

checkBox.Size = New Size(100, 20)

到

to

checkBox.Size = New Size(30, 20)

当您一次踩30(offset = offset + 30)

as you''re stepping 30 at a time (offset = offset + 30)

这篇关于Windows窗体中的动态复选框的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！