tiger777-CSDN博客

原创在VB中判断URL的正则表达式

在VB中判断URL的正则表达式Public Function IsUrl(ByVal strTmp As String) As Boolean作用：判断是否是网络地址参数：strTmp：传入字符串 On Error GoTo Z Dim objIntPattern IsUrl = False Set obj

2008-09-16 11:46:00 964

转载正则表达式的基础知识

一、定义一个正则表达式就是由普通字符（例如字符 a 到 z）以及特殊字符（称为元字符）组成的文字模式。该模式描述在查找文字主体时待匹配的一个或多个字符串。正则表达式作为一个模板，将某个字符模式与所搜索的字符串进行匹配。二、元字符及其含义字符

2008-09-12 15:26:00 463

原创 Address Family is not supported

今天在用winsock时又碰到这个问题，在网上找了很多，有个解释“被请求的地址在它的环境中是不合法的。通常地在bind()函数试图将一个本地机器不合法的地址绑扎到套接字时产生。它也可能在connect()、sendto()、WSAConnect()、WSAJoinLeaf()或WSASendTo()函数调用时因远程机器的远程地址或端口号非法（如0地址或0端口号）而产生。”很和自己的原因，在认真

2008-08-07 16:22:00 5754

原创 Declare CreateObject 引用

Declare语句只能调用标准DLL，而不能用于调用ActiveX DLL。VB无法生成标准DLL，只能生成ActiveX DLL。调用ActiveX DLL，一般通过CreateObject语句或在Project|Reference中引用

2008-08-07 11:22:00 622

转载 Wscript.Shell 对象详细介绍

WshShell 对象 ProgID Wscript.Shell 文件名 WSHom.Ocx CLSID F935DC22-1CF0-11d0-ADB9-00C04FD58A0B IID F935DC21-1CF0-11d0-ADB9-00C04FD58A0B 下面说明和 WshShell 对象有关的属性。属性

2008-07-28 15:42:00 5452

原创 access 数据查询中碰到的日期相关的问题

今天在进行access数据库查询时有个日期比较的问题，在没有加入“##”时当写小于某个日期时会得到所以的记录，而写大于时一条记录都没有。 SELECT * FROM table WHERE 日期 SELECT * FROM table WHERE 日期 BETWEEN #2007-1-1# and #2007-11-1# 检索table表中所有日期在2007年1月

2008-07-08 17:59:00 1530

武汉金海泉机电设备有限公司TEL: 13476089401 027-62892970 QQ:809663352 50707213 秦龙泉传真:027-50707305 网址:www.hqgk.net6ES5375-1LA21 6ES5375-0LC31 6ES5942-7UB116ES5465-7LA12 6ES5470-7LC12 6ES5306-7LA116ES5931-8MD11 6ES54

2008-04-10 09:45:00 729

转载 vb.net 程序设计规范

前言说明性文件规范过程注释的规范函数的注释规范命名规范设计规范：前言: 1.设计规范的重要性:理由N多, 不在多述 2. 本文适用性 :vb.net 开发 asp.net 开发注释代码的目标： 1．叙述清除]代码的作用（是做什么，而不是怎么做） 2．清楚说明代码所要表达的思想

2008-03-30 20:34:00 1142

转载在窗体间传递参数的几种常用办法

在实际开发应用中，常常需要在窗体间传递参数。常用的几种参数传递方法有如下几种： 1。使用openargs 在调用的窗体使用如下语句： docmd.openform "被调用的窗体", , , , , , "参数值" 在被调用的窗体使用me.openargs即可

2008-03-07 11:14:00 853

转载用VB来模拟一次菜单操作(其他应用程序)

思路：1.用FindWindow查目标应用程序的句柄2.用GetMenu,GetSubMenu查菜单句柄3.用GetMenuItemID查菜单ID4.用SendMessage 加WM_COMMAND消息，模拟一次菜单操作例子：模拟单击记事本程序 "文件"->"另存为"菜单Private Declare Function GetMenu Lib "user32.dll" (ByVal

2008-03-02 12:40:00 3385

转载 VB提示：文件未找到:'c:/windows/sytem32/ieframe.dll/1'的解决工具

这个是由于ie7.0的bug引起的,这个ieframe.dll是vb中WebBrowser 调用的控件,将以下内容复制到记事本，然后另存为1.reg，并双击导入即可。Windows Registry Editor Version 5.00 [HKEY_CLASSES_ROOTTypeLib{EAB22AC0-30C1-11CF-A7EB-0000C05BAE0B}] [H

2008-02-25 11:09:00 2192

转载 WinNT & Win2K下实现进程的完全隐藏

在WinNT下"真正隐藏进程"这一说法，可以讲是根本不可能实现，只要我们的程序是以进程内核的形式运行，都是不可能逃离CTRL+ALT+DEL的法眼。那么奇怪了，这岂不是与我们的标题《WinNT & Win2K下实现进程的完全隐藏》相矛盾吗？是的，实际上应该是：以非进程方式执行目标代码，而逃避进程查看器的检查，从而达到"进程隐藏"的目的。我们这里用的，是在宿主进程

2008-02-01 20:03:00 713

转载 vb 获取系统信息

vb 获取系统信息象这样的东西还是做成一个类模块吧！ Call Module : CSystem Option Explicit Private Type SYSTEM_INFO wProcessorArchitecture As Integer wRese

2008-01-26 23:12:00 1205

转载谈vb目录文件操作的三种方法

对于程序,无论大到一个操作系统,小到一个单一功能的应用软件来说,很多时候,我们都要将一些数据记录和存储到磁盘中.可见,对目录和文件的操作是多么的重要.下面我们就和大家一起学习一下vb中可以应用的三种方法:1、使用现成的控件2、使用visualbasic中提供的方法3、使用windows提供的应用程序编程接口（api）。下面我们具体看看这些方法。第一部分

2008-01-12 20:38:00 5630

转载 VB6.0动态加载ActiveX控件漫谈

熟悉VB的朋友对使用ActiveX控件一定不会陌生，众多控件极大地方便了编程，但唯一的缺陷是不能动态加载控件，必须在设计时通过引用，将控件放置在窗体上。 VB6.0已能够解决该问题，只是帮助中没有明确说明，并且没有描述到一些关键功能，由于以前的版本中可以动态创建进程外服务：如果对象是外部可创建的，可在 Set 语句中用 New 关键字、CreateObj

2008-01-01 14:27:00 965 1

转载 vb中的 winsock如何实现监听功能和连接功能

通信程序通常都是采用Client/Server形式。这就要求作为服务器的主机可以同时处理多个客户的请求。因此在编写服务器程序时要添加多个Winsock控件。在开始我们先加入两个Winsock控件。其中一个用来侦听网上请求信号，取名为Listener；另外一个为初始的连接口，取名叫Sock（0）。注意，后一个控件要设为动态数组的形式，以后当客户增多时，可在这个控件基础上动态增加。由于受资源限制，我们

2007-12-31 13:03:00 4709 1

转载 VS.NET 2005中实用的默认键(还有SQL的)

CTRL + SHIFT + B生成解决方案 CTRL + F7 生成编译 CTRL + O 打开文件 CTRL + SHIF

2007-12-31 13:00:00 447

转载 VB动态调用外部函数的方法

VB可以用Declare声明来调用标准DLL的外部函数，但是其局限性也很明显：利用Declare我们只能载入在设计时通过Lib和Alias字句指定的函数指针！而不能在运行时指定由我们自己动态载入的函数指针），不能用Declare语句来调用任意的函数指针。当我们想动态调用外部函数的时候，就必须考虑采用其他的辅助方法，来完成这个任务了。在文章《VB真是想不到系列

2007-12-30 21:34:00 1182 1

转载 SHGetSpecialFolderPath 一个很有用的API

VB取系统文件夹，有很多API，如GetSystemDirectoryA可以得到SYSTEM32系统文件夹，GetTempPathA得到临时文件夹，GetWindowsDirectoryA得到windows文件夹。这里再介绍一个有用的API － SHGetSpecialFolderPath ，这个api除了能得到以上列举的文件夹，还能得到更多的系统文件夹。具

2007-12-30 21:25:00 1288

转载在VB中任意设置ListView控件的ListItem的背景颜色

Private Sub SetListItemColor()Sub SetListItemColor() If mlvwPlayList.ListItems.Count = 0 Then Exit Sub If picBgBox Is Nothing Then Err.Raise vbObjectError + 1001, "Object PlayList", "Pro

2007-12-19 11:20:00 5044 1

转载 Recordset对象方法

Recordset对象方法 Open方法 recordset.Open Source,ActiveConnection,CursorType,LockType,Options Source Recordset对象可以通过Source属性来连接Command对象。Source参数可以是一个Command对象名称、一段SQL命令、一个指定的数据表名称或是一个Stored Procedur

2007-12-17 23:20:00 559

转载 VB编辑ListView的SubItem

加入一个Listview，两个Imagelist，一个文本框Option Explicit Copyright ?1997-1999 Brad Martinez, http://www.mvps.org Demonstrates how to in place do SubItem editing in the VB ListView.Private m_hwndLV As

2007-12-17 23:14:00 1305

转载错误号(即Err.Number)的详解

错误号(即Err.Number)的详解 Number:1 Description:应用程序定义的错误或对象定义的错误。 Number:2 Description:应用程序定义的错误或对象定义的错误。 Number:3 Description:此错误号已过时，不再使用。 Number:4 Description:应用程序定义的错误或对象定义的错误。

2007-12-17 23:14:00 13756

转载 keycode的ASCII值大全

keycode的ASCII值大全 vbKeyLButton 0x1 鼠标左键 vbKeyRButton 0x2 鼠标右键 vbKeyCancel 0x3 CANCEL 键 vbKeyMButton 0x4 鼠标中键 vbKeyBack 0x8 BACKSPACE 键 vbKeyTab 0x9 TAB 键 vbKeyClea

2007-12-17 23:06:00 833

tiger777的专栏