1234

ExcelHome技术论坛

用户名  找回密码
 免费注册

QQ登录

只需一步,快速开始

快捷登录

帖子
EH技术汇-专业的职场技能充电站 妙哉!函数段子手趣味讲函数 Excel服务器-会Excel,做管理系统 效率神器,一键搞定繁琐工作
HR薪酬管理数字化实战 Excel 2021函数公式学习大典 Excel数据透视表实战秘技 打造核心竞争力的职场宝典
让更多数据处理,一键完成 数据工作者的案头书 免费直播课集锦 ExcelHome出品 - VBA代码宝免费下载
用ChatGPT与VBA一键搞定Excel WPS表格从入门到精通 Excel VBA经典代码实践指南
查看: 12022|回复: 8

[讨论] 学习ExcelVBA-CInt与Int的区别?

[复制链接]

TA的精华主题

TA的得分主题

发表于 2009-6-7 10:50 | 显示全部楼层 |阅读模式
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
http://club.excelhome.net/viewth ... p;page=1#pid2875524
函数        返回类型
CBool         Boolean
CByte         Byte
CCur        Currency
CDate        Date
CDbl        Double
CDec        Decimal
CInt        Integer
CLng        Long
CSng        Single
CStr        String
CVar        Variant

讨论的问题是
学习VB时主要是int(),str(),doube为主
那么:常用的方法与CINT,CSTR,CDBL有何区别。
EXCELVBA函数参考手册20090606.rar (130.5 KB, 下载次数: 192)

TA的精华主题

TA的得分主题

 楼主| 发表于 2009-6-7 11:05 | 显示全部楼层
CBool 函数示例
本示例使用 CBool 函数来将一表达式转成 Boolean 值。如果表达式的结果为非零的值,CBool 返回 True;否则返回 False。
Sub ls1()
  Dim A, B, Check
  A = 5: B = 5    ' 设置变量初值。
  Check = CBool(A = B)    ' Check 的值为 True。
  A = 0    ' 定义变量。
  Check = CBool(A)    ' Check 的值为 False。
End Sub

常用的方法是if a=b then end if

TA的精华主题

TA的得分主题

发表于 2009-6-7 11:06 | 显示全部楼层
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用  · 内置多项VBA编程加强工具       ★ 免费下载 ★      ★使用手册
原帖由 兰州人 于 2009-6-7 10:50 发表
http://club.excelhome.net/viewth ... p;page=1#pid2875524
函数        返回类型
CBool         Boolean
CByte         Byte
CCur        Currency
CDate        Date
CDbl        Double
CDec        Decimal
CInt        Integer
CLng        Long
CSng         ...

楼主的这个问题再简单不过了,只要你查一下帮助文件就一切明白了!这些函数前面的C代表Change to 即把参数“转换成”所需要的类型的意思。

TA的精华主题

TA的得分主题

 楼主| 发表于 2009-6-7 11:08 | 显示全部楼层
CByte 函数将一表达式转成 Byte。

Sub ls1()
  Dim MyDouble, MyByte
  MyDouble = 125.5678    ' MyDouble 为Double(双精度)。
  MyByte = CByte(MyDouble)    ' MyByte 值为 126。
End Sub

问题提出 Byte与Int有何区别。

TA的精华主题

TA的得分主题

 楼主| 发表于 2009-6-7 11:15 | 显示全部楼层
CCur 函数将表达式转成 Currency。

Sub ls1()
  Dim MyDouble, MyCurr
  MyDouble = 543.214588123457  ' MyDouble 为 Double 类型。
  MyCurr = CCur(MyDouble * 2)  ' 将 MyDouble * 2 的结果
    ' (1086.429176)转换为 Currency (1086.4292)。
End Sub

问题,MyCurr(MyDouble) 与 round(MyDouble,4)有何区别。

TA的精华主题

TA的得分主题

 楼主| 发表于 2009-6-7 11:38 | 显示全部楼层
CDbl 函数示例
CDbl 函数将表达式转换为 Double 类型。
Dim MyCurr, MyDouble
MyCurr = CCur(234.456784)    ' MyCurr 为 Currency 类型。
MyDouble = CDbl(MyCurr * 8.2 * 0.01)    ' 将结果转换为 Double 类型。

TA的精华主题

TA的得分主题

 楼主| 发表于 2009-6-7 11:40 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
从上面的结果,深入理解原来发帖
http://club.excelhome.net/thread-427372-1-1.html的含义。

在SQL调用数据源时,多数结果为String型,需要借助以下数据类型函数进行操作.
http://hi.baidu.com/wdxzas/blog/ ... 56932cb8998f9c.html
从这个网站上,找到了相关函数,与以住的数据类型转换有占区别,就是加了一个C.
CBool(expression) 转换表达式为Boolean 型态。
CByte(expression) 转换表达式为Byte 型态。
CChar(expression) 转换表达式为字符型态。
CDate(expression) 转换表达式为Date 型态。
CDbl(expression) 转换表达式为Double 型态。
CDec(expression) 转换表达式为Decimal 型态。
CInt(expression) 转换表达式为Integer 型态。
CLng(expression) 转换表达式为Long 型态。
CObj(expression) 转换表达式为Object 型态。
CShort(expression) 转换表达式为Short 型态。
CSng(expression) 转换表达式为Single 型态。
CStr(expression) 转换表达式为String 型态

TA的精华主题

TA的得分主题

发表于 2010-4-26 14:05 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
有没有转换成Range类型的函数?

TA的精华主题

TA的得分主题

发表于 2010-4-26 18:44 | 显示全部楼层
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件       ★免费下载 ★       ★ 使用帮助
原帖由 chzbv1984 于 2010-4-26 14:05 发表
有没有转换成Range类型的函数?

这个问题问得非常好!
答案是:没有!
您需要登录后才可以回帖 登录 | 免费注册

本版积分规则

1234

手机版|关于我们|联系我们|ExcelHome

GMT+8, 2025-3-16 04:24 , Processed in 0.041227 second(s), 10 queries , Gzip On, MemCache On.

Powered by Discuz! X3.4

© 1999-2023 Wooffice Inc.

沪公网安备 31011702000001号 沪ICP备11019229号-2

本论坛言论纯属发表者个人意见,任何违反国家相关法律的言论,本站将协助国家相关部门追究发言者责任!     本站特聘法律顾问:李志群律师

快速回复 返回顶部 返回列表