imprimir los numero del 1 al 50 con el do while

  DIM m AS Integer
  m = 1
  DO WHILE m <= 50
  ListBox1.add(m)
  m = m + 1
  LOOP