VB Code:
  1. lngWidth = command1.Width
  2. command2.Width = lngWidth
  3. command3.Width = lngWidth
  4. 'etc etc
???