DataGrid Problem!
================================================================
I have tried this code and it working.

'Show all
DataSet11.Employee.DefaultView.RowFilter = "empno<>''"
'Input Box
Dim aFind As String = InputBox("Enter a Employee No.", "Filter Employee No.")
'Filter
DataSet11.Employee.DefaultView.RowFilter = "empno like '" & aFind & "%'"
DataGrid1.DataSource = DataSet11.Employee

Now, my problem is the DataGrid. Everytime I use the RowFilter. This command doesn't work.

'Move Next
Me.BindingContext(DataSet11, "Employee").Position += 1

DataGrid doesn't display how records is moving to the next record.

I've trid even this code.

'Move Next
Me.BindingContext(DataSet11, "Employee").Position += 1
DataGrid1.DataSource = DataSet11.Employee

But nothing happen. All I want to happen is to display how records navigate using DataGrid even I used the RowFilter.