词条 | CheckBox |
释义 | § 概述 CheckBox 表明一个特定的状态是选定 (on) 还是清除 (off)。在应用程序中使用 CheckBox 为用户提供了“True/False”或“yes/no”的选择。因为 CheckBox 彼此独立工作,所以用户可以同时选择任意多个 CheckBox。 CheckBox 应用程序 这个例子使用一个 CheckBox 来决定文本用普通字体还是用斜体字显示。 下表列出了应用程序中的对象的属性设置。 对象- 属性- 设置 Form- Name Caption -frmCheck Check- Box -Example Text- box -Name Text- txtDisplay Some -sample- text First -Check box Name Caption- chkBold &Bold Second- Check box Name Caption -chkItalic &Italic CommandButton - Name Caption -cmdClose &Close 选定粗体或斜体时,CheckBox 的 Value 属性值设置为 1 ,不选定时为 0。缺省 Value 值为 0,所以除非改变 Value 属性值,否则第一次显示时不会选定 CheckBox。可以用常量 vbChecked 和 vbUnchecked 表示数值 1 和 0。 § check box 应用程序中的事件 当单击 CheckBox 时,会发生 CheckBox 的 Click 事件。此事件过程测试是否选定 CheckBox(即是否 Value = vbChecked)。如果选定,通过设置 Font 对象的 Bold 或 Italic 属性,将文本转换为粗体或斜体;该 Font 对象是由 TextBox 的 Font 属性返回的。 Private Sub chkBold_Click () If ChkBold.Value = vbChecked Then '如果选定。 txtDisplay.Font.Bold = True Else '如果没有选定。 txtDisplay.Font.Bold = False End If End Sub Private Sub chkItalic_Click () If ChkItalic.Value = vbChecked Then '如果选定。 txtDisplay.Font.Italic = True Else '如果没有选定。 txtDisplay.Font.Italic = False End If End Sub |
随便看 |
百科全书收录594082条中文百科知识,基本涵盖了大多数领域的百科知识,是一部内容开放、自由的电子版百科全书。