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

| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛 |

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

我的收件箱(0)

欢迎加入我们，一同切磋技术

共有 609 人关注过本帖

标题：求教：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
帖　子：737
专家分：3488
注　册：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