VBA如何进行数制转换,十六进制转换、八进制转换不再是难事
No.1
数制转换在计算机编程中应用很普遍,而且也是比较难的一个操作。
在学习二进制和八进制或十六进制之前,我们通常普遍学习的是十进制计算。
这也是一个让你迷惑的事情,很多时候可能有些人并不清楚,什么是进制数。
简单来讲,进制就是两个数值相加当大于某一数的时候上向进阶。这个数是几,就是几进制。
如:两个数相加大于2向上进阶,那么就是二进制,当然了,二进制数里只有0和1.
所以 1加0为1,1加1为10。这是10不是十进制的10,而是1和0,读1、0。1表示向上进阶的那个数。
就像十进制的9加9,为18,1为进阶的数,读为10。
十六进制在我国古代并不陌生,因为古时平常也用十六进制,如一斤为16两,就是以十六进制表示的。
为了便于计算,我们通常都接受十进制计算方法。
为了转换这些数值用不同的数制表示,Excel提供了一些函数。
下面看一下如何使用这些函数进制数值转换:
No.2
上图为Hex函数和Oct函数的语法和参数。
可以仔细看图,基本包含了所有的函数内容。
它将一个数值转换为对应的数制然后返回。
下面看一个简单的例子:
本例中任意选定一些单元区域,单击按钮执行转换功能,将单元格数值进行转换并填充到单元格。
代码:
Private Sub CommandButton1_Click()Dim r As RangeSet r = SelectionDim n As Integern = r.CountFor x = 1 To n With r.Item(x) .Value = Hex(x) .Interior.Color = vbCyan End WithNext xWith r .HorizontalAlignment = xlCenter .VerticalAlignment = xlCenterEnd WithEnd Sub
语法
Hex(number)
Oct(number)
使用方法很简单,重点要对进制数进行一个理解。
赞 (0)