Follow along with the video below to see how to install our site as a web app on your home screen.
Note: This feature may not be available in some browsers.
Dim dt As DataTable = CType(dg.DataSource, DataTable)
MessageBox.Show("Rows: " & dt.Rows.Count.ToString)
MessageBox.Show("Columns: " & dt.Columns.Count.ToString)
Dim cm As CurrencyManager = CType(dg.BindingContext(dg.DataSource, dg.DataMember), CurrencyManager)
Dim dv As DataView = CType(cm.List, DataView)
MessageBox.Show("Rows: " & dv.Count.ToString)
MessageBox.Show("Columns: " & dv.Table.Columns.Count.ToString)
Dim dt As DataTable = CType(dg.DataSource, DataSet).Tables(0)