Dim intCounter As Integer
Dim msgInput As DialogResult
Dim strArray As String
'Variable to hold the TryParse result
Dim converted As Boolean = False
'Variable to hold the converted value is successful
Dim userNum As Integer
Try
    For intCounter = 0 To 9
	'Prompt the user for a number
        strInputVal = InputBox("Please enter a value:" & vbNewLine & "Remaining values to be entered: " & 10 - intCounter, "Input")

	'Make sure the user entered a value
	If Not String.IsNullOrEmpty(strInputVal) Then
		'Use TryParse to convert user input to an integer
		converted = Integer.TryParse(strInputVal,userNum)

		'Check to status of the conversion
		If Not Converted Then
			'They entered a non-numeric vaulue, so
			'we must chastise them for their mistake
	    		MessageBox.Show("You must enter numeric data!")
		Else
			'Conversion was a success so add this
			'to our array. In the code you've provided
			'I dont see where you're initializing your
			'array, but Im going to assume you're doing
			'it correctly, or I'll have to chastise
			'you for your sinful ways
			intDigitArray(intCounter) = userNum
		End If
	Else
		'User didnt enter a value, let them know
		'the error of their ways
		MessageBox.Show("Please enter a value!")
	End If
    Next

Catch ex As Exception
    MessageBox.Show("ERROR: " + ex.Message)
End Try