关于vba的一些函数！

东方青石

1 、字符处理函数
MultiByteToWideChar, rtcR8ValFromBstr, WideCharToMultiByte, __vbaStrCmp, __vbaStrComp, __vbaStrCopy, __vbaStrMove, __vbaVarTstNe .
注意:这些函数前的下划线 __ 是由两根短线 _ 组成的，不要弄错。 如果你是破解VB6程序，你应在断点前增加 msvbvm60! 。 像这样：  bpx msvbvm60!__vbastrcomp

几个常用函数简介：

1、 __vbavartstne
进去后在0F04E351你将看到：
push dword ptr [ebp+0c] ;作者的 serial 的地址
push dword ptr [ebp+10] ;你输入的serial地址
在OD命令窗口中下命令：d ebp+0c
你将在数据窗口看到 4字节地址倒序排列，你再次D 地址（己纠正顺序的）， 就可看到序列号了。
2、 __vbaR8Str
转换 string 到 Integer/Real
DL 是显示 Long/real 型
3、 __vbastrcmp
例:
:005BDC32 CALL [MSVBVM50!__VbaFreeVar]
:005BDC38 MOV ESI,[EBP+08]
:005BDC3B PUSH ESI
:005BDC3E CALL [ECX+00000790] ： 值返回到 EDX.
:005BDC44 MOV EDX,[ESI+4C]       ： 输入的号码，但倒转
:005BDC47 MOV EAX,[005E0078]    ： 正确号码
:005BDC4C PUSH EDX
:005BDC4D PUSH EAX                    ：参数送 __vbaStrCmp.
:005BDC4E CALL [MSVBVM50!__vbaStrCmp]  ： 调用函数
:005BDC54 TEST EAX,EAX                           ：测试比较结果
:005BDC56 JNZ 005BDC64                            ： 不相等跳走


2 、警告窗口函数
rtcBeep, rtcGetPresentDate (time API), rtcMsgBox

有空我再把VB的比较方法说一下！

brightsm

__vbavartstne 是做什么用的？
还有——free...是不是释放空间用的！
除了strcmp好象还有几个函数是用来做比较的，麻烦也给贴出来！

还有字符转换函数！

brightsm

SE handler installation     应该是程序的正式进入的地方吧！
MSVBVM60.__vbaVarMove  这是什么作用！
MSVBVM60.__vbaObjSet    ？
MSVBVM60.__vbaHresultCheckObj   ？
MSVBVM60.__vbaFreeObj
MSVBVM60.__vbaObjSet
MSVBVM60.__vbaLenVar   检查长度的函数吧   这里面的var是不是无符号的意思，有没有检查string长度的函数？
MSVBVM60.__vbaVarTstEq  无符号函数的比较？
MSVBVM60.__vbaVarDup  看字面翻译应该是无符号字符的复制，不知道是怎么用的，输入 参数和输出 参数是什么？
MSVBVM60.rtcMidCharVar   是不是除法呀？
MSVBVM60.__vbaStrVarVal  这个是做什么的？
MSVBVM60.rtcAnsiValueBstr  这个能是ASC值转换成字符的函数！
MSVBVM60.__vbaVarMul  这个不知道呀！
MSVBVM60.__vbaVarAdd  这个应该是加法吧！
MSVBVM60.__vbaFreeStr 释放str空间？
MSVBVM60.__vbaFreeVarList  这个是做什么的？
MSVBVM60.rtcR8ValFromBstr  这个是什么的？
MSVBVM60.__vbaVarCmpEq 这个呢？
MSVBVM60.__vbaVarAnd这个应该是与运算吧！
MSVBVM60.__vbaBoolVarNull 这个好象与布尔运算有关？
MSVBVM60.rtcMsgBox  这个我知道是对话框啦，用的多呀！
MSVBVM60.__vbaNew2   这个不知道呀！
MSVBVM60.__vbaObjSetAddref   这个不知道！
MSVBVM60.__vbaStrToAnsi  字符转成ASC值！

东方青石

多谢，看来我的尽快总结出来，不过我的专业现在很忙，你先等等，大约7月6号我们放假！到时候就有空了

brightsm

最好还有vc的！
还有pvb
dephi

最好能带上参数什么！做一个手册，大家都做个总结对以后分析程序能起到事事半功倍的效果。

东方青石

呵呵，不好意思，我不懂pvb和dephi，只能做VB的！至于VC其实不用，可以在OD（需要设置一下）里面显示的！

ly83

今天看到这个。请问楼主。你做出来了没有？我觉得这个东西对我这样的菜鸟很需要。呵呵。

东方青石

呵呵，不好意识拉，我暑假就没有时间！
还以为9月中旬又时间呢，没有想到大三这么忙阿！不是就要到国庆节了吗？那几天我弄弄！
很不好意识！


真是国庆节好啊，有些时间了，在论坛跑了一圈，看见了同样的帖子
https://www.chinapyg.com/viewthread.php?tid=2225&fpage=1
去了就知道了，里面有整理好的一些东西，感谢飘云老大拉，我国庆可以好好的玩了！/:D

[ Last edited by 东方青石 on 2005-10-1 at 04:26 PM ]