Mi rispondo da solo
il problema sembra riguardare l'attributo
AllowCustomPaging ...
tenendolo a True nn sono riuscito a risolvere,
mentre con valore False e il seguente binddata:

sub BindData()
Dim DS As DataSet
Dim MyConnection as OleDbConnection
Dim MyCommand As OleDbDataAdapter
dim quanti as integer

MyConnection = New OleDbConnection("Provider=Microsoft.Jet.OLEDB.4.0; Data Source="+server.mappath("Copia di CicloPassivo.mdb"))

MyConnection.Open()

MyCommand = New OleDbDataAdapter("SELECT * FROM Fornitore ORDER BY RagioneSociale", MyConnection)

DS = new DataSet()

MyCommand.Fill(ds, "Fornitore")

quanti=ds.Tables("Fornitore").Rows.Count.ToString( )

dim source as dataview=ds.Tables("Fornitore").DefaultView
MyDataGrid2.DataSource=source
MyDataGrid2.DataBind()
MyConnection.close()
lblMessage.Text = "Pagina " & MyDataGrid2.CurrentPageIndex+1 & _
" di " & MyDataGrid2.PageCount & _
". Record presenti=" & quanti
End Sub


funzia tutto ...
è evidente che sono 2 cose diverse....
cosi sono costretto a caricare sempre tutti
o record della tabella e nn solo quelli che mi servono
di volta in volta ...
quindi il caso è ancora aperto ....