Well, if I had tried this before I posted:

With .AddTextbox(msoTextOrientationHorizontal, 30, 125, 300, 100).TextFrame
.TextRange.Text = CStr(rs.Fields("City"))
.TextRange.Font.Color = RGB(255, 255, 255)
End With

Then I would have found the answer I was looking for.

Thanks,
Carrie