hola necesito ayuda con el siguiente codigo necesito controlar la propiedad pagesize del datagrid pueden indicarme donde esta el error  
 
  Function MyQueryMethod() As System.Data.DataSet
        Dim connectionString As String = "server=xxxxx; user id='xxxxx'; password=''; database=xxxxxxxx
Dim dbConnection As System.Data.IDbConnection = New System.Data.SqlClient.SqlConnection(connectionStri  ng)
 
        Dim queryString As String = "SELECT [Inventario].[Item], [Inventario].[Inventario], [Inventario].[Equipo], [In"& _
"ventario].[Fecha Compra], [Inventario].[Modelo], [Inventario].[Serie], [Inventar"& _
"io].[Valor Compra], [Inventario].[Ubicacion] FROM [Inventario]order by item"
        Dim dbCommand As System.Data.IDbCommand = New System.Data.SqlClient.SqlCommand
        dbCommand.CommandText = queryString
        dbCommand.Connection = dbConnection
 
        Dim dataAdapter As System.Data.IDbDataAdapter = New System.Data.SqlClient.SqlDataAdapter
        dataAdapter.SelectCommand = dbCommand
        Dim dataSet As System.Data.DataSet = New System.Data.DataSet
        dataAdapter.Fill(dataSet)
 
        Return dataSet
    End Function
 
 
Sub pagerbuttonclick(sender As Object, e As EventArgs)
dim arg as string = sender.commandargument
select arg
    case "siguiente"
        if(datagrid1.currentpageindex <(datagrid1.pagecount - 1 )) then
           datagrid1.currentpageindex + = 1
        end if
    case "anterior"
        if (datagrid1.currentpageindex > 0) then
            datagrid1.currentpageindex - = 1
        end if
    case "ultima"
            datagrid1.currentpageindex= (datagrid1.pagecount -1)
    case else
            datagrid1.currentpageindex=0
    end select
    datagrid1.datasource=myquerymethod()
    datagrid1.databind()
End Sub
 
sub mi_cambio(sender as object, e as system.web.ui.webcontrols.datagridpagechangedevent  args)
    datagrid1.currentpageindex=e.newpageindex
    datagrid1.datasource=myquerymethod()
    datagrid1.databind
end sub
 
Sub DropDownList1_SelectedIndexChanged(sender As Object, e As EventArgs)
datagrid1.datasource=myquerymethod(dropdownlist1.i  tems(dropdownlist1.selectedindex).text)
datagrid1.pagesize=Cint(dropdownlist1.selecteditem  value)
datagrid1.databind()
End Sub 
  
 
