Public Function 字串A中可以找到字串B(ByVal 字串A As String, ByVal 字串B As String) As Boolean

    Public Function 字串A中可以找到字串B(ByVal 字串A As String, ByVal 字串B As String) As Boolean
        ' OK [2008-05-13-PM-08-52-58]
        If 字串A.IndexOf(字串B) >= 0 Then
            Return True
        Else
            Return False
        End If
    End Function
    ' -   -   -   -   -   -   -   -   -   -   -   -   -
    ' -   -   -   -   -   -   -   -   -   -   -   -   -