You’re probably familiar with the Mid function, which returnsa substring of a specified number of characters from its stringargument. But are you aware that Mid can also be used to replacecharacters in the middle of a string? The Mid statement is a bitof an oddity in VB because it alters one of its arguments, butthis saves a lot of string concatenation code:

 Dim Str1 As StringStr1 = "SOME STRING"If Mid(Str1, 2, 1) = "O" _        Then Mid(Str1, _        2, 1) = "A"MsgBox Str1