Hi,
Try this:
Dim a As String
Dim b As String
Dim c As String
Dim d As String
Dim e As string
Dim f As string
a = "'" 'need to seperate the special characters and denote them as a string
b = "*"
c = """"
d = "a14_"
e = Mid(c, 1, 1) ' takes just "
f = a & b & e & d & b 'Puts them all together as 1 long string
'*"a14_*'
Like Mid(f, 2, 9) 'the mid(f,2,9) takes out the quotes that vb adds in to denote that its a string.