Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- Sub PopulateDefaultEntityBuildings()
- Dim dtDefaultEntityAddresses As New BillingDataSet.EntityBuildingInfoDataTable
- Try
- dtDefaultEntityAddresses = taEntityInfo.GetByEntityID(DefaultEntityID)
- dgDefaultEntityBuildings.DataSource = dtDefaultEntityAddresses
- HideDataGridColumns(New List(Of String)({"EntityName", "BuildingID", "EntityID", "ClientID"}), dgDefaultEntityBuildings)
- Catch ex As Exception
- Throw ex
- End Try
- End Sub
- Sub HideDataGridColumns(Columns As List(Of String), dg As DataGridView)
- Try
- For Each column In Columns
- dg.Columns(column).Visible = False
- Next
- Catch ex As Exception
- Throw ex
- End Try
- End Sub
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement