jj: Fix StrToBool function
This commit is contained in:
parent
fb86a33f11
commit
5783b815d6
@ -17,12 +17,10 @@
|
||||
''' Versucht einen String in einen Boolean zu konvertieren
|
||||
''' </summary>
|
||||
''' <param name="str">Der zu konvertierende String</param>
|
||||
''' <returns>Den umgewandelten Wert oder Falsche</returns>
|
||||
Public Function StrToBool(str As Object) As Boolean
|
||||
''' <returns>Den umgewandelten Wert oder False</returns>
|
||||
Public Function StrToBool(str As String) As Boolean
|
||||
Dim result As Boolean = False
|
||||
|
||||
str = TryCast(str, String)
|
||||
|
||||
Try
|
||||
result = Convert.ToBoolean(str)
|
||||
Catch ex As Exception
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user