How about
Public Function Find_B(strIN As String) As String
Dim intI As Integer
For intI = 1 To Len(strIN)
If UCase(Mid(strIN, intI, 1)) = "B" Then Exit For
Next intI
Find_B = Mid(strIN, intI + 1, 7)
End Function
I would like to use VBA to access the form descriptions for an Access 2003 database; however, I cannot locate a "description" property for a form object. How does one set a reference to the form description property?
Thank you.
This site uses cookies to help personalise content, tailor your experience and to keep you logged in if you register.
By continuing to use this site, you are consenting to our use of cookies.