neu
This commit is contained in:
@@ -32,6 +32,8 @@ Public Class MySearchBox
|
||||
Public Property SQL_ORDER_BY As String
|
||||
Public Property conn_art As String = "FMZOLL"
|
||||
Public Property key_visible As Boolean = False
|
||||
Public Property _allowSpaceAsSplitter As Boolean = False
|
||||
|
||||
|
||||
Dim SrchHeight As Integer = 300
|
||||
Dim SrchWidth As Integer = 300
|
||||
@@ -247,6 +249,8 @@ Public Class MySearchBox
|
||||
With usrcntl.dgvKundenAktiv
|
||||
|
||||
Dim srch As String = Me.Text.Replace("'", "").ToString.Trim
|
||||
If _allowSpaceAsSplitter Then srch = srch.Replace(" ", ",")
|
||||
|
||||
Dim srch2 As String = ""
|
||||
If srch.Contains(",") Then
|
||||
Dim spitter() = srch.Split(",")
|
||||
|
||||
Reference in New Issue
Block a user