Class SurroundingClass
Protected Sub Page_Load(ByVal sender As Object, ByVal e As EventArgs)
If Not IsPostBack Then
Dim dt As DataTable = New DataTable()
dt.Columns.AddRange(New DataColumn(1) {New DataColumn("ItemId", GetType(Integer)), New DataColumn("App_Date", GetType(String))})
dt.Rows.Add(1, "2/14/2020")
dt.Rows.Add(2, "9/16/2020")
GridView1.DataSource = dt
GridView1.DataBind()
End If
End Sub
Protected Sub GridView1_SelectedIndexChanged(ByVal sender As Object, ByVal e As EventArgs)
Dim str As String = (CType(GridView1.SelectedRow.FindControl("App_Date"), Label)).Text
Dim dt As DateTime = DateTime.ParseExact(str, "M/d/yyyy", Nothing)
txtappdate.Text = dt.ToString()
End Sub
End Class