'The wrong way
    Private Sub OpenFileDialog1_FileOk(ByVal sender As System.Object, ByVal e As System.ComponentModel.CancelEventArgs) Handles OpenFileDialog1.FileOk
    'Code
    End Sub

'The right way
            If OpenFileDialog1.ShowDialog() = DialogResult.OK Then
        'Code
        End If