Предупреждение 1 Функция "debagtext" возвращает значение не для всех путей выполнения

    Function debagtext(ByVal text As String)
        If text <> "" Then
            debugging.TextBox1.Text = debugging.TextBox1.Text & vbCrLf & Now.ToLongTimeString + text
        End If
    End Function

    Public Shared Function debagtext(ByVal text As String) As String
        If text <> "" Then
            Return debugging.TextBox1.Text & vbCrLf & Now.ToLongTimeString + text
        Else
            Return Nothing
        End If
    End Function

Public Shared Sub debagtext(ByVal text As String)
        If text <> "" Then
            debugging.TextBox1.Text = debugging.TextBox1.Text & vbCrLf & Now.ToLongTimeString + text
        End If
    End Sub

    Public Shared Function ReadIni(ByVal Section As String, ByVal Param As String) As String
        Try
            Dim rc As String = Strings.StrDup(255, vbNullChar)
            Dim x As Integer
            x = GetPrivateProfileString(Section, Param, "", rc, 255, My.Application.Info.DirectoryPath & "\Set.ini")
            If x <> 0 Then rc = Strings.Left(rc, x)
            ReadIni = rc
        Catch ex As Exception
        End Try
    End Function

Return

    Public Shared Function debagtext(ByVal text As String) As String
        If text <> "" Then
            Return debugging.TextBox1.Text & vbCrLf & Now.ToLongTimeString + text
        Else
            Return Nothing
        End If
    End Function

Form1.debagtext(" TextBoxPassXdsl.ForeColor = Color.Silver")

debagtext(" TextBoxPassXdsl.ForeColor = Color.Silver")

    Public Shared Function ReadIni(ByVal Section As String, ByVal Param As String) As String
        Try
            Dim rc As String = Strings.StrDup(255, vbNullChar)
            Dim x As Integer
            x = GetPrivateProfileString(Section, Param, "", rc, 255, My.Application.Info.DirectoryPath & "\Set.ini")
            If x <> 0 Then rc = Strings.Left(rc, x)
            Return rc
        Catch ex As Exception
            Return Nothing
        End Try
    End Function