gistfile1.vb

Imports System.Runtime.CompilerServices

''' <summary> エイリアス的な拡張メソッドたち </summary>
Module StringExtention

    ''' <summary> </summary>
    <Extension()> _
    Public Function setFormat(this As String, ParamArray values As String()) As String
        Return String.Format(this, values)
    End Function

    <Extension()> _
    Public Function toStr_exlusDBNull(this As DataRow, columnname As String) As String
        If this(columnname) Is DBNull.Value Then Return ""
        Return this(columnname)
    End Function

    <Extension()> _
    Public Function isInt(this As String) As Boolean
        Return Integer.TryParse(this, Nothing)
    End Function

    ''' <summary> C#のasみたいなもん </summary>
    <Extension()> _
    Public Function asInt(this As String) As Integer
        If this.isInt Then Return CType(this, Integer)
        Return 0
    End Function

    ''' <summary> </summary>
    <Extension()> _
    Public Function setFormat(this As String, ParamArray values As String()) As String
        Return String.Format(this, values)
    End Function
End Module