Upon clicking a button, a new window opens with an inputbox requiring info. However, if the box is left blank, I want to produce a messagebox error and return the user to the inputbox. This is what I've got so for:
What should I enter in the ***INPUTBOX FOCUS HERE*** line?
Code:
Dim new_dir As String
new_dir = InputBox("Enter directory name:", "Add new directory")
If new_dir = "" Then
MessageBox.Show("Directory name must be entered!", "ERROR", MessageBoxButtons.RetryCancel, MessageBoxIcon.Error)
***INPUTBOX FOCUS HERE***
Else
IO.File.Create(new_dir)
End If