打开VBA工程

在Excel中按下Alt+F11，打开VBA工程，添加一个VBA窗体，窗体上面添加一个文本框。

查看文本框的属性

选择文本框，属性编辑器中选择按分类序选项卡，可以看到文本框的属性分成了七大类：滚动、行为、数据、外观、位置、杂项和字体。位置、字体比较简单，大家一看就明白，下面重点说明下除了位置、字体外的其它五大类属性分类中的重点属性。

滚动和行为分类

1. 多行文本与滚动条

默认情况下，本文框是单行的，也就没有办法显示滚动条，设置MultiLine=true后，本文框就可以输入多行本文了，此时可以设置Scrollbars属性，以便显示水平或垂直滚动条。

2. 是否允许编辑

Enable属性设置为true时，文本框可以接受键盘和鼠标操作，Enable属性设置为False时，文本框不接受键盘和鼠标操作，即不能进行选择、复制等。

在Enable为True的情况下，可以用Locked属性用来控制文本框是否可以编辑，Locked设置为True，则文本框不能编辑。

3. 其它几个重要属性

● AutoSize：用来控制文本框的长度是否随内容自动缩放

● MaxLength：用来控制文本框允许输入的内容的最大长度，如设置为5，则用户最多只能输入5个字符。

● AutoTab：设置了MaxLength后，当用户输入到达了最大长度限制后，是否自动出发Tab键功能，也就是是否自动跳转到下一个控件。

● EnterKeyBehavior：在设置了多行文本的情况下，如何响应Enter键。设置为false，则按下Enter键后，会新增一行，设置为true，则按下Enter键后，会跳转到下个控件。

数据分类

数据部分主要是用来进行数据绑定的，可以从绑定的数据源中获取文本内容。这个在vb6中会用到，在VBA中，一般不会使用这些属性。有兴趣的同学，可以百度下vba数据绑定，以了解更多的信息。

外观分类

这部分是用来设置文本框的呈现样式的，基本上一看就明白。介绍几个常用的属性：

● PasswordChar：用来设置输入密码时的显示字符，一般设置为*号。

● ControlTipText：用来控制鼠标移到文本框上时显示的提示字符。

杂项分类

● EnterFieldBehavior：用来控制文本框通过Tab键获得焦点时的行为。设置为fmEnterFieldBehaviorSelectAll，则获得焦点时会自动选择所有的内容，设置为fmEnterFieldBehaviorRecallSelection时，则不会自动选择。

● TabIndex：用来控制文本框在窗体上Tab键跳转的顺序。

● TabStop：用来控制是否响应Tab键，设置为True，则按Tab键跳转时，可以跳转到文控件，设置为False时，则在窗体上按Tab键，不会在该文本框上停留。

文本框的事件

文本框支持如下的事件，比较常用的是Change和KeyPress事件。当文本框的内容变化时，会触发Change事件，当用户按下了键盘上的字时，会触发KeyPress。

Private Sub TextBox1_Change()

Debug.Print TextBox1.Text

End Sub

Private Sub TextBox1_KeyPress(ByVal KeyAscii As MSForms.ReturnInteger)

控制文本框只能输入数字

If KeyAscii Asc(0) Or KeyAscii Asc(9) Then

KeyAscii = 0

End If

End Sub

本经验还会不断补充和完善，直到有一天我们发现这篇经验已无存在价值。

如果有朋友喜欢这篇经验，请为我点赞，后续还会为大家分享更多经验，有兴趣的亲们可以点击关注我。