wrap your code in a try statement

Like this:

VB Code:
  1. Try
  2.             'Put your code here
  3.         Catch ex As Exception
  4.             MessageBox.Show(ex.Message)
  5.         End Try

And let's see what it says.