冰痕文章收藏
文章平均质量分 78
IceMe
这个作者很懒,什么都没留下…
展开
-
VB自定义异常处理
模块:Option ExplicitPublic Const EXCEPTION_MAXIMUM_PARAMETERS = 15 ----------------------------- Exception-Handling Structures -----------------------------Type EXCEPTION_POINTERS pExceptionR转载 2004-10-23 13:56:00 · 1764 阅读 · 0 评论 -
Intel奔腾系列CPU指令全集(包含P4)
机器码 指令代码 说明 37 AAA ASCII adjust AL after additionD5 0A AAD ASCII adjust AX before divisionD5 ib (No mnemonic)转载 2004-10-24 07:51:00 · 1980 阅读 · 0 评论 -
MD5值相同的两个不同的文件
Verifying the results of: Collisions for Hash Functions MD4, MD5, HAVAL-128 and RIPEMD by Xiaoyun Wang, Dengguo Feng, Xuejia Lai, Hongbo Yu (available from http://eprint.iacr.org/2004/199/)Earlier转载 2004-10-24 07:46:00 · 3102 阅读 · 0 评论 -
本例把“记事本”程序放进自己的窗体里
本例把“记事本”程序放进自己的窗体里Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As Long, ByVal lpWindowName As Long) As LongPrivate Declare Function GetParent Lib "user32" (转载 2004-10-26 17:29:00 · 1284 阅读 · 0 评论 -
Visual Basic的类对于面向对象的支持
VB最为人垢病的是它的面向对象特性。实际上VB是一种基于对象的开发工具。在VB中 建立的类是支持继承的。下面是范例: 首先建立一个新工程,然后添加一个新的类模块(Class Module),类名称设定为BaseClass。 然后在BaseClass中加入以下代码: Public Sub BaseSub() 虚拟特性,BaseSub在子类中实现 End Sub 然后添加两个类模块,类名称分别设定为转载 2004-10-30 14:49:00 · 1487 阅读 · 0 评论 -
vb的GUID生成算法
源代码推荐:vb的GUID生成算法RETURNS: GUID if successful; blank string otherwise.Unlike the GUIDS in the registry, this function returns GUIDwithout "-" characters. See comments for how to modify if you转载 2004-10-30 14:58:00 · 1528 阅读 · 0 评论 -
界面开发之Flat3DButton
自己是否想过重画控件,现在用强大的VB来实现吧。下例就是简单的利用VB中的CommandButton改变成Flat3DButton风格。其实就是利用VB的SubClass去处理父窗口的WM_DRAWITEM消息。1. 建立一个标准EXE工程,加入Command1和Command2,将Command1的Style属性设为Graphical。2. 加入模块,取名SubClass_Flat3转载 2004-10-30 14:59:00 · 964 阅读 · 0 评论