sub string
  dim s as String
  s="first part"+" and "+"second part"
  msgbox len(s)
  msgbox left(s, 5)
  msgbox right(s, 4)
  msgbox uppercase s
  msgbox mid(s, 11, 3)
  msgbox("123".intValue+1)
  msgbox s.stringByAppendingString(" and third part")
end sub