如图：把鼠标移动到窗口左边的“工具箱”字样上，出现控件，那个红色矩形框里的“CheckBox”就是复选框控件，用鼠标双击，就会添加到窗体上。
创新互联是一家集网站建设,巴马企业网站建设,巴马品牌网站建设,网站定制,巴马网站建设报价,网络营销,网络优化,巴马网站推广为一体的创新建站企业，帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿，时刻以成就客户成长自我，坚持不断学习、思考、沉淀、净化自己，让我们为更多的企业打造出实用型网站。
同样方法，双击下面那个红色矩形框里的“DataGridView，就可以添加数据网格控件。
点击“开始”-“Excel选项”，在“基本设置”选项卡中勾选右侧的“在功能区上显示‘开发工具’”，使其显示出来。
切换到“开发工具”功能区，点击插入”下拉列表框，在弹出的列表中选择“复选框（ActiveX控件）”。
然后在文档区域拖动以绘制一个复选框。 并在该复选框上右键单击，在弹出的菜单中选择“属性”以打开“属性对话框”。
在打开的“属性对话框”中将“Caption”设置为空，”BackStyle“设置为透明，边框效果设置为0类型，完成后关闭”属性对话框“。
ID不样一个
判断
if webbrowse.document.getElementById("find1").checked then msgbox "find1 checked"
1、首先，点击保存按钮后应检查文本框内容。
2其次，如果在文本框4中输入的值以400开头则保存反之更改为400。
3、最后，再次检查文本框5如果文本框5中的值为29或31则保存反之则更改即可。
有两种实现方式，一种是使用后台的事件CheckedChanged、Clicked、MouseDown等等都可以，另一种是用js的onclick事件，不过代码都差不多。
If CheckBox1.Checked = True Then
'选中时
TextBox1.Text = '说话'
Else
'未选中时
TextBox1.Text = ''
End If
dim checkbox ax dataggridviewcheckboxcell=datagridview1.rows(0).cell(0)
checkbox.editingcellformattedvalue=true
datagridview1.rows(0).cell(0)=checkbox
我手敲上的，你把格式改过来就行
