Şifre değerini SecureString'e Dönüştürme

Şifre değerini SecureString'e Dönüştürme

    Public Shared Function ConvertToSecureString(strPassword As String) As SecureString
        Dim secureStr = New SecureString()
        If strPassword.Length > 0 Then
            For Each c In strPassword.ToCharArray()
                secureStr.AppendChar(c)
            Next
        End If
        Return secureStr
    End Function