Public Function CreateNewdgvInsideNewPageTab(ByVal xMachine As String, ByVal xN As Integer, ByVal xdt As DataTable) As DataGridView
Dim newTab As New TabPage()
newTab.Text = xMachine '"Tab " & TBC.TabPages.Count + 1
newTab.Name = "TBP" & xN 'TBC.TabPages.Count + 1
Dim newdgv As New DataGridView
newdgv.Dock = DockStyle.Fill
newdgv.Name = "dgv" & xN
newTab.Controls.Add(newdgv)
TBC.TabPages.Add(newTab)
TBC.SelectedTab = newTab
newdgv.DataSource = xdt
Call dgvFormat(newdgv)
Return newdgv
End Function
dim xCode as string = dgv1.Rows(1).Cells(1).Value
dim xCode2 as string = dgv2.Rows(1).Cells(1).Value
dim xCode3 as string = dgv3.Rows(1).Cells(1).Value
Tag : .NET, Win (Windows App), VS 2010 (.NET 4.x), Windows
dgv1.CellEnter += New DataGridViewCellEventHandler(dgv1_CellEnter)
Private Sub dgv1_CellEnter(sender As Object, e As DataGridViewCellEventArgs)
End Sub
Load balance : Server 01
Quote:
