要是能创建半透明的刷子就好了,就不必像这样以图层的方式实现透明阴影效果. 代码: 'code by lichmama@cnblogs.com '绘制阴影图层 Private Declare Function CreateCompatibleBitmap Lib "gdi32" (ByVal hdc As Long, ByVal nWidth As Long, _ ByVal nHeight As Long) As Long Private Declare Function Create…

[原创文章,转发请保留版权信息] 作者:mezstd 文章地址:http://www.cnblogs.com/imez/p/3299728.html 效果图: 请原谅笔者无耻地称之为史无前例,至少在笔者发布该文章之前没有看到关于VB6子类化标准按钮并实现透明的文章. 首先,要使按钮能被支持透明,必须调用SetWindowLong给按钮添加WS_EX_TRANSPARENT窗口风格,当然,要绘制透明按钮,必须使用支持alpha通道的Gdi+ 来实现.详细的请看代码,由于笔者平常没有添加注释的习惯,…

VB6与VB.NET对照表 VB6.0 VB.NET AddItem Object名.AddItem Object名.Items.Add ListBox1.Items.Add ComboBox1.Items.Add Abs 函数 System.Math.Abs 方法 API 函数关系 Microsoft Win32和Microsoft .NET Framework API的对应 App.Path 等 1.   System.Reflection.Assembly.GetExecutingAsse…

'*************************************************************************'**模 块 名:自写函数VB6 STUFF函数 和 VB.net 2010 STUFF函数 详解'**说    明:蓝凤凰设计商城 浴火凤凰-郭卫 | 蓝凤凰-魔灵 | 郭卫-icecept'**创 建 人:浴火凤凰-郭卫'**日    期:2015年10月10日  23:13:55'**修 改 人:浴火凤凰-郭卫'**日    期:'**描   …

VB6.0中,日期.时间控件不允许为空时,采用文本框与日期.时间控件相互替换赋值,或许是一个不错的选择. 实现效果如下图: 文本框txtStopTime1 时间框DTStopTime1(DTPicker控件) 右键-属性-选择格式3 - dtpCustom  HH:mm:ss若没有DTPicker控件,在部件中添加 工具-部件-控件-“Microsoft Windows Common Controls-2.6.0”-应用-确定 代码如下: Private Sub Form_Load()     …

VB6.0和VB.Net的对照表 VB6.0 VB.NET AddItem Object名.AddItem Object名.Items.Add ListBox1.Items.Add ComboBox1.Items.Add Abs 函数 System.Math.Abs 方法 API 函数关系 MicrosoftWin32和Microsoft .NET Framework API的对应 App.Path 等 1. System.Reflection.Assembly.GetExecutingAsse…

作者:马健邮箱:stronghorse_mj@hotmail.com主页:http://www.comicer.com/stronghorse发布:2016.12.16 在我写的<用MODI OCR 21种语言>.<MODI中的OCR模块>发布后,貌似使用MODI做OCR的人也多了起来.前几天应某人的要求,我在VB6下试着调用了一下MODI,却发现出现了一点兼容性问题. 因为Office 2007所带的MODI(以下简称"MODI 2007",微软正式的版本号是…

工程保存在安装目录("C:\Program Files (x86)\Microsoft Visual Studio\VB98\errhandler1.vbp")里. 文件管理器找不到这个文件,用vb菜单打开的文件列表对话框里能找到这个文件,文件上有一个锁. 好奇怪,查看文件属性所有人.提示无法显示当前所有人. 文件可以被删除. 本来这个目录不用管理员权限是禁止写入的.似乎是写入了,不过只在vb6的打开对话框里能找到.奇怪…

使用VB6创建和访问Dom树 关键字:VB,DOM,HTML,爬虫,IHTMLDocument 我们知道,在VB中一般大家会用WebBrowser来获取和操作dom对象. 但是,有这样一种情形,却让我们纠结不已: 我们需要做爬虫,然后爬虫不需要太高的效率,但是我们被复杂的正则表达式给弄的头晕眼花. 不知道何去何从. 今天,下定决心研究下html的解析,终于掌握了对IHTMLDocument等接口对象的使用. 源代码放在:http://www.extencent.com 具体的文章将会放在博客园以…

往事不堪回首,折腾了个把月的老系统,心中郁结,不吐不快.系统架构是ASP +VBS +VB6.0 + SQL Server2000, 第一个版本开发完成大概是在2000年.基本是处于交接无力,看代码就如同走迷宫的节奏.不过我觉得第一批开发人员应该可以自傲了,它们做的系统这么多年过去了居然还活着. 为了对得起这几天死掉的脑细胞,就权且在这里留下它们阵亡的痕迹. 变量的声明 VB6.0: Dim x as integer VBS: Dim x 同样的功能,由于代码太过Dirty,有部分模块写在了AS…