Как определить, является ли элемент управления гиперссылкой в ​​MS Access vba

Question

Я перебираю элементы управления в форме, используя

For Each ctl In frm.Controls

в Access VBA и хотел бы определить, является ли элемент управления гиперссылкой. Я хочу определить, является ли элемент управления гиперссылкой. Я не вижу ControlType, который совпадает с Hyperlink. Я предполагаю, что это текстовое поле с дополнительными свойствами.

Может кто-нибудь указать мне правильное направление, пожалуйста?

Заранее спасибо

Lee

Answer 1

Попробуйте проверить длину свойства HyperLinkAddress:

    Dim c As Control
    For Each c In Controls
        If Len(c.HyperlinkAddress) > 0 Then
            Debug.Print c.Name & " is a hyperlink (Address: " & c.HyperlinkAddress & ")"
        Else
            Debug.Print c.Name & " is not a hyperlink"
        End If
    Next