Add textbox value to datatable multiple times

[LadySylvia]

Here is my code:

Dim num As Integer
num = Me.txtCopies.Text

If num = 0 Then
  MessageBox.Show("The number of copies cannot be under 1.", "Popcorn Movie Rentals Warning", MessageBoxButtons.OK, MessageBoxIcon.Exclamation, MessageBoxDefaultButton.Button1)
  Me.txtCopies.Select()
  Me.txtCopies.Focus()
Else
  Me.PmrDataSet.Movies.Rows.Add(movie)
End If

My textbox (txtCopies) default value is 1 so naturally, as it is coded above, the datarow is added once into the Movies Table. But what I need to know is how to code if the txtCopies field has a greater integer value.

Thx for all the help in advance!

LadySylvia