23的·16进制
来源:互联网 发布:乌鲁木齐网络问政平台 编辑:程序博客网 时间:2024/05/17 22:22
Private Sub Command1_Click()
Me.Font.Size = 60
Print erjinzhi(23)
End Sub
Private Function erjinzhi(m As Byte) As String
Dim n As Byte
n = m
Const er As Byte = 16
Dim returns As String
Dim shang As Byte
Dim yushu(1 To 8) As Byte
Dim i As Byte
i = UBound(yushu)
shang = n \ er
yushu(i) = n Mod er
returns = yushu(i)
While shang <> 0
i = i - 1
n = shang
shang = n \ er
yushu(i) = n Mod er
returns = yushu(i) & returns
Wend
erjinzhi = returns
End Function
Me.Font.Size = 60
Print erjinzhi(23)
End Sub
Private Function erjinzhi(m As Byte) As String
Dim n As Byte
n = m
Const er As Byte = 16
Dim returns As String
Dim shang As Byte
Dim yushu(1 To 8) As Byte
Dim i As Byte
i = UBound(yushu)
shang = n \ er
yushu(i) = n Mod er
returns = yushu(i)
While shang <> 0
i = i - 1
n = shang
shang = n \ er
yushu(i) = n Mod er
returns = yushu(i) & returns
Wend
erjinzhi = returns
End Function
1 0
- 23的·16进制
- 23的.16进制
- 230的16进制
- 将2138的16进制
- 透明色的16进制
- 16进制 转化为COLORREF 格式的
- 16进制,字符串,表之间的转换
- 不透明度的16进制 数值
- 给定一个数的16进制
- 10进制,16进制的atoi
- 安卓透明度对应的16进制
- 关于2进制,8进制,16进制间的转换问题
- 16进制、10进制、BCD码之间的转换
- 16进制 10进制 BCD码之间的转换
- 16进制、10进制、BCD码之间的转换
- 10进制、2进制、16进制的互转
- 16进制 10进制 BCD码之间的转换
- 如何查看证书的16进制DER编码,及证书的各个域DER格式
- 专题三1012
- 文章标题
- 横竖屏切换导致国际化的问题
- VF01开票自动生成会计凭证
- struts自定义拦截器解读
- 23的·16进制
- iOS之UI学习-UILabel
- selenium+webdriver+python定位不到元素的原因及解决办法
- [试水框架] ionic
- jeecg报错:java.lang.Exception: No runnable methods
- input disable属性下面 更改文本框或者按钮的颜色(对IOS兼容处理)
- 从上往下打印二叉树
- 有关Hibernate和JPA很好的文章
- NYoj 1236 密室逃脱