VBA定义字节数据类型的应用方法

一个字节是8个二进制位，对于计算机语言来说，所有的编程代码都要翻译成二进制来进行处理，因为计算机只认识二进制。

所以在计算机中有一个很重要的数据类型Byte，即字节数据类型。

在VBA中这个类型的存在，实际上没有多大的意义，因为在处理数据的时候，很少人为地来对二进制进行操作，特别是Excel工作表，如果不是特殊情况，那就是闲得无聊才拿二进制来进行处理。

因此，Byte数据类型实在没有多么大的用处，但是，依然要对此有一个了解。

本节介绍一下如何定义和使用Byte类型的数据。

如下图所示，根据Byte类型对照进行一个ASC码输出效果。

定义Byte

Dim byt As Byte

如上一句就是定义Byte数据类型的方法，用一个Dim语句实现。

其值的范围是0-255之间的一个无符号整数。

所以，适用于0-255整数的一个范围值，如果超出就会报错。

代码

Private Sub CommandButton1_Click()
Dim i As Integer, j As Integer
Dim byt As Byte
byt = 0
i = 1
j = 1
Do
    If byt Mod 30 = 0 Then
        i = i + 2
        j = 1
    End If
        Cells(2, i).Offset(j, 0).Value = byt
        Cells(2, i).Offset(j, 1).Value = VBA.Chr(byt)
        j = j + 1
        byt = byt + 1
Loop Until byt = 255
    Cells(2, i).Offset(j, 0).Value = byt
    Cells(2, i).Offset(j, 1).Value = VBA.Chr(byt)
End Sub

如果要处理0-255之间的整数值，此类型还有点意义，除此别无它用，所以通常也很少使用这个类型。

如果有兴趣，发现什么地方十分有用，欢迎留言。

关注、收藏

---END---

Tags：subcommand