| |
帳票フォームのテキストボックスで、幅が狭くて文字列が表示しきれないため、
値と同じ内容のヒントテキストを設定しようと奮闘しておりますが、
すべての行で同じヒントテキストが表示されてしまい、個別表示ができません。
帳票フォームでは、個別にヒントテキストが設定できないものなのでしょうか？
---------------------
【失敗例１】
Sub Test1()
Dim myCtl As Control
With Forms!F01_Test
For Each myCtl In .Section(acDetail).Controls
With myCtl
If .ControlType = acTextBox Then .ControlTipText = Nz(.Value, "")
End With
Next myCtl
End With
End Sub
---------------------
【失敗例２】
Function Test2(myTest)
Forms!F01_Test.txt_Test.ControlTipText = Nz(myTest, "")
Test2 = myTest
End Function
コントロールソース ： =Test2([Nm_Test])
---------------------
どうか、ご指南のほどお願い致します。
|
|
![[未読]](./data/access/image/read_icon.gif){kind=icon}
