在前面的短图文里,我们介绍过关于VBA的一些基础知识,如窗体userform,如标签label.在这期的图文里,咱们将详细的介绍另外一个控件,这就是textbox控件.
textbox,就是文本框,或者叫做文字框.是VBA里的ActiveX控件.textbox最大的作用就是通过设计的界面化数据录入窗口向指定的位置录入数据的最重要的途径之一.
在这里,我们只说是最最重要,因为textbox并非唯一.
而所谓指定的位置,在Excel表格里,最常用的是指sheet表,也就是工作表,如果我们是采用VBA+数据库的方式来实现数据管理的话,那么指定的位置便成了数据库了.
1.text属性.
毫无疑问,文字框的text属性是最重要的属性,这里,没有之一.没有错,是最重要的属性.在VBA编程里,在初始化过程中,咱们赋给文字框的text属性什么值,它就会呈现给用户什么值.
在大多数的使用过程中,在数据的初始化过程中,text的属性值,一般是为空,即,textbox1.text=””或者textbox1.value=””也是可以的,当然前者出现的会更多一些.对于个人使用习惯而言,个人习惯使用后者.
2.height与width.
height指文本框的高度,width指文字框的宽度.
在实际的使用过程中,我们可以通过拖拽文字框的方式调整文字框的高度与宽度,当然如果有特殊的使用需求,也可以在窗体的初始化过程中设定文字框的高度与宽度代码如下:
text1.height=14
text1.width=80
当然,上述代码只需要写在窗体的initialize事件里就可以了.
3.backcolor属性
文本框的背景色设置,这个往往采用默认的颜色设置,但设计者可以根据实际的需要设定背景颜色.个人更加偏爱浅橙色多一点.
4.font属性.
如果觉得系统默认的小五号的字体更小的话,不妨在font属性里设置字体的大小,除了字号的大小之外,我们还可以设置字型的名称,显示效果等.
1.窗体始化事件的VBA代码.
private sub userform_initialize()
text1.text=””
end sub
2.通过文本框向工作表写入数据的代码一般是通过命令按钮的单击事件来实现的,代码如下:
private sub command_click()
cells(4,10).value=text1.text
end sub
代码解析:把text1的文本写入单元格第4行第10列的单元格里.
文本框还是比较简单一些的ActiveX控件,在这里,我们就简单的介绍至此,如果有感兴趣的朋友想学习更多的VBA知识,从而更好的解决自己所遇到的工作中的难题,不妨自己在Excel的VBA里动手一试.毕竟自己动手才会获得最真实的体验.