`

VB 判断数据类型的函数

    博客分类:
  • vb
VB 
阅读更多

VarType() 函数返回的是 integer 型值,这个函数返回的是字符串。

Public Function getDataType(v As Variant) As String
Select Case
VarType(v)
Case vbArray
getDataType =
"vbArray"
Case vbBoolean
getDataType =
"vbBoolean"
Case vbByte
getDataType =
"vbByte"
Case vbCurrency
getDataType =
"vbCurrency"
Case vbDataObject
getDataType =
"vbDataObject"
Case vbDate
getDataType =
"vbDate"
Case vbDecimal
getDataType =
"vbDecimal"
Case vbDouble
getDataType =
"vbDouble"
Case vbEmpty
getDataType =
"vbEmpty"
Case vbError
getDataType =
"vbError"
Case vbInteger
getDataType =
"vbInteger"
Case vbLong
getDataType =
"vbLong"
Case vbNull
getDataType =
"vbNull"
Case vbObject
getDataType =
"vbObject"
Case vbSingle
getDataType =
"vbSingle"
Case vbString
getDataType =
"vbString"
Case vbUserDefinedType
getDataType =
"vbUserDefinedType"
Case vbVariant
getDataType =
"vbVariant"
Case Else
getDataType = "Unknown Data Type"
End Select
End Function

 

分享到:
评论

相关推荐

    vb IsDate判断字符串是否为日期或时间.rar

    vb 判断字符串是否为日期或时间,在输入框输入任意字符串类型,程序将会判断出该字符串是否是时间字符串,这个判断方法VB员自带有函数,使用IsDate即可实现,下面是使用IsDate的简单用法示例:  If IsDate(Text1) =...

    API之网络函数---整理网络函数及功能

    EnumPrintProcessorDatatypes 枚举由一个打印处理器支持的数据类型 EnumPrintProcessors 枚举系统中可用的打印处理器 Escape 设备控制函数 FindClosePrinterChangeNotification 关闭用...

    Vb6四十多条新手制作或业余爱好者必看的

    4、vb6保存(读取)数据到注册表里.txt 5、vb6背景色透明.txt 6、vb6打开任意类型的文件.txt 7、vb6打开网页.txt 8、vb6单击按钮复制文本框内的内容.txt 9、vb6单击按钮最小化窗体.txt 10、vb6点击最大化最小化和...

    VB.net 生成条形码code128条码.rar

    程序中为生成条形码,创建了一些函数,比如显示可见条码文字 如果小于40 不显示文字、获取条形码宽和放大系数、获得条码图形、根据编号获得条纹、获取目标对应的数据、偶数检测判断、获取128图形等,在VB.NET生成...

    VB实验基础-上机教程.zip

    包含vb的窗体控件应用,运算符和各种数据类型混合优先级,分支结构(输入年份和月份判断天数) print函数格式显示,各种循环结构以及窗体控件的综合应用,是初学者的好帮手。

    VB程序设计综合复习题

    4、当某文本框输入数据后(按了回车键),进行判断认为数据输入错,怎样删除原来数据?怎样使焦点回到文本框重新输入? 5、怎样把关于Command命令按钮的Enabled属性的帮助示例代码复制到你的代码窗口?已知帮助中的...

    Visual Basic 数据采集与串口通信测控应用实战(part1)

    内容包括在vb工程中调用activex控件和dll动态链接库等开发板卡数据采集与控制程序,在vb工程中利用mscomm控件、调用api函数等方法开发串口通信程序等。每种程序都提供了多个设计方法,每个设计都提供了线路图、详细...

    计算机程序设计-VB语言基础.pptx

    学习目标 VB语法的基本元素 编码规则 变量与常量 数据类型 运算 表达式 内部函数 计算机程序设计-VB语言基础全文共30页,当前为第2页。 复习与总结 ' Error Code Private Sub Command1_Click() text1.backcolor=...

    Excel_VBA程序设计.pdf

    第三节 数据类型 1 第四节 变量与常量 1 第五节 数组 2 第六节 注释和赋值语句 2 第七节 书写规范 2 第八节 判断语句 2 第九节 循环语句 3 第十节 其他类语句和错误语句处理 4 第十一节 过程和函数 5 一.Sub过程 5 ...

    vb贪食蛇源代码

    vb小游戏定义蛇的运动速度枚举值 Private Enum tpsSpeed QUICKLY = 0 SLOWLY = 1 End Enum '定义蛇的运动方向枚举值 Private Enum tpsDirection D_UP = 38 D_DOWN = 40 D_LEFT = 37 D_RIGHT = 39 End Enum '...

    VB6.0动态加载ActiveX控件漫谈

    ---- 2、声明窗体级变量与加载函数LoadControl Dim WithEvents oControl As VBControlExtender '地图仿真控件对象 Dim mblnTheory As Boolean '是否显示原理图 Private Function LoadControl(intType As Integer) ...

    Excel_VBA教程

    第三节 数据类型 1 第四节 变量与常量 1 第五节 数组 2 第六节 注释和赋值语句 2 第七节 书写规范 2 第八节 判断语句 2 第九节 循环语句 3 第十节 其他类语句和错误语句处理 4 第十一节 过程和函数 4 一.Sub过程 4 ...

    hus angela 2008 sp4

    Hus Angela 5是一个有真正意义的编程语言,语法上吸收DELPHI、VB、C、Flash的优点,功能上全面超越VBS(兼容所有VBS语句,所有的VBS功能都能在Hus Angela中使用),并有所创新,比如自动判断数据类型;一行代码调用...

    Hus Angela 2008 SP5 [面向问题编程语言]

     Angela 是一个部分面向问题的编程语言,语法上吸收DELPHI、VB、C、Flash的优点,功能上全面超越VBS(兼容所有VBS语句,所有的VBS功能都能在Hus Angela中使用),并有所创新,比如自动判断数据类型;一行代码调用File...

    Visual Basic 数据采集与串口通信测控应用实战(part2)

    内容包括在vb工程中调用activex控件和dll动态链接库等开发板卡数据采集与控制程序,在vb工程中利用mscomm控件、调用api函数等方法开发串口通信程序等。每种程序都提供了多个设计方法,每个设计都提供了线路图、详细...

    VB API 范例 150例 光盘 源码

    ├─Example091-判断控件类型 ├─Example092-Line控件 ├─Example093-使用Shape控件 ├─Example094-引入系统监视器 ├─Example095-媒体文件浏览器 ├─Example096-列表播放媒体文件 ├─Example097-在应用程序...

    VBScript介绍手册

    4.1.1 数据类型判断 4.1.2 格式化函数 4.1.3 数据类型转换函数 4.1.4 数学运算函数 4.1.4 日期时间处理函数 4.1.5 字符串处理函数 4.2 程序范例:Hello 4.2.1 范例介绍 4.2.2 函数介绍——MsgBox函数 4.2.3 程序清单...

    精通sql结构化查询语句

    1.5 SQL开发环境 1.5.1 SQL环境介绍 1.5.2 SQL的层次结构 1.5.3 SQL环境中的对象 1.5.4 SQL环境中的程序系统 1.6 SQL语句基础 1.6.1 SQL常量 1.6.2 SQL表达式 1.6.3 SQL数据类型 1.6.4 注释符 1.6.5 批处理 1.6.6 ...

Global site tag (gtag.js) - Google Analytics