在“属性表”窗口中的哪个位置可以在Access / VBA中定义标签父级

时间:2015-03-19 00:21:07

标签: vba ms-access access-vba

我需要在文本框中附加标签,我想知道属性表中我可以做到的地方或者如何去做。

提前感谢。

2015年3月19日(上午8:45)在里约热内卢

我想分享这段代码来操纵父/子控件:

Private Sub Comando15_Click()
On Error GoTo Err_Handler
Dim ctl As Control

For Each ctl In Me.Form.Controls
    With ctl
        If .ControlType = acLabel Then
            If .Parent.Name <> Me.Form.Name Then
                MsgBox "Controle Pai: " & Chr(13) + Chr(10) & .Parent.Name & Chr(13) + Chr(10) + Chr(10) & _
                    "Controle Filho: " & Chr(13) + Chr(10) & .Name
            End If
        End If
    End With
Next ctl

Exit_Handler:     退出子 Err_Handler:     MsgBox Err.Description,vbExclamation,“错误号:”&amp;的Err.Number     恢复Exit_Handler 结束子

1 个答案:

答案 0 :(得分:0)

哇!我找到了!要将标签附加到文本框,请在设计视图中打开表单,然后选择标签和文本框。将出现一个小警告框(带有感叹号和下拉按钮)。只需单击按钮,然后选择“将lable_name附加到textbox_name”选项。很简单。

感谢Mark的快速回复。