求教：select case 中的数据类型怎么匹配不成功？？？第一、二个case匹配不成功！！！ - VB6论坛

编程论坛 → 开发语言 → 『 VB6论坛』 → 求教：select case 中的数据类型怎么匹配不成功？？？第一、二个case匹配不成功！！！

标题：求教：select case 中的数据类型怎么匹配不成功？？？第一、二个case匹配不 ...

只看楼主

lxlyhu

等　级：新手上路
帖　子：24
专家分：0
注　册：2013-12-12
结帖率：50%

楼主

问题点数：0 回复次数：4

求教：select case 中的数据类型怎么匹配不成功？？？第一、二个case匹配不成功！！！

Select Case TypeName(.Cells(j, i).Value)'excel单元格中的值
                 Case "string"
                    field_type(i - 1) = "char(30)"
                 Case "double"
                    field_type(i - 1) = "number"
                 Case Else
                    field_type(i - 1) = TypeName(.Cells(j, i).Value)
            End Select

搜索更多相关主题的帖子: double　number　excel　

2014-12-09 10:54

lianyicq

等　级：贵宾
威　望：26
帖　子：735
专家分：3478
注　册：2013-1-26

第 2 楼

得分:0

Select Case TypeName(.Cells(j, i).Value)'excel单元格中的值
                 Case "String"
                    field_type(i - 1) = "char(30)"
                 Case "Double"
                    field_type(i - 1) = "number"
                 Case Else
                    field_type(i - 1) = TypeName(.Cells(j, i).Value)
            End Select