literal quote inside default value 2

[postermmxvicom]

I am setting the default value to the current value like so:

Me.Size.DefaultValue = """" & Me.Size.Value & """"

Size is a text field which can contain a lot of different kinds of input. The problem is when someone enters something like:

4" x 6' round

I obviously get a #name? error in the control. How do I manipulate the string to replace the " after the 4 with a "" so that it works correctly as a default value?

One last thing: Sometimes I wonder; "Is that someone's signature? Or do they type that at the end of each post?

 

[Remou]

Replace should suit:

Me.Size.DefaultValue = """" & Replace(Me.Size.Value,"'","''") &

 

[postermmxvicom]

Thanks Remou!

I was looking for a string manipulation function like that, but missed it.

I did have to alter your code just a tad, though.

Me.Size.DefaultValue = """" & Replace(Me.Size.Value, "[red]""[/red]", "[red]""""[/red]") & """"

Course clear, you get a star!

One last thing: Sometimes I wonder; "Is that someone's signature? Or do they type that at the end of each post?

 

[PHV]

Another way:

Me!Size.DefaultValue = "'" & Replace(Me!Size.Value, "'", "''") & "'"

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[postermmxvicom]

PHV,

Is there any advantage that one way has over the other, or any practical differences?

One last thing: Sometimes I wonder; "Is that someone's signature? Or do they type that at the end of each post?

 

[PHV]

I personally prefer to use double quotes for VBA literal constants and single quotes for the DB.

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[postermmxvicom]

PHV,

Does this come in handy when designing/maintaining your database? Or is it only a preference?

One last thing: Sometimes I wonder; "Is that someone's signature? Or do they type that at the end of each post?

 

[PHV]

I think this make the code clearer.
Compare this:
[tt]Me.Size.DefaultValue = """" & Replace(Me.Size.Value, """", """""") & """"[/tt]
with this ...
[tt]Me!Size.DefaultValue = "'" & Replace(Me!Size.Value, "'", "''") & "'"[/tt]

Hope This Helps, PH.
FAQ219-2884
FAQ181-2886

 

[postermmxvicom]

I see your point. It is much more readable.

Course clear, you got a star!

One last thing: Sometimes I wonder; "Is that someone's signature? Or do they type that at the end of each post?