VB实现含子目录的搜寻档案

2016年07月27日 98 阅读

VB实现含子目录的搜寻档案2010-01-15一般来说，搜寻目录及子目录底下符合条件之所有档案功能的程式撰写，一向颇令人头疼，而最後的解决方式多用 Recursive（程式递回呼叫） 来解决，像 VB5.0所附的 WinSeek.vbp 范例，就是 FileListBox 和 Recursive 程序的兼用，来解决这个问题。本范例则用另一种思考模式切入，在不使用任何 OCX 及 Recursive 程序下利用两个非固定阵列变数及双层 Do...Loop 回...

vb实现老板键功能

2016年07月27日 104 阅读

vb实现老板键功能2010-01-15 51cto 阿汐很久没用vb了，做了个小东西，用着还挺顺手的 :）frmmain.frm"---------------------------------------------------------------------------------------" Author :阿汐" Purpose :vb实现老板键的简单功能"-------------------------------------...

VB中利用ccrpHotKey控件设置热键

2016年07月27日 109 阅读

VB中利用ccrpHotKey控件设置热键2010-01-15 天极 简介：ccrphotkey是一个第三方控件，该控件可以轻松实现热键功能使用示例您一定对“Ctrl＋Alt＋Z”很熟悉吧？没错，它是QQ里打开消息对话框的默认热键，通过这组热键，我们可以很迅速的打开消息对话框查看，大大加快我们操作的速度。同时我们也知道，在QQ的系统设置中可以对热键进行设置（如图1），当我们按下任何热键组合时，文本框都会实时显示热键组合，让用户明白当...

VB中利用第三方控件实现软件在线升级

2016年07月27日 98 阅读

VB中利用第三方控件实现软件在线升级2010-01-15 天极 第七乐章大家对金山毒霸、瑞星等杀毒软件的在线升级一定不陌生吧？它们可以利用在线升级程序进行在线升级，无需用户访问网站下载。这样的功能的确对于使用者来说是十分方便的。那么，您是否也想为您的软件添加方便的在线升级的功能呢？下面介绍一个第三方控件，能够帮你非常容易地就实现。bkDLControl控件一个可以快速实现在线下载的控件，它在下载的同时通过进度条显示进度。你可以编写当其下载完成后的事件，这样...

VB中子分类技术的应用

2016年07月27日 109 阅读

VB中子分类技术的应用2010-01-15龙行天下子分类技术的原理：要先取得原先Window Procedure所在的地址，将之记录起来，接着设定所有的消息都先转到我们所写的消息处理过程上来，我们过滤传过来的消息，寻找特定的消息进行处理，其余的送回系统，由系统决定如何处理。等到我们不需要再处理这些特定的消息时，便取消消息的截取，即中止子分类过程。它一般需要三个过程:开始截取,消息处理,中止截取.程序需要一个模块，在模块中声明如下："API函数Declare...

VB中自动提示保存修改后的文件

2016年07月27日 111 阅读

VB中自动提示保存修改后的文件2010-01-15 comprg.com.cn 范秀山 杨勇峰 王艳语RichTextBox控件支持文本文件和RTF格式文件，在VB中经常用来显示文件内容。当用来编辑文件时，我们希望程序对文件的修改做出反应，提醒用户是否保存这些修改。1 任务与要求如图1所示，一个窗体内有一个文件列表（File1）和一个文本显示控件（RichTextBox1）。当单击文件列表（File1）内的文件时，其内容显示在下方的文本显示控件（RichT...

Visual Basic CommandButton控件

2016年07月27日 114 阅读

Visual Basic CommandButton控件2010-01-15使用CommandButton控件命令按钮控件被用来启动、中断或结束一个进程。单击它时将调用已写入Click 事件过程中的命令。大多数Visual Basic应用程序中都有命令按钮，用户可以单击按钮执行操作。单击时，按钮不仅能执行相应的操作，而且看起来就象是被按下和松开一样，因此有时称其为下压按钮。详细信息 关于CommandButton控件的简单示例，请参阅第三章，“...

Visual Basic动态数据驱动程序浅析

2016年07月27日 110 阅读

Visual Basic动态数据驱动程序浅析2010-01-15Visual Basic应用程序经常使用先进的ActiveX组件连接到数据源。这些数据来源可能包括数据访问对象（DAO）的使用，远程数据对象（RDO），OLE DB提供程序，如ActiveX数据对象（ADO），COM数据提供商，水晶数据对象（CDO）和水晶数据源类型库，或Visual Basic数据控件。使用水晶报表的Visual Basic动态数据驱动程序，您可以让您的应用程序使用这些相同的...

把图片框的完整内容复制到剪贴板

2016年07月27日 124 阅读

把图片框的完整内容复制到剪贴板2010-01-15wxj_lakeVB本身不允许你将一个Form、UserControl或PictureBox上的完整图片复制到剪贴板。如果你使用Clipboard.SetData，将只复制被载入这个对象的位图。通过使用API方法，你可以超越这个限制，保证全部内容都被复制，包括你刚刚画上的任何图形。开始一个新项目，在窗体上放置一个Command和一个PictureBox。将PictureBox的Autoredraw属性设为1...

创建setup类型的进度条

2016年07月27日 88 阅读

创建setup类型的进度条2010-01-15新建一个工程增加一个picture box和command button加入下面的代码：Dim tenth As Long"条件编译#If Win32 ThenPrivate Declare Function BitBlt Lib "gdi32" _（ByVal hDestDC As Long, ByVal x As Long, ByVal y As Long, _ByVal nWidth ...

读取软硬光盘序列号

2016年07月27日 105 阅读

读取软硬光盘序列号2010-01-15获取序列号是要读取软硬光盘的信息，可通过以下函数获得：Public Declare Function GetVolumeInformation Lib "kernel32.dll" Alias "GetVolumeInformationA" （ByVal lpRootPathName As String, ByVal lpVolumeNameBuffer As String, B...

基于VBA组卷中自动排版的实现

2016年07月27日 100 阅读

基于VBA组卷中自动排版的实现2010-01-15 comprg.com.cn 余梓唐一、引言建立完善的题库是课程建设的一项重要工作，当数据库的形式进行题库管理，通过编写抽题程序，在分类明确、题量丰富的题库支持下，实现自动组卷并非难事。试卷一般都采用Word文档，若采用VBA编程，要用程序将试题写入到Word文档，可以通过引用 Microsoft Word 9.0 Object Library中的相关对象来实现：图片、图形、文本框及艺术字等可利用Shape...

基于VB－PRINTER对象的动态报表打印

2016年07月27日 100 阅读

基于VB－PRINTER对象的动态报表打印2010-01-15 comprg.com.cn 叶建良0 引言在笔者开发的“学籍管理系统”中，有一数据查询模块，其任务是查询与浏览设定条件的学生或班级数据，其中的“打印”按钮功能是将显示在表格中的内容打印出来。由于查询结果中表与字段的是不固定的，使得利用VB本身自带的数据库报表难以实现动态打印，笔者经过对MSHFlexGrid控件、Printer对象的较深入学习、研...

可以换肤的窗体

2016年07月27日 118 阅读

可以换肤的窗体2010-01-15 洪恩 大家都知道大名鼎鼎的WINAMP播放器是支持“换肤”的，也就是说，我们可以动态的改变窗体和控件的背景图案，使窗体看起来十分漂亮，而且能够不断更换新的面孔。那我们能让自己的程序也实现这样的效果吗？答案是肯定的，下面我们就一起来看看用VB6做出的可以换肤的窗体。程序包含一个主窗体和一个模块，为了使窗体上的控件也能以我们选择的图案作为背景，我们使用了Microsoft Forms2.0 Objec...

给应用程序添加“日积月累”对话框

2016年07月27日 118 阅读

给应用程序添加“日积月累”对话框2010-01-15目前几乎所有的商业软件在启动时都会显示一个“日积月累”对话框，该对话框一般一次显示一条关于该软件的使用技巧，用户也可以逐条浏览其中的所有技巧。下面是用Visual Basic 5.0实现该功能的方法：关键是有三个问题要解决：一是技巧信息以何种形式保存；二是如何随机读取；三是如何控制启动是否显示。解决第一个问题，有两种思路：一是将技巧信息保存在一个文本文件中，一行保存一条技巧，然后使...

VB5报表设计器在人事管理软件中的应用

2016年07月27日 106 阅读

VB5报表设计器在人事管理软件中的应用2010-01-29 cww 谢科使用过VB5的人都会发出这样的赞誉-VB5真牛！的确，Visual Basic 5.0 以其强大的功能和优异的开发环境深深吸引了众多编程迷。彻底中文化的VB5中文版更深得专业人员及编程爱好者的喜爱。笔者在为某单位设计人事履历管理系统时就选用了VB5中文版。可是在设计报表时遇到了难题， 用printer对象的enddoc方法来实现打印的话，输出数十张格式各异的报表显然是太繁琐了。可能Mi...

VB在远程管网数据传输中的应用

2016年07月27日 97 阅读

VB在远程管网数据传输中的应用2010-01-29 comprg.com.cn 郭圣安在供水SCADA系统中对于远程测控终端的通信我公司过去是通过无线数传电台实现，由于受外界干扰太大，温度过高易造成频偏，导致数据经常接收不到，随着供水管网的远程检测监控技术的不断发展进步，现在流行的CDMA或GPRS无线通信无论在稳定性还是在准确性方面都胜一筹，并且在速度上有质的提高。鉴于此，在SCADA系统中对于远程测控终端的通信，在硬件上我们决定采用CDMA无线通信设备...

Combo的自动查询技术

2016年07月27日 96 阅读

Combo的自动查询技术2010-01-29Declare Function SendMessage Lib "user32" Alias "SendMessageA" （ByVal hwnd As Long, ByVal wMsg As Long, ByVal wParam As Long, lParam As Any） As LongPublic Const CB_FINDSTRING = &H14CPr...

GIFs、JPGs和DirectInputMouse在VB游戏编程中的运用

2016年07月27日 104 阅读

GIFs、JPGs和DirectInputMouse在VB游戏编程中的运用2010-01-29W-Buffer相对而言，不是很难,我们并不需要解码器来得到JPG的每一个字节，或任何类似于次的，相反，我们将用一个图片框来打开一个图片，然后再将其传到表面，但首先我门需要声明API函数：Public Declare Function BitBlt Lib "gdi32" （ByVal hDestDC As Long, ByVal X As L...

Inet控件中上载的路径、文件名中出现空格的解决办法

2016年07月27日 106 阅读

Inet控件中上载的路径、文件名中出现空格的解决办法2010-01-29在VB中调用Inet控件时当本地的文件路径，或文件名里面出现空格时则相应的文件便上传不到服务器，会发生错误，那么怎么解决呢？其实办法很简单：在该路径或文件名两边加双引号就行了。例子如下：Inet1.Execute txtURL.Text, "PUT ""C:My DocumentsSend.txt"" SentDocsSent.txt&...