复选框怎么设置，如何在Word中插入对勾复选框

10年积累的网站设计、成都网站建设经验，可以快速应对客户对网站的新想法和需求。提供各种问题对应的解决方案。让选择我们的客户得到更好、更有力的网络服务。我虽然不认识你，你也不认识我。但先网站设计后付款的网站建设流程，更有桂平免费网站建设让你可以放心的选择与我们合作。

1，如何在Word中插入对勾复选框

选中你的复选框，然后设置它的属性，里面有个复选框属性选中标记默认是×，你改成打勾的就OK了

2，如何更改复选框的大小

首先要分清你要更改的复选框是窗体控件还是ActiveX控件。1.窗体控件右键选中控件就可以更改2.ActiveX控件进入“设计模式”，再选中控件，就可以更改我用07版excel，设计模式在“开发工具”选项中。2003版的参考吧，忘记在什么地方了

checkbox的复选框框的大小是没法改的，但有别的方法可以尝试，我的方法是这样子的：先建一个label，然后再在上面打个“√”，接下来就去调字体大小，加粗，最后再写点程序： private sub label1_click() if label1.caption = "√" then label1.caption = "" else label1.caption = "√" end sub 这样子就ok了，这法子有点土，不过管用，可以做得很大很大。

3，怎样在WORD中添加复选框

你的问题要用“控件工具箱”来完成。具体方法是：　　打开Word，依次点击“视图”—“工具栏”—“控件工具箱”，这时会在Word窗口的编辑区左侧出现一个新的工具条，这就是“控件工具箱”，其中有一个按钮是内部有小对勾的方框，用鼠标指向时会出现“复选框”的提示。　　点一下“复选框”按钮，会在Word页面上出现一个叫标有“CheckBox1”的小方框，即“第1复选框”，前面的小方框就是复选框，用鼠标右键点一下这个“复选框”，再点“复选框对象”—“编辑”，把“CheckBox1”改成您需要的“急件”即可。但这时还不能打勾，你再点“控件工具箱”的第一个按钮“退出设计模式”就可以在内部打对勾了（也可以取消对勾）。再点“复选框”按钮，会在页面上再出现一个“复选框”标签，叫“CheckBox2”，即“第2复选框”。你可用同样的方法改名为“请回复”。往下依次类推。你说“不过这个框框好像不太明显,是灰暗色的”。那可以设置颜色，这就醒目了。我把附件改一下，您可看一下效果。

4，VB中的复选框如何编程

vb复选框checkbox控件主要通过其value属性来进行程序编写。value属性返回或设置复选框的状态。复选框控件有三种状态：0-Unchecked 未选定1-Checked 选定 2-Graved 灰色 checkbox用法实例：在窗体添加名为Check1、Check2、Check3的3个checkbox控件和一个command1按钮。Private Sub Command1_Click() If Check1.Value = 1 Then Print "check1选中" Else Print "check1未选中" If Check2.Value = 1 Then Print "check2选中" Else Print "check2未选中" If Check3.Value = 1 Then Print "check3选中" Else Print "check3未选中"End Sub

CheckBox 控件组中可以使用 CheckBox 控件显示多项选择，从而可选择其中的一项或多项。也可以通过对 Value 属性编程设置 CheckBox 的值。在一个窗体中可以同时选择任意数量的 CheckBox 控件。以下代码会告诉CheckBox 控件单选或多选的状态Option ExplicitPrivate Sub Check1_Click() Debug.Print Check1.Value; Check2.Value; Check3.ValueEnd SubPrivate Sub Check2_Click() Debug.Print Check1.Value; Check2.Value; Check3.ValueEnd SubPrivate Sub Check3_Click() Debug.Print Check1.Value; Check2.Value; Check3.ValueEnd Sub

Dim 判断1 As Boolean, 判断2 As Boolean, 判断3 As BooleanPrivate Sub Check1_Click()If Check1.Value = 1 Then 判断1 = TrueEnd SubPrivate Sub Check2_Click()If Check2.Value = 1 Then 判断2 = TrueEnd SubPrivate Sub Check3_Click()If Check3.Value = 1 Then 判断3 = TrueEnd SubPrivate Sub Command1_Click()If 判断1 = True Then Text1.Text = Text1.Text & Check1.CaptionIf 判断2 = True Then Text1.Text = Text1.Text & Check2.CaptionIf 判断3 = True Then Text1.Text = Text1.Text & Check3.CaptionEnd SubPrivate Sub Form_Load()判断1 = fasle判断2 = fasle判断3 = fasleEnd Sub

5，VB如何用复选框

Private Sub Check1_Click()Text1.FontBold = Check1.ValueEnd SubPrivate Sub Check2_Click()Text1.FontItalic = Check2.ValueEnd SubPrivate Sub Form_Load()Text1.FontSize = 30Check1.Caption = "粗体"Check2.Caption = "斜体"End Sub窗体上一个textbox 两个checkbox帐号解封庆祝一下~~~~~偶回来啰~~~~~~~~

private sub c1_click() dim r as string if ch1.value=1 then r=ch1.caption if ch2.value=1 then r =r & ch2.caption if ch3.value=1 then r =r & ch3.caption msgbox "我的爱好是" & r ,vbokonly end sub

LABLE标签里有个FONT属性，自己试一下怎么用那个斜体和粗体吧。也可以同时将这两个设为真哦。

加入一个文本框:text1,二个复选框按钮:check1(caption属性改为:粗体),check2(caption属性改为:斜体)下面是代码:Private Sub Form_Load() Text1.Text = "测试区域" Text1.FontSize = 25 Text1.ForeColor = vbRed End SubPrivate Sub Check1_Click() If Check1.Value = 1 Then Text1.FontBold = True Else Text1.FontBold = False End IfEnd SubPrivate Sub Check2_Click() If Check2.Value = 1 Then Text1.FontItalic = True Else Text1.FontItalic = False End IfEnd Sub

只要在Check1_Click的事件代码下加这一行代码就好了啊Text1.FontBold = True

新建一个text,一个复选框text的text属性为“测试区”，字体为斜体复选框的caption属性为“粗体”，value属性为0（未选）代码如下：Option ExplicitPrivate Sub Check1_Click() If Check1.Value = 0 Then text1.FontItalic = True text1.FontBold = False Else text1.FontItalic = False text1.FontBold = True End IfEnd Sub