我需要在文本框中附加标签,我想知道属性表中我可以做到的地方或者如何去做。
提前感谢。
我想分享这段代码来操纵父/子控件:
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 结束子
答案 0 :(得分:0)
哇!我找到了!要将标签附加到文本框,请在设计视图中打开表单,然后选择标签和文本框。将出现一个小警告框(带有感叹号和下拉按钮)。只需单击按钮,然后选择“将lable_name附加到textbox_name”选项。很简单。
感谢Mark的快速回复。