用ActiveX控件封装MaskEdit控件-解决不能绑定的问题

2016年07月27日 98 阅读

用ActiveX控件封装MaskEdit控件-解决不能绑定的问题2008-03-08參考決定或改作通用的activeX控件.（1）新建一ActiveX Control工程.放置一maskedit控件於上.其設置屬性參考如下:usercontrol之name:DataDate.usercontrol之DataBindingBehavior設定1-VvbSimpleBoundMaskedtBox之name:mskDate.（2）.新增一數據屬性用於綁定.操作如...

消息传递在VB中的应用

2016年07月27日 98 阅读

消息传递在VB中的应用2008-03-08苏耀勇有些窗体在设计时会定义一些特殊的功能消息，而当我们传递这些消息给这类窗体时，这类窗口就会执行某段程序，并返回执行的结果。为了让程序可以送出消息，Windows提供了SendMessage API函数。Declare Function SendMessage Lib "user32" Alias "SendMessageA" （ByVal hwnd As Long, By...

vb文件系统控件方案

2016年07月27日 104 阅读

vb文件系统控件方案2008-03-08文件系统控件方案：文件搜索器应用程序因为用户常常希望快速查找应用程序的可用文件或文件组，所以，许多应用程序都提供查询文件系统的功能。Winseek.vbp 示例应用程序协助用户浏览驱动器和目录并显示所有类型的文件。下表总结了 WinSeek 应用程序在Seek.frm 窗体中使用的控件。注意 文件系统控件没有 caption 属性，虽然可为它们加标签并指定访问键。关于这种使用标签的方法的详细信息，请参阅本章后面的&l...

设定Mouse在某个固定范围

2016年07月27日 98 阅读

设定Mouse在某个固定范围2008-03-08Type RECT Left As Long Top As Long Right As Long Bottom As LongEnd TypeDeclare Function ClipCursor Lib "user32" （lpRect As Any） As LongDeclare Function ShowCursor Lib "user32"...

VB5.0与Windows API 间的呼叫技巧

2016年07月27日 98 阅读

VB5.0与Windows API 间的呼叫技巧2008-03-08一般会使用WINDOW API的情况，实在是因为VB本身不提供某些功能，但是，程式所需又不得不然，例如：读取Registry内的资料，VB只提供SaveSetting、Getsetting 等系列的指令，但是它只能读取特定地区的值，要读、删、更动其他区域的值时，就无法使用。再如：仔细看一看Combo Box的Events，其中没有MouseMove，但这是我们经常用上的一个Event，那该...

vb实现隐藏Mouse

2016年07月27日 100 阅读

vb实现隐藏Mouse2008-03-08Type POINTAPI x As Long y As LongEnd TypeDeclare Function GetCursorPos Lib "user32" Alias "GetCursorPos" _ （lpPoint As POINTAPI） As Long"隐藏MousePublic Sub toHideCursor（）ShowCursor 0E...

Check开机方式及Mouse Buttons个数

2016年07月27日 96 阅读

Check开机方式及Mouse Buttons个数2008-03-08Private Declare Function GetSystemMetrics Lib "user32" （ByVal nIndex As Long） As LongConst SM_CMOUSEBUTTONS = 43Const SM_CLEANBOOT = 67Private Sub Form_Load（）Dim mode As LongDim NumbBut...

建立Floating Window（Top Most的window）

2016年07月27日 103 阅读

建立Floating Window（Top Most的window）2008-03-08事实上是使用SetWindowPos（）来改变z-order，所谓z-order是屏幕一般是以x轴y轴来表示位置，而以z轴表示前後位置，这便是z-orderbWndInsertAfter的设定值HWND_BOTTOM Places the window at the bottom of the Z order. If the hwndparameter identi...

在VB程序中格式化SQL字符串

2016年07月27日 97 阅读

在VB程序中格式化SQL字符串2008-03-21在写SQL语句时,需要对不同类型的数据分别加上#号,""号等来表示,用以下函数,就可以实现操作的简化.不管是什么类型,只需用这个Q函数转化一下,不需动手加格式化符号,就OK了.实在是方便.本人一直在用它,实在是方便.Function Q（ByVal SqlVariable As Variant） As String"------------------------------------...

ADO揭密1

2016年07月27日 94 阅读

ADO揭密12008-03-21Ken Jin概述 ADO 对象可以在所有支持COM和OLE的平台上使用，如：VB，VC++，VBScrip，Java 等等。包括以下的七个对象：ConnectionCommandParameterRecordsetFieldPropertyError以及四个集合：FieldsPropertiesParametersErrorsADO 的核心是Connection，Recordset和Command 对象。首先用Connec...

在VB中更改SQL数据库结构

2016年07月27日 96 阅读

在VB中更改SQL数据库结构2008-03-21笔者在开发"凉山州林业局"天然林资源保护综合管理系统中，需要为程序建立Sql Server数据库的运行环境。为了方便用户，笔者开发了这个数据库配置工具。完成在SQL Server数据库中建立设备，建立数据库，建立表格，分配权限的功能，"凉山州林业局"系统中的所有数据库配置操作都可以通过这个小工具完成。方便了数据库应用程序所需Sql Server环境的建立，根本不用启动S...

拖动无系统标题栏的窗口

2016年07月27日 106 阅读

拖动无系统标题栏的窗口2008-04-17在VB中可以通过设置Form的属性，制作无系统标题栏的窗口。可是，由于失去了系统标题栏，如何使用鼠标拖动窗口便成了一个棘手的问题。其实，借助API函数ReleaseCapture和SendMessage，这个问题便可迎刃而解了。首先，在module文件中加入下列声明语句： Declare Sub ReleaseCapture Lib"User"（） Declare Function Se...

Memory DC与hBitmap

2016年07月27日 104 阅读

Memory DC与hBitmap2008-04-17DC 即Device Context，是GDI内部的一个资料结构，一个DC会和某个特定的显示设备（如打印机、屏幕等）产生关联。我们如果能取得该DC的handle 那我们便可以在这显示设备上写字、画图。在Form 或Picturebox中都有一个hdc的属性，指的便是这东西，但是，怎麽又会有一个Memory DC呢？这是一个存在记忆体内的 dc ，它除了不像form picturebox能将图形、文字显示...

Process Thread Window之关系

2016年07月27日 119 阅读

Process Thread Window之关系2008-04-17许多人包括我自己，对於window与process或Thread间的对应，常感困扰，我就目前所知者，大概的介绍一下：一个Process有自己4GB的位址空间，这个观念比较容易接受，但是它却不是执行程式的单位，真正执行程式者是Thread，每个Process被Create时，便会有一个主thread 来执行它，我们又可以Create其他的Thread来执行程式，假设现在就有两个thread於...

用VB编写托盘程序

2016年07月27日 106 阅读

用VB编写托盘程序2008-04-17 cww 杨炳虎在WINDOWS里，右下角有许多应用程序的图标。而程序本身的窗口是隐藏的，若你需要调用应用程序的窗口，则双击该图标即可。这种程序称为托盘程序。这是WINDOWS98操作系统的一大特色。使用户能够更加快捷的显示和隐藏应用程序，可以使任务栏不致于太乱。托盘程序在Visual Basic里是怎么实现的呢？编写托盘程序主要解决两个问题：（1）创建、修改、删除托盘；（2）如何对托 盘接收到的消息进行处理。这就要用...

你也可以YAI-VB5中Winsock控件的使用

2016年07月27日 99 阅读

你也可以YAI-VB5中Winsock控件的使用2008-04-17前一段时间，一个名叫YAI的‘病毒’在我国闹的沸沸扬扬，许多不明真相的人对他感到神秘莫测，可是究其实质无非也就是一个远程控制软件罢了，只不过他的服务器端程序隐藏的十分好而已。其实在VB5中有一个基于TCPIP协议的Winsock控件，利用他改改属性，写几段代码，我们同样可以来一回YAI.由于篇幅所限，在这里我们只来看看对远程计算机的重启，关闭功能室如何实现的。打开V...

VB与VC混合编程中处理消息的方法

2016年07月27日 113 阅读

VB与VC混合编程中处理消息的方法2008-04-17吴俊峰现在越来越多的人采用VB与VC的混合编程：用VB快速开发出漂亮的界面以及外围处理程序，再用VC编写底层的各种操作，例如内存的操作、IO端口的操作等，VC中还可以嵌入汇编语言进行更底层的操作。一般的做法是将VC程序编译成DLL，在VB中用Declare语句声明DLL中的函数，例如：Declare Function SendCommand Lib ″c:program filesdevst...

在VB中动态添加可响应消息的控件

2016年07月27日 94 阅读

在VB中动态添加可响应消息的控件2008-04-17在VB编程中，经常要根据不同的情况在运行时向窗口中添加或者删除控件，而各个控件还要响应各种事件。在一般的情况下是首先在设计时将控件加入到窗口中，在它们的各个事件中写入代码，然后将它们的Visible属性设置为False。在运行时再使控件显示出来，但是这样既不方便同时也因为在设计时在窗口中加入太多的控件而使得程序的运行速度变慢。下面我向大家介绍一种通过编程在运行时动态添加和删除控件的方法首先建立一个工程文件...

利用WSH实现关闭计算机功能

2016年07月27日 98 阅读

利用WSH实现关闭计算机功能2008-04-17利用WSH实现关闭计算机功能，其实很简单，采用下面的语句即可。把下面的语句保存为test.vbs，然后运行，就可以看到效果。Set objshell = wscript.CreateObject（"Shell.Application"）objshell.ShutdownWindows...

vb中避免按回车键产生的“嘀”声

2016年07月27日 104 阅读

vb中避免按回车键产生的“嘀”声2008-04-17当你在文本框（Text Box）中输入完信息然后按 [Enter] 键，你就会听到计算机喇叭发出难听的“嘀”声。你可以通过以下方法避免此声：假设文本框为 Text1，在 KeyPress 事件中输入以下代码：Private Sub Text1_KeyPress（KeyAscii As Integer）"Vb man 2001"URL: http://goodvbman.yeah.n...