16进制转换10进制(最大支持24F)
来源:互联网 发布:北京远光软件 编辑:程序博客网 时间:2024/06/05 21:02
16进制转换10进制(最大支持24F)
Option Explicit
Private Sub Command1_Click()
Dim a
a = HEXtoDEC("82A1063F")
Debug.Print a
End Sub
Private Function HEXtoDEC(ByVal HEXstr As String)
'VB6下的16进制转10进制函数最大支持24个F
'输出结果CDec最大79,228,162,514,264,337,593,543,950,335
'by chinaboyzyq 2010-04-09
Dim i As Integer, j As Integer, L As Integer, Fjs '方次计算
L = Len(HEXstr): If L > 24 Then HEXtoDEC = 0: Exit Function
For i = 0 To L - 1
Fjs = 1
For j = 0 To i - 1
If i > 0 Then Fjs = CDec(Fjs) * 16
Next
HEXtoDEC = CDec(HEXtoDEC) + ("&H" & Mid(HEXstr, L - i, 1)) * Fjs
Next
End Function
- 16进制转换10进制(最大支持24F)
- 10进制转换16进制(转换结果最大支持24个F)
- java将16进制颜色值转换为RGBA值为0.0f~1.0f的方法
- 【暑期基础2】F HDU 进制转换(进制转化)
- 【暑期基础2】F HDU 2031 进制转换
- Python 10进制与任意进制之间相互转换(最大为62进制)
- mysql版本 5.6.10,UNIX_TIMESTAMP和FROM_UNIXTIME支持最大时间戳转换
- 初学C#之进制转换(支持十进制小数转任意进制【2到36进制】)
- VC支持十六(16)进制的字符串转换为数值函数strtoul
- HDU 1231最大连续子序列(周赛F题)
- CodeForces 589F Gourmet and Banquet(二分 + 最大流)
- GYM 100694 F.The Berland Championship(最大流-Dinic)
- F题 Substring(最大公共子串)
- Codeforces Gym 100825 F. Transportation Delegation (最大流)
- 练习2-3 编写函数htoi(s),把由16进制数字组成的字符串(包含可选的前缀0X或0x)转换成与之等价的整形值。字符串中允许包含的数字包括:0 ~ 9, a ~ f,A ~ F。
- 最大流----F - Flow Problem
- 【java day4】 数组 Array,最大/小值,进制转换
- 【C语言】任意进制之间的转换(支持小数部分)
- asp.net 异步页面
- delphi配置
- 新手上路,大家多多关照
- C#数据库编程 之 ADO.NET的数据库访问小结
- windows服务的描述添加
- 16进制转换10进制(最大支持24F)
- 【备忘】GENERAL C PROGRAMMING EXAMPLES(2)Data Types
- Eclipse RCP 中的常用小技巧
- 期待 ubuntu 10.04
- 城府的修练
- Mysql常用命令
- Spring2.5注释驱动与基于注释的MVC
- java.net.SocketException异常的可能性分析
- 【转】James Gosling_百度百科