【切换F3/F4时屏幕的拥挤现象】-

Private Sub tab01Industry_Click(ByVal sender As Object, ByVal e As System.EventArgs) Handles tab01Industry.Click
'Select Case Me.tab01Industry.SelectedIndex
' Case 0
' Me.Height = 200
' Case 1
' Me.Height = 500

' Call pDs01CompanyIndustryRecord()
' Call pRecordCount()
' Call pClearDataBindingDet()
' Call pDataBindingDet()

' If dgv01IndustryCompany.Enabled Then dgv01IndustryCompany.Select()
'End Select
End Sub