DynaReport的注册算法如下:
由于是VB程序,故采用SmartCheck进行调试.
说明:采用OLLDBG进行调试,会产生异常提示,没有找到什么问题.但是仍然可以运行.没有时间就没有去做啊!!!有兴趣的可以去试试.
Len(String:"lbeglqb") returns LONG:7
Long (6) --> Integer (6)
Mid(VARIANT:String:"lbeglqb", long:1, VARIANT:Missing)
Asc(String:"lbeglqb") returns Integer:108
Integer (108) --> String ("108")
Val(String:"108") returns double:108 (displayed as single-precision floating point)
Double (108) --> Long (108)
Mid(VARIANT:String:"lbeglqb", long:2, VARIANT:Missing)
Asc(String:"beglqb") returns Integer:98
Integer (98) --> String ("98")
Val(String:"98") returns double:98 (displayed as single-precision floating point)
Double (206) --> Long (206)
Mid(VARIANT:String:"lbeglqb", long:3, VARIANT:Missing)
Asc(String:"eglqb") returns Integer:101
Integer (101) --> String ("101")
Val(String:"101") returns double:101 (displayed as single-precision floating point)
Double (307) --> Long (307)
Mid(VARIANT:String:"lbeglqb", long:4, VARIANT:Missing)
Asc(String:"glqb") returns Integer:103
Integer (103) --> String ("103")
Val(String:"103") returns double:103 (displayed as single-precision floating point)
Double (410) --> Long (410)
Mid(VARIANT:String:"lbeglqb", long:5, VARIANT:Missing)
Asc(String:"lqb") returns Integer:108
Integer (108) --> String ("108")
Val(String:"108") returns double:108 (displayed as single-precision floating point)
Double (518) --> Long (518)
Mid(VARIANT:String:"lbeglqb", long:6, VARIANT:Missing)
Asc(String:"qb") returns Integer:113
Integer (113) --> String ("113")
Val(String:"113") returns double:113 (displayed as single-precision floating point)
Double (631) --> Long (631)
Mid(VARIANT:String:"lbeglqb", long:7, VARIANT:Missing)
Asc(String:"b") returns Integer:98
Integer (98) --> String ("98")
[注意]看雪招聘,专注安全领域的专业人才平台!