主题：[求助]如何引用SQLCommand查询出来的结果

Dim cmd As New SQLCommand
Dim dt As DataTable
cmd.C
cmd.CommandText = "SELECT name,mima From {yonghu} where [gongshi_id]= '" & Vars("gongshi_a") & "'"
dt = cmd.ExecuteReader()
Dim dr As DataRow
dr= dt.DataRows(0)
Output.Show(dr("name"))