关于第一个看，你的代码似乎没问题。我只会改变这一行：

On the first look, your code seems to be OK. I''ll change only this line:

If TypeOf ctr Is System.Windows.Forms.CheckBox Then

BTW：永远不要使用如下名称：Control等作为变量的名称，因为Control [ ^ ]定义控件的基类，它是具有可视化表示的组件。



更多关于 TypeOf 运算符： http：/ /msdn.microsoft.com/en-us/library/0ec5kw18.aspx [ ^ ]

BTW: Never use names like: Control, etc as name of variable, because Control[^] defines the base class for controls, which are components with visual representation.

More about TypeOf operator: http://msdn.microsoft.com/en-us/library/0ec5kw18.aspx[^]