VBProperCase with double barreled surnames??

[mr_sd]

I have a line of code in an afterupdate sub for my "surname" field:

The code:
Me.PartyName = StrConv(Me.PartyName, vbProperCase)

The problem is when a double barreled surname is entered eg:
Smith-Jones

The code converts it to:
Smith-jones.

Is there a simple way to correct this?

Thanks,
Rich.

 

[geoffcodd]

if you use instr to find "-" and then proper case the two names and rejoin, that will work

 

[geoffcodd]

Me.PartyName = StrConv(Left(Me.PartyName, InStr(Me.PartyName, "-")), vbProperCase) & StrConv(Mid(Me.PartyName, InStr(Me.PartyName, "-") + 1, 50), vbProperCase)

 

[mr_sd]

Genius!!

Never would have thought of that.

Thanks very much!