VBA 将数组内十进制数字转换为二进制

可以使用 VBA 的 "DecimalToBinary" 函数将十进制数字转换为二进制。示例代码如下:

Sub DecimalToBinary()
    Dim decimals() As Long
    decimals = Array(10, 15, 20, 25)
    Dim binary As String
    For i = LBound(decimals) To UBound(decimals)
        binary = DecimalToBinary(decimals(i))
        MsgBox "十进制数字: " & decimals(i)