| 网站首页 | 业界新闻 | 小组 | 威客 | 人才 | 下载频道 | 博客 | 代码贴 | 在线编程 | 编程论坛
欢迎加入我们,一同切磋技术
用户名:   
 
密 码:  
共有 3726 人关注过本帖
标题:显示十六进制数的问题!
取消只看楼主 加入收藏
红影
Rank: 1
等 级:新手上路
威 望:2
帖 子:659
专家分:0
注 册:2006-2-22
结帖率:66.67%
收藏
 问题点数:0 回复次数:2 
显示十六进制数的问题!
我想把一个长整形变量表示为十六进制数 并且格式为 00 00 00 00 这样

strCardData = Format(Hex(TempCardNum), "00 00 00 00 ")

我这样写的话 ,0到9都没有问题

但是到10的时候就不对了

本来应该显示00 00 00 0A的 但是实际只显示A

谁能告诉我应该怎么做?
搜索更多相关主题的帖子: 十六进制 
2009-09-20 13:52
红影
Rank: 1
等 级:新手上路
威 望:2
帖 子:659
专家分:0
注 册:2006-2-22
收藏
得分:0 
大家真是太强大了
那么我把我最后使用的方法也跟大家分享一下啦!

'''Function GeShiHua(St As String) As String
'''    Dim Str1 As String, Str2 As String, Str3 As String
'''
'''    If Len(St) > 8 Then
'''        GeShiHua = ""
'''        Exit Function
'''    End If
'''    Str1 = "00000000"
'''    Str2 = Left(Str1, 8 - Len(St)) & St
'''    For i = 1 To 8 Step 2
'''        Str3 = Str3 & Mid(Str2, i, 2) & " "
'''    Next
'''    GeShiHua = Trim(Str3)
'''End Function

生命中,不断有人离开和进入。于是,看见的,看不见了;记住的,遗忘了。
2009-09-30 14:04
红影
Rank: 1
等 级:新手上路
威 望:2
帖 子:659
专家分:0
注 册:2006-2-22
收藏
得分:0 
我也相当感谢大家!

生命中,不断有人离开和进入。于是,看见的,看不见了;记住的,遗忘了。
2010-04-20 15:59
快速回复:显示十六进制数的问题!
数据加载中...
 
   



关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.017257 second(s), 10 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved