文本框(文本框是什么)

前沿拓展：

文本框

文本框设置透明步骤如下：

工具：APPLEM味护着布acBook Air、IOS10.14.6、WPS Office13.18.0。

1、打开要编辑的Word文档，如图所示，该文档设置了背的效果。

VBA编程中的一些对象，有一个功能需要我们进行设置，比如，不想让某个控件选择或者让这个控件失效。

这个功能还是很实用的，本文介绍两个属性，可以实现这样的功能。

一个是Enabled属性，另一个是Locked属性。

英文翻译，Enabled为"使能"，也是大多工业设备中经常用到的一个英文单词。

Locked为"锁定"。

理解其含义之后，使用就简单多了。

如下图示例：

我们利用两个选择框来控制第一个文本框的Enabled，和Locked状态。第二个文本框为说明文本。

也就是当要选择Enabled"使能"的时候，就可以编辑文本，当不选择的时候文本框失去编辑功能。

失去编辑功能字体颜色会变成灰色，文本框内容也不能选择。

当我们选择Locked的时候，实现锁定文本，文本框颜色不变，可以选择也可以通过键盘**作**(Ctrl+C)，但不能进行删除、修改、添加、插入等编辑**作。

具体我们看代码来时行理解。

第一在VBE中新建一个窗体，并添加2个CheckBox控件，2个TextBox控件。

窗体代码：
Private Sub UserForm_Initialize()
TextBox1.Text = "可变属性"
TextBox1.Enabled = True
TextBox1.Locked = False
CheckBox1.Caption = "Enabled 属性"
CheckBox1.Value = False
CheckBox2.Caption = "Locked 属性"
CheckBox2.Value = False
TextBox2.Text = "TextBox2"
End Sub

CheckBox1代码

Private Sub CheckBox1_Change()
If Me.CheckBox1.Value Then
TextBox2.Text = "有效：可以修改"
TextBox1.Enabled = CheckBox1.Value
Else
TextBox2.Text = "无效：不能修改"
TextBox1.Enabled = CheckBox1.Value
End If
End Sub

CheckBox2代码

Private Sub CheckBox2_Change()
If Me.CheckBox2 Then
TextBox2.Text = "锁定：不可修改内容"
TextBox1.Locked = CheckBox2.Value
Else
TextBox2.Text = "解锁：可修改内容"
TextBox1.Locked = CheckBox2.Value
End If
End Sub

Enabled和Locked属性在很多控件中可以使用，并不一定是这两种控件，所以在编程过程有条件地使用还是可以达到想的结果的。

END

拓展知识：

前沿拓展：

文本框

文本框设置透明步骤如下：

工具：APPLEM味护着布acBook Air、IOS10.14.6、WPS Office13.18.0。

1、打开要编辑的Word文档，如图所示，该文档设置了背的效果。

VBA编程中的一些对象，有一个功能需要我们进行设置，比如，不想让某个控件选择或者让这个控件失效。

这个功能还是很实用的，本文介绍两个属性，可以实现这样的功能。

一个是Enabled属性，另一个是Locked属性。

英文翻译，Enabled为"使能"，也是大多工业设备中经常用到的一个英文单词。

Locked为"锁定"。

理解其含义之后，使用就简单多了。

如下图示例：

我们利用两个选择框来控制第一个文本框的Enabled，和Locked状态。第二个文本框为说明文本。

也就是当要选择Enabled"使能"的时候，就可以编辑文本，当不选择的时候文本框失去编辑功能。

失去编辑功能字体颜色会变成灰色，文本框内容也不能选择。

当我们选择Locked的时候，实现锁定文本，文本框颜色不变，可以选择也可以通过键盘**作**(Ctrl+C)，但不能进行删除、修改、添加、插入等编辑**作。

具体我们看代码来时行理解。

第一在VBE中新建一个窗体，并添加2个CheckBox控件，2个TextBox控件。

CheckBox1代码

CheckBox2代码

Enabled和Locked属性在很多控件中可以使用，并不一定是这两种控件，所以在编程过程有条件地使用还是可以达到想的结果的。

END

拓展知识：

原创文章，作者：九贤生活小编，如若转载，请注明出处：http://www.wangguangwei.com/31367.html

文本框(文本框是什么)

前沿拓展：

文本框

拓展知识：

前沿拓展：

文本框

拓展知识：

相关推荐