Giving A Label A Textvalue With A Select Query

I got the following code and I like to give the label.text a value which is selected by the query in the .commandtext line. This is off course not working but I don't have any idea how it can work. Someone suggestions??

Thanks!!

Partial Class ShowBonsaiProperties
    Inherits System.Web.UI.Page

    Sub Page_Load(ByVal sender As Object, ByVal e As System.EventArgs)

        Dim sqlConnection2 As New System.Data.SqlClient.SqlConnection(ConfigurationManager.ConnectionStrings("BonsaiDataBaseConnectionString").ToString())

        Dim cmd As New System.Data.SqlClient.SqlCommand

        With cmd

            .CommandType = System.Data.CommandType.Text

            .CommandText = "SELECT BonsaiName FROM Bonsai WHERE BonsaID = 1"

            .Connection = sqlConnection2

        End With

        sqlConnection2.Open()

        cmd.ExecuteNonQuery()

        sqlConnection2.Close()

        Dim BonsaiNameText As Object = .CommandText

        LblShowBonsaiName.Text = BonsaiName

    End Sub

End Class