论坛 › 源码分享 › 【VB6】【全网首发】64位无符号整数的运算和显示

Mat 发表于 2023-3-26 02:22:02

:o

W741 发表于 2023-4-24 15:28:53

向大佬学习下

scdn2022 发表于 2023-5-7 00:47:56

学习

tlwh163 发表于 2023-5-7 18:51:15

Public Function UADD(ByVal AX As Long, ByVal BX As Long) As Long '无符号整数加法
    Dim w As Long: w = CBool((AX Xor BX) And &H80000000) '符号不同直接相加
    BX = BX And w Or Not w And (BX Xor &H80000000)'否则翻转BX符号位
    UADD = AX + BX Xor (Not w And &H80000000)'再相加并翻转结果符号位
End Function

angelindark55 发表于 2023-6-20 16:57:33

谢谢分享

逍遥爱迪生 发表于 2023-7-5 07:25:47

64位无符号整数的运算和显示

woeoio 发表于 2023-7-5 09:07:58

好东西啊，谢谢

liu496324 发表于 2023-7-6 08:39:19

大神啊，真牛，膜拜你

get43639 发表于 2023-8-14 02:49:00

新人學習，感謝版主的奉獻。
讓VB6可以支持64bit，真的要好好學習。:)

btrong 发表于 2023-9-10 08:21:37

看看有何不同

btrong 发表于 2023-9-10 08:23:51

系统消息 发表于 2021-3-8 10:01
阉割来说，VB6确实是没有Decimal类型，只是oleaut32.dll让Variant支持Decimal这个子类型而已。同样的我们 ...

还是我偶像能一针见血:lol

smartgkk 发表于 2023-9-26 17:57:58

谢谢分享！

cheweidian 发表于 2023-10-8 21:12:18

哇卡卡卡:lol

楼神- 发表于 2023-11-5 15:57:26

Currency申请出战

zhongez 发表于 2023-12-26 17:16:47

学习一下

wgwangjiang 发表于 2024-4-6 14:02:19

学习一下

sandruse 发表于 2024-7-16 15:50:43

感谢分享，查看学习

mugenknight 发表于 2025-1-20 08:53:29

來學習，謝謝分享

rooteason 发表于 2025-7-22 18:23:10

得学习一下！

cuituo 发表于 2025-8-5 17:07:07

64位？

查看完整版本: 【VB6】【全网首发】64位无符号整数的运算和显示