diff --git a/Controls.LookupGrid/My Project/AssemblyInfo.vb b/Controls.LookupGrid/My Project/AssemblyInfo.vb index 3c468bb3..24865c0c 100644 --- a/Controls.LookupGrid/My Project/AssemblyInfo.vb +++ b/Controls.LookupGrid/My Project/AssemblyInfo.vb @@ -31,5 +31,5 @@ Imports System.Runtime.InteropServices ' übernehmen, indem Sie "*" eingeben: ' - - + + diff --git a/Controls.LookupGrid/frmLookupGrid.vb b/Controls.LookupGrid/frmLookupGrid.vb index 46f22a8d..ffad6cc9 100644 --- a/Controls.LookupGrid/frmLookupGrid.vb +++ b/Controls.LookupGrid/frmLookupGrid.vb @@ -98,10 +98,16 @@ Public Class frmLookupGrid _View.BestFitColumns() ' Datenspalte zusätzlich in der Breite anpassen - If _View.Columns.Count = 0 Then - Dim oDataColumn As GridColumn = _View.Columns.Item(_DataColumn) - oDataColumn.BestFit() - End If + Try + If _View.Columns.Count = 0 Then + Dim oDataColumn As GridColumn = _View.Columns.Item(_DataColumn) + oDataColumn.BestFit() + End If + Catch ex As ArgumentOutOfRangeException + + Catch ex As Exception + + End Try End Sub Private Sub frmLookupGrid_Shown(sender As Object, e As EventArgs) Handles Me.Shown BringToFront()