你可以:

检查长度是否为4个字符的倍数 检查每个字符都在A-Z, A-Z, 0-9， +， /集合中，除了末尾的填充为0,1或2 '='字符

如果你期望它是base64，那么你可以使用平台上可用的任何库来尝试将它解码为字节数组，如果它不是有效的base64则抛出异常。当然，这取决于你的平台。

c# 这表现得很好:

static readonly Regex _base64RegexPattern = new Regex(BASE64_REGEX_STRING, RegexOptions.Compiled);

private const String BASE64_REGEX_STRING = @"^[a-zA-Z0-9\+/]*={0,3}$";

private static bool IsBase64(this String base64String)
{
    var rs = (!string.IsNullOrEmpty(base64String) && !string.IsNullOrWhiteSpace(base64String) && base64String.Length != 0 && base64String.Length % 4 == 0 && !base64String.Contains(" ") && !base64String.Contains("\t") && !base64String.Contains("\r") && !base64String.Contains("\n")) && (base64String.Length % 4 == 0 && _base64RegexPattern.Match(base64String, 0).Success);
    return rs;
}

如果解码时我们得到一个包含ASCII字符的字符串，则字符串为 不编码

(RoR) ruby解决方案:

def encoded?(str)
  Base64.decode64(str.downcase).scan(/[^[:ascii:]]/).count.zero?
end

def decoded?(str)
  Base64.decode64(str.downcase).scan(/[^[:ascii:]]/).count > 0
end

没有办法区分字符串和base64编码，除非字符串在您的系统中有一些特定的限制或标识。

Function Check_If_Base64(ByVal msgFile As String) As Boolean
Dim I As Long
Dim Buffer As String
Dim Car As String

Check_If_Base64 = True

Buffer = Leggi_File(msgFile)
Buffer = Replace(Buffer, vbCrLf, "")
For I = 1 To Len(Buffer)
    Car = Mid(Buffer, I, 1)
    If (Car < "A" Or Car > "Z") _
    And (Car < "a" Or Car > "z") _
    And (Car < "0" Or Car > "9") _
    And (Car <> "+" And Car <> "/" And Car <> "=") Then
        Check_If_Base64 = False
        Exit For
    End If
Next I
End Function
Function Leggi_File(PathAndFileName As String) As String
Dim FF As Integer
FF = FreeFile()
Open PathAndFileName For Binary As #FF
Leggi_File = Input(LOF(FF), #FF)
Close #FF
End Function

你可以:

检查长度是否为4个字符的倍数 检查每个字符都在A-Z, A-Z, 0-9， +， /集合中，除了末尾的填充为0,1或2 '='字符

如果你期望它是base64，那么你可以使用平台上可用的任何库来尝试将它解码为字节数组，如果它不是有效的base64则抛出异常。当然，这取决于你的平台。