ListView的奇怪问题？？？

Question

大家测试一下这个，在窗体添加一个listview控件和两个按钮
Private Sub Command1_Click()
  
    Dim B As ColumnHeader
    Set B = ListView1.ColumnHeaders.Add(, "字段一", "字段一", ListView1.Width / 3)
    Set B = ListView1.ColumnHeaders.Add(, "字段二", "字段二", ListView1.Width / 3)
    Set B = ListView1.ColumnHeaders.Add(, "字段三", "字段三", ListView1.Width / 3)
    
    ListView1.View = lvwReport
    
    Dim A As ListItem
    Set A = ListView1.ListItems.Add(, "记录1", "记录1")
    A.SubItems(1) = "1"
    A.SubItems(2) = "2"
    
End SubPrivate Sub Command2_Click()
    Dim B As ColumnHeader
    Set B = ListView1.ColumnHeaders.Add(, "3213213", "字段一", ListView1.Width / 3)
    Set B = ListView1.ColumnHeaders.Add(, "字段二", "字段二", ListView1.Width / 3)
    Set B = ListView1.ColumnHeaders.Add(, "字段三", "字段三", ListView1.Width / 3)
    
    ListView1.View = lvwReport
    
    Dim A As ListItem
    Set A = ListView1.ListItems.Add(, "记录1", "记录1")
    A.SubItems(1) = "1"
    A.SubItems(2) = "2"End Sub按钮2中，在添加listview的标题头时，会出现“无效的关键字”错误，好像那个key的属性不能设置为
一串数字的字符串，如果换乘"dasdas"这样的字母字符串又没有问题了，大家可以试试

Answer 1

key 可选的。唯一的（（（（字符串表达式）））），可以用来访问集合的成员。 
什么是字符串表达式？楼主

Answer 2

对不住楼主，那个key值用可以强制转换为数字的字符串都不行。

Answer 3

我现在问题是
我将一个recordset对象数据显示在listview
我每个记录的ID号都是“32131231”这样的数值类型字符串我尝试将这些ID号作为每个记录的key值，就发生这样的错误我现在采用的处理方式是每个记录的key值使用"Row" & i来处理，是可行的只是觉得这个地方不能用纯数值字符串，好奇怪

Answer 4

就是啊就是后面加一个字母啊，然后你可以用Val函数取出来的！其实也一样，只不过变通一下而已。