随笔分类 -  VB/VBA

依然强大!
摘要:十几年前最开始用VB时,是从数据绑定开始的,后来,自己慢慢开始“不屑”这种简单的、傻瓜化的操作,逐步向sql语句过渡:几乎所有的数据库操作都用sql完成,还颇以此自得。再后来,转向asp.net,页面中大量的数据库访问,逼迫自己慢慢形成自己的页面交换模块,来简化代码量。   今天刚好又写了一段数据库程序,发现,用adodc控件,可以快速的实现数据和控件之间的交互而几乎没有代... 阅读全文
posted @ 2010-11-29 23:44 jetz 阅读(355) 评论(0) 推荐(0) 编辑
摘要:使用了AquaButton按钮,支持很丰富的效果,不过就是不支持png,所以找来的 png图片,阴影部分总是不能表现得很好。 尝试了一下,找到一种较好的方式: 1、在ps中设置前景色和背景色分别为灰色和淡蓝色 即:灰色E8E7EA 淡蓝色6AA6E2 2、把png图片转换为64*64 3、分别用前景和背景作为底色,保存出两张bmp图片。注意必须是bmp,jpg优化后,颜色就有问题 4、把Pictu... 阅读全文
posted @ 2010-07-21 13:18 jetz 阅读(1252) 评论(1) 推荐(0) 编辑
摘要:找了一些资料,比较靠谱的说把webbrowser的silent设置为true,但试了不行。最后找到一篇文章,说这wb_downloadbegin和wb_downloadcomplete中写wb.silent=true就行了。 阅读全文
posted @ 2009-11-03 20:25 jetz 阅读(342) 评论(0) 推荐(0) 编辑
摘要:Execute 方法(Find 对象) 运行指定的查找操作。如果查找成功,则返回 True。 语法 expression.Execute(FindText, MatchCase, MatchWholeWord, MatchWildcards, MatchSoundsLike, MatchAllWordForms, Forward, Wrap, Format,... 阅读全文
posted @ 2009-04-12 21:03 jetz 阅读(3748) 评论(0) 推荐(0) 编辑
摘要:因为太简陋了,所以问题多多,但最烦人的,就是下载到一半就莫名其妙的挺了,摸索了半天,有点心得: 1.用循环和doevents来保持进度 2.用独立的timer来判断是否超时 3.超时的时间,用状态改变时的时间 阅读全文
posted @ 2008-09-07 01:54 jetz 阅读(405) 评论(0) 推荐(0) 编辑
摘要:N年前本来会的,忘了,刚刚找回来。 其实vb只能支持到256色,真彩图标需要更麻烦的设置。256色基本也够了,但是,找到的很多图标,在vb中却异常难看,颜色和分辨率都极差,不知什么原因,安装sp6后仍然一样。 今天才找到原因:图标文件中可以包含多种格式,必须要保证一个最优先的,如果这个不对就不行。 说不清,看图,用“天堂图标工作室”打开图标,可以看到 ... 阅读全文
posted @ 2008-07-24 18:26 jetz 阅读(1810) 评论(2) 推荐(0) 编辑
摘要:'大文件传输不太适合 '添加intl控件 Private Sub Command1_Click() Inet1.Protocol = icFTP Inet1.RemoteHost = "60.***.***.***" '服务器地址 Inet1.RemotePort = 21 'FTP端口 Inet1.UserName = "username" '用户名 Inet1.Password = "u... 阅读全文
posted @ 2008-06-21 00:12 jetz 阅读(974) 评论(0) 推荐(0) 编辑
摘要:&H00000000&的格式,顺序不是RGB,而是BGR。 可以用RGB(r,g,b)函数。 阅读全文
posted @ 2008-06-08 22:38 jetz 阅读(415) 评论(0) 推荐(0) 编辑
摘要:希望设计一个圆角的窗体,但老是在圆角部分遇到问题,就是屏蔽色在圆滑的部分总是无法屏蔽干净,就像这个 经过一段时间的摸索,发现了问题的关键:图像也是很精确的东西,容不得半点的模糊。在ps中,对圆角往往会有一个平滑的处理,这个平滑往往会用一些相近的颜色在弯角处,产生平滑的效果。但它也是边缘无法干净的原因。找到原因就比较好处理了,我的心得是,这2个地方一定要注意,去掉“... 阅读全文
posted @ 2008-06-08 21:45 jetz 阅读(531) 评论(1) 推荐(0) 编辑
摘要:Windows2000已经出了n年多了,就先介绍一下Windows2000特有的API吧!! AnimateWindow是一个窗口打开和关闭时产生动画效果的新函数,因为是一个新的函数, 所以在 API Viewer中是找不到的,必需自己定义: Public Declare Function SetLayeredWindowAttributes Lib "user32" (B... 阅读全文
posted @ 2008-06-08 16:03 jetz 阅读(2536) 评论(0) 推荐(0) 编辑
摘要:不可否认,vb是rad的绝佳工具,但是它在应付较大规模的项目时,如果设计不当,往往会陷入极端丑陋的代码的境地。我在大概两三前改用C#,现在暂时拾起它,尽管vb在近年没有任何变化,但我看它时,却感觉不太一样了。我感觉,这得归功与C#这个纯面向对象的语言,使人潜移默化地有了面向对象的思想。 同样的功能,我感觉现在的实现比原来要好看很多,甚至有时觉得挺漂亮的。 ... 阅读全文
posted @ 2008-05-21 01:34 jetz 阅读(516) 评论(0) 推荐(0) 编辑
摘要:webbrowser: 示例: For i = 0 To WebBrowser1.Document.All.length - 1 If WebBrowser1.Document.All(i).tagName = "HTML" Then strContent = strContent & WebBrowser1.Document.All(i).innerHTML ... 阅读全文
posted @ 2008-05-20 21:29 jetz 阅读(1550) 评论(0) 推荐(0) 编辑
摘要:INET控件的几点使用 Inet控件支持HTTP与FTP两种通讯协议。利用这个控件可以完成许多功能。 我们通过例子来看看。 环境VB6+WINXP 打开VB6,新建工程 添加部件Microsoft Internet Transfer Controls. 在form中添加2个按钮,2个文本框和Inet控件 代码如下: Option Explicit '... 阅读全文
posted @ 2008-05-20 21:28 jetz 阅读(1261) 评论(0) 推荐(0) 编辑
摘要:MSXML中提供了Microsoft.XMLHTTP对象,能够完成从数据包到Request对象的转换以及发送任务。 创建XMLHTTP对象的语句如下: Set objXML = createObject(M... 阅读全文
posted @ 2008-05-20 21:26 jetz 阅读(1480) 评论(0) 推荐(0) 编辑
摘要:因为编码涉及的内容既多且烦,特别是vb的编码,又有诸多限制,所以在解决URL中文编码的时候走了很久的弯路。 问题: 我的VB客户端需要向web服务器发送数据,在服务器端更新到数据库。但发送的数据中,肯定出现中文。但在服务器端,用request得到的是乱码。 尝试1: 知道vb中编码都是unicode,试图修改页面中的代码页,如: ... 阅读全文
posted @ 2008-05-20 13:02 jetz 阅读(4641) 评论(0) 推荐(0) 编辑
摘要:VB6的IDE不支持滚轮,找了一个官方的外接程序,要用regsvr32注册一下,略微有点麻烦,我用setupfactory做了一个简单的安装包,安装一下就可以了。然后在vb的外接程序管理器里把鼠标支持打开即可。 VB6IDE滚轮支持 阅读全文
posted @ 2008-05-18 18:06 jetz 阅读(480) 评论(0) 推荐(1) 编辑
摘要:我需要对Mapx控件支持鼠标滚轮,找了一个可以使用的代码,来自 http://blog.csdn.net/areful/archive/2007/10/19/1832010.aspx 需要注意的是,在FormLoad中增加Hook Map1.hWnd,在Form_Unload中增加UnHook Map1.hWnd 另外,在鼠标移动经过... 阅读全文
posted @ 2008-05-18 16:55 jetz 阅读(1320) 评论(0) 推荐(0) 编辑
摘要:MapX的标注,修改标注功能尽管都有,但都十分的难用,操作起来,用户体验非常糟糕。不光编程难以控制,操作起来也不方便:工具选择要不断的切换,移动图元十分不敏感。所以希望实现一种比较友好的交互。 设想是这样的:默认状态,都是Pan工具,可以自由的移动地图,缩放功能放到缩略图这里就不考虑了。有一个标注开关,打开后,当在空白区域时,为标注功能。当在已存在图元上时,为移动功... 阅读全文
posted @ 2008-05-18 14:36 jetz 阅读(808) 评论(0) 推荐(0) 编辑
摘要:正解:这是VB6语言模块的问题,编译成执行文件之后,运行执行文件就正常了.只是在VB6中运行时才显示乱码. 阅读全文
posted @ 2008-05-18 12:42 jetz 阅读(571) 评论(0) 推荐(0) 编辑
摘要:希望在程序中用到IE的导航图标,结果为了找到这套导航图标,费了大劲了。先是找图标,结果无论如何都找不到,只能找到xp之前ie5的导航图标。然后又是找到一些dll,用“桌面-->属性->自定义桌面->更改图标”查看,shell32.dll,iexplorer.exe,explorer.exe,maxthon.exe,都找不到这组图标。最后才知道,图标是以bi... 阅读全文
posted @ 2008-05-18 09:00 jetz 阅读(1312) 评论(2) 推荐(0) 编辑