<< Click to Display Table of Contents >> 设置绑定控件的标签标题(gf_SetCtrCaption函数) |
函数说明
该函数可以设置控件绑定的标签控件的标题。若自身是标签控件(Label)则设置自身的标题(Caption)。
函数原型
|
Public Function gf_SetCtrCaption(ctr As Control, strCaption As String) As Boolean |
语法
gf_SetCtrCaption(ctr, strCaption)
参考:gf_SetCtrCaption(Me.txtTest, "测试") '设置窗体上txtTest文本框绑定的标签控件的标题为“测试”
参数
参数名 |
必需/可选 |
数据类型 |
参数说明 |
---|---|---|---|
ctr |
必需 |
Control |
控件对象 |
strCaption |
必需 |
String |
要设置的标题内容 |
返回值
返回一个布尔值(Boolean)。若自身是标签控件(Label)则设置自身的标题(Caption)。
设置成功返回True,反之,返回False。
示例
|
Sub subTest() Dim strCaption As String '定义字符串变量,设置标题 Dim blnValue As Boolean '定义布尔值变量,保存结果 strCaption = “测试” '设置标题 blnValue = gf_SetCtrCaption(Me.txtTest, strCaption) '设置文本框txtTest绑定的标签控件的标题
If blnValue Then '显示设置结果 Msgbox "设置成功" Else Msgbox "设置不成功,请检查" End If End Sub |