语句选择标签中的值

Question

我在下面做了一个陈述，但它显示的是陈述而不是值

 Dim amt As String = Nothing
            amt = "select amount from [xx].[dbo].[xx] where referance_number=" & Page.Request.QueryString("trackidx") & ""
            Dim objs As New DATAAccess
            objs.insert_dataset_Access_accdb_test(amt)

            vpc_Amount.Text = amt