本节介绍一下InputBox函数,说起这个函数有一些混淆的地方。
原因在于inputBox本身还是一个Application方法,所以在使用的时候会有所不同。
主要是一些参数不同。
看一下InputBox函数语法和参数,如下图所示:
语法:
InputBox(prompt、[ title ]、[ default ]、[ xpos ]、[ ypos ]、[helpfile、context])
看上去,参数不少,但真正了解一下,其实很好理解。
prompt:这个参数是窗体显示的文本内容。必选项。 title:窗体标题,可选。 defalut:文本框内容初始值,可选。 xpos:对话框左边缘与屏幕左边缘水平距离。 ypos:对话框上边缘与屏幕上边缘垂直距离。 helpfile和context要同时使用,功能是指定帮助文件,以及帮助按钮链接。 No.2下面用一个例子来看一下使用效果,如下图所示:
本例中有四个按钮,分别编写了不同的代码,来显示inputBox函数,使用不同参数的效果。
1、默认位置显示
上图例子执行后,对话框在屏幕水平中央,垂直距离屏幕1/3的位置显示。
2、屏幕左上角显示
设置xpos和ypos参数后,可定位到屏幕左上角位置显示。
重点:
xpos单位为Twips,中文翻译为”缇”,这是个比较陌生的单位,打印机的一个点,即我们说的“磅”,相当于20个 Twips。
所以xpos和ypos的设置值要进行换算,不然不能达到想要的显示效果。
本例中应用了Application.left*20来设置xpos,也就是Excel应用程序窗体左边距乘以一个倍数。
1个像素=(1/96)*1440=15
其96为屏幕刷新率,1440屏幕宽像素。
3、帮助参数
设置helpfile和context参数后,inputBox对话框可显示帮助按钮。
然后根据设置的帮助文件,进行连接。
通常情况下不需要设置这两个参数,如果是进行带帮助文件编码的时候用到,相信一般情况下是不做这个的,因为帮助文件也是一块很大的项目。
示例代码如下:
VBA.InputBox(“带帮助文件输入框!”, “数据录入”, “文本框默认数据XXX”, , , “帮助文件1.hlp”, 1)
InputBox函数返回文本框值,如果文本框内空,那就返回一个0长度字符串(“”)。
此函数在应用方面还是很普遍的,所以 应该学会学懂。