I resolve this with some modification on second row:
dv.RowFilter = "Column1 > " & TextBox1.Text & ""


@dunfiddlin
Thank you my friend for the help.
Cheers