URGENTE dropdownlist

[mjesus20]

estoy tratando de llenar un dropdownlist manualmente para que este control me controle la cantidad de datos que quiero ver en mi datagrid atraves de la propiedad pagesize
el codigo q estoy utilizando es el siguiente

Sub DropDownList2_SelectedIndexChanged(sender As Object, e As EventArgs)
datagrid1.datasource=myquerymethod(dropdownlist2.i tems(datagrid1.pagesize).text)
datagrid1.databind()
End Sub

sub page_load2(sender as object, e as eventargs)
if not page.ispostback then
dropdownlist2.datatextfield = "datagrid1.pagesize = 1"
'dropdownlist2.datasource=myquerymethod()
dropdownlist2.databind()
end if
end sub

alguien me podria indicar cual es el error ya que cuando cargo la pagina no veo el valor 1 en el dropdownlist
de antemano muchas gracias