DataTable.Selectは残念ながら文字列でのみfilterExpressionを受け付けます。
このため，
Dim Search() As DataRow = Testdatatable.Select("goodsNumber = " & hensuu)
のように，文字列演算で条件式を作ってください。