vb.net从新名称sql数据库中获取价值

Question

 Dim cd As SqlCommand = New SqlCommand("select datepart(mm,Birthday) as MonthDates from Information where Name='" & cbname.Text & "'", con)
            Dim reader1 As SqlDataReader = cd.ExecuteReader
            While reader1.Read
                Dim mon As Integer = reader1("MonthDates")
                lblbday.Text = mon

我使用此代码假定将在vb net中读取SQL中的新命名列，但不会读取新的命名列“ MonthDates”。

代码有什么问题？ 请帮忙。 先感谢您！

Answer 1

您应该在查询后处理连接（在我的示例中使用USING这样做）：

Using con As New SqlConnection(....)
    Dim cd As SqlCommand = New SqlCommand("select datepart(mm,Birthday) as MonthDates from Information where Name='" & cbname.Text & "'", con)
    Dim mon As Integer = cd.ExecuteScalar()
    lblbday.Text = mon
End Using