控件工具箱在哪,控件工具箱在哪里 excel 收藏 0

WinForms 中的 CheckBox 控件使用指南

在WinForms中，CheckBox 控件是一个允许用户选择或取消选择的单选按钮。它通常用于表示布尔值（真/假）或允许多选的情况。以下是如何使用 CheckBox 控件的一些基本信息和示例代码。

1. 添加 CheckBox 控件：在 Visual Studio 的工具箱中找到 CheckBox 控件，并将其拖放到窗体上。
2. 设置 CheckBox 属性：您可以设置 CheckBox 的 Text 属性来指定显示的文字，以及 Checked 属性来指定默认的选中状态。

• CheckedChanged 事件：当 CheckBox 的选中状态发生变化时，会触发 CheckedChanged 事件。

以下是一个简单的示例，演示如何创建一个 CheckBox 控件，并处理其 CheckedChanged 事件：

在这个示例中，我们创建了一个 CheckBox 实例，并设置了其位置、大小和显示的文字。然后，我们将 CheckBox 添加到窗体的控件集合中，并为其添加了 CheckedChanged 事件处理程序。在事件处理程序中，我们根据 CheckBox 的选中状态更新了一个 Label 控件的文本，以反映当前的选中状态。

通过这些基本步骤，您可以在 WinForms 应用程序中使用 CheckBox 控件来收集用户的布尔输入，或者在用户界面中提供可切换的选项。

如何选中 Excel 控件？不用的控件如何隐藏？各种鲜被提及的知识点

很多同学会觉得 Excel 单个案例讲解有些碎片化，初学者未必能完全理解和掌握。不少同学都希望有一套完整的图文教学，从最基础的概念开始，一步步由简入繁、从入门到精通，系统化地讲解 Excel 的各个知识点。

现在终于有了，以下专栏，从最基础的操作和概念讲起，用生动、有趣的案例带大家逐一掌握 Excel 的操作技巧、快捷键大全、函数公式、数据透视表、图表、打印技巧等……学完全本，你也能成为 Excel 高手。

自从之前讲了控件的应用后，不少同学希望能多讲讲控件的知识点。

今天不讲控件的实际应用，而是剑走偏锋，教一下平时大家比较头疼的问题：如何更容易地操纵控件？暂时不用的时候，能否隐藏它们？

给下图的每一行都加上复选框，在此基础上，教大家各种对齐、选中和隐藏技巧。

1. 选择菜单栏的“开发工具”–>“插入”–>“复选框”

2. 删除复选框的文本，将其拖动到所需的位置。

3. 选中复选框 –> 按 Ctrl+C –> 粘贴出另外 5 个复选框

4. 将最下方的复选框拖动到 D 列的最后一行，高度位于单元格纵向居中。

5. 选择菜单栏的“开始”–>“查找和选择”–>“选择对象”

此时用鼠标点击单个控件就能选中它；如果在所有控件周围框一下，就能选中所有控件。

6. 再次选择菜单栏的“开始”–>“查找和选择”–>“选择对象”，就能回到正常的复选框使用状态。

1. 选中所有复选框 –> 选择菜单栏的“页面布局”–> 选择“排列”区域中的“对齐”–>“左对齐”

2. 选择“页面布局”–>“对齐”–>“纵向分布”

纵横都快速对齐了，不用一个个手动拖。

1. 选择菜单栏的“开始”–>“查找和选择”–>“选择窗格”

2. 在右侧的“选择”区域中，点击需要隐藏的复选框，就能看到它旁边的眼睛标识上出现了划线。

对应的复选框就隐藏起来了，完全不留痕迹。

3. 再次点击眼睛符号，划线不见了。

隐藏的复选框又回来了。

详细讲解如何用EXCEL制作登录界面

如何用EXCEL制作登录界面

本期作品分享用EXCEL制作一个登录界面，并且登录后根据不同的用户名获取不同的权限。方便我们在工作中分享工作表时能够将指定的内容进行隐藏。本期讲解内容以最近发布的作品《生产计划管理系统》为例进行讲解。

1. 用户窗体的插入

1.1 依次点击开发工具—Visual Basic（或使用快捷键Alt+F11）。

1.2 鼠标右键点击空白处依次选择插入—用户窗体

1.3 将鼠标光标放在刚刚插入的窗体右下角，拖动窗体大小到合适尺寸为止。

1.4 选中窗体后点击属性（如下图所示），打开窗体的属性窗口。

1.5 打开属性窗口后按下图方式依次点击“按分类序”、选择“Caption”，将我们新建的窗体命名为“登录界面”。如下图所示。

1.6 插入背景图片：点击属性“picture”位置最后的“…”符号，在弹出的窗口中选择要插入的图片。

1.7 在属性窗口的PictureSizeMode设置背景图片的模式，这里选择“1”。设置好后如下图所示。

1. 插入窗体控件

2.1选择窗体后点击如下图所示的工具箱图表，打开窗体控件工具箱。

2.2 选择标签控件后在窗体上拖动。

2.3 更改标签的文字为“用户名”。并在对应属性窗口设置标签文字的字体。

2.4 将标签属性的自动尺寸“AutoSize”设置为“TRUE”

2.5 将标签属性的背景“BackStyle”设置为0，将字体颜色ForeColor设置为baise。如下图所示。

2.6 复制用户名标签，将属性Caption改为“密码”

2.7 选择工具箱的文字框控件，并在窗体对应位置拖动。

2.8 按照上面的方式设置文字框的字体大小，并设置属性窗口的“TextAlign”属性为“2”，让文字框的内容居中显示。

2.9 复制一个文字框到密码位置。将密码输入框的“PasswordChar”属性输入“*”号，这样在输入密码时会以“*”号替代。

2.10 对齐：如下图所示，选中文字框，将文字框对齐，并用同样的方式对齐“用户名”和“密码”标签。

1. 命令按钮

3.1如图所示，在工具箱选择命令按钮并在窗体上拖动生成。

3.2 更改命令按钮属性的Caption为登录，并按前面的方式设置字体大小。

3.3 复制登录按钮，并改名为退出，如下图所示。并按前面的方式调整对齐按钮。

3.4 最后增加一个“生产计划管理系统”的标签。如下图所示。

1. 输入代码

4.1 退出代码：鼠标双击“退出”按钮，输入如下代码

Private Sub CommandButton2_Click()

Unload Me

ThisWorkbook.Save

ThisWorkbook.Close

End Sub

4.2 登录代码：

4.2.1 首先新建一个用户信息的工作表，并输入下图内容。用于用户名和密码的登录。

4.3 双击“登录”按钮输入如下代码：（下方代码用红色字体注释）

Private Sub CommandButton1_Click()

If TextBox1 = \”\” Or TextBox2 = \”\” Then

MsgBox \”请先输入用户名和密码！\”

Exit Sub

End If

（以上代码为判定用户名和密码框是否输入内容，如果未输入则退出宏并弹窗提醒）

Dim i As Integer

For i = 3 To 10

If Sheet2.Cells(i, 2) = TextBox1 And Sheet2.Cells(i, 3).Value = TextBox2.Value Then

If Sheet2.Cells(i, 4) = \”管理员\” Then

（判断用户属性是否为“管理员”）

Application.Visible = True

Unload UserForm1

（关闭登录界面）

Sheet2.Visible = True

Sheet3.Visible = True

Sheet4.Visible = True

Sheet1.CommandButton4.Enabled = True

Sheet1.CommandButton5.Enabled = True

Sheet1.CommandButton6.Enabled = True

Sheet1.CommandButton7.Enabled = True

（将所有按键启用并显示所有工作表）

Sheet1.Range(\”d3\”) = Sheet2.Cells(i, 2)

（将登录用户名显示在主页对应位置）

MsgBox \”登录成功！\”

Exit Sub

End If

If Sheet2.Cells(i, 4) = \”普通用户\” Then

（判断用户属性是否为“普通用户”）

Application.Visible = True

Unload UserForm1

（关闭登录界面）

Sheet2.Visible = False

Sheet3.Visible = False

Sheet4.Visible = False

Sheet1.CommandButton4.Enabled = False

Sheet1.CommandButton5.Enabled = False

Sheet1.CommandButton6.Enabled = False

Sheet1.CommandButton7.Enabled = False

（将指定按键禁用并隐藏指定工作表）

Sheet1.Range(\”d3\”) = Sheet2.Cells(i, 2)

（将登录用户名显示在主页对应位置）

MsgBox \”登录成功\”

Exit Sub

End If

End If

If Sheet2.Cells(i, 2) = TextBox1 And Sheet2.Cells(i, 3) <> TextBox2 Then

MsgBox \”密码错误\”

TextBox2.Value = \”\”

End If

Next

（判断用户名和密码是否一致，不一致弹窗提醒）

End Sub

4.4 将以上代码都写好后，接下来的工作就是如何实现我们打开EXCEL文件时自动显示登录界面。

首先鼠标双击Thisworkbook，并输入一下代码，如下图所示。这样在我们打开EXCEL文件时就能自动弹出登录界面。

Private Sub Workbook_Open()

Application.Visible = False

UserForm1.Show

End Sub

4.5 禁用“X”关闭功能。最后一步便是禁用点击登录界面右上角的“X”号关闭，只能使用“退出按钮关闭工作簿。”

4.5.1 双击窗体,打开窗体代码窗口，输入如下代码。如下图所示，这样便可禁用窗体右上角的“关闭”功能。

Private Sub UserForm_QueryClose(Cancel As Integer, CloseMode As Integer)

If CloseMode <> 1 Then Cancel = True

End Sub

结语：本期作品就分享到这里，由于时间关系有些地方未能细讲还请谅解。如制作过程中存在疑问可在评论区留言或私信小编。

本文作者及来源:Renderbus瑞云渲染农场https://www.renderbus.com