Dim tblseach As New DataTable
Query = "select location from [PNS].[dbo].[1_PNS] Where serial = '" & txtsearch.Text & "'"
cmd.CommandText = Query
cmd.ExecuteNonQuery()
da.Fill(tblseach)
MessageBox.Show(tblseach.Rows(0).Item(0))
Tag : .NET, Ms SQL Server 2008, VBScript, Win (Windows App), VB.NET, VS 2015 (.NET 4.x)