VBA中Variant能否存储定长String？为何测试代码可正常运行？

你观察到的这个现象其实是VB/VBA里的隐式类型转换在起作用，微软文档的表述容易让人产生误解，咱们一步步拆解清楚：

1. 文档表述的真实含义 #

微软说Variant“可存储除定长String数据外的任意类型数据”，核心是Variant无法直接以「定长字符串类型」的形式存储数据——也就是说，Variant内部不会保留定长字符串的类型标识和定长约束。但这并不意味着你不能把定长字符串赋值给Variant，因为赋值时会自动触发类型转换。

2. 你的代码里发生了什么 #

当执行y = x时：

• x是定长字符串（String * 10），VB会自动把它转换成变长字符串类型，再存储到Variant变量y中。
• 你可以通过这段代码验证：

  Sub TestVariantType()
      Dim y As Variant
      Dim x As String * 10
      x = "Test"
      y = x
      ' 输出结果：TypeName(y) = String，VarType(y) = 8（对应vbString）
      MsgBox "TypeName(y): " & TypeName(y) & vbCrLf & "VarType(y): " & VarType(y)
  End Sub
  

  这里TypeName(y)返回的是普通String（变长），而非定长字符串的特殊标识，说明Variant里存储的已经是转换后的变长字符串了。

3. 定长特性的变化 #

虽然转换后的字符串会保留原定长字符串的内容（包括末尾自动补充的空格），但它已经失去了定长约束——比如你可以直接给y赋值更长的字符串，不会被截断或补空格，这和真正的定长字符串行为完全不同。

简单总结：文档说的是Variant不能存储定长字符串类型，但它可以接收定长字符串的赋值，因为赋值过程中会自动转成变长字符串存入Variant~

内容的提问来源于stack exchange，提问作者Shobhit