- 博客(10)
- 资源 (7)
- 收藏
- 关注
RSS订阅转载 在Visual Basic 6.0中操纵XML文件
<br />什么是XML <br /> 扩展标记语言XML是一种简单的数据存储语言，使用一系列简单的标记描述数据，而这些标记可以用方便的方式建立，虽然XML占用的空间比二进制数据要占用更多的空间，但XML极其简单易于掌握和使用。 <br /> XML与Access,Oracle和SQL Server等数据库不同，数据库提供了更强有力的数据存储和分析能力，例如：数据索引、排序、查找、相关一致性等，XML仅仅是展示数据。事实上XML与其他数据表现形式最大的不同是：他极其简单。这是一个看上去有点琐细的优点，但
2010-10-18 15:51:00
735
原创 获取系统任务栏高度
<br />这个代码返回系统任务栏高度，以缇(twips)做单位，使用了SystemParametersInfo API函数。<br />Option Explicit<br />Public Declare Function SystemParametersInfo Lib "user32" Alias "SystemParametersInfoA" (ByVal uAction As Long, ByVal uParam As Long, ByRef lpvParam As Any, ByVal fuW
2010-10-18 15:50:00
1067
原创 MSCOMM控件的一些说明
<br /> VB5.0/6.的MSComm通信控件提供了一系列标准通信命令的接口，它允许建立串口连接，可以连接到其他通信设备（如Modem）． 还可以发送命令、进行数据交换以及监视和响应在通信过程中可能发生的各种错误和事件，从而可以用它创建全双工 、事件驱 动的、高效实用的通信程序。但在实际通信软件设计过程中，MSComm控件并非像想像中那样完美和容易控制．特别是在中文Wln 95／98下通信时更会出现问题。下面就从基础开始介绍，然后逐步讨沦MSComm控件在编程中出现的问题以及编程技巧。 <br />一
2010-10-18 15:48:00
734
转载 如何实现VB与EXCEL的无缝连接
<br />VB是常用的应用软件开发工具之一，由于VB的报表功能有限，而且一但报表格式发生变化，就得相应修改程序，给应用软件的维护工作带来极大的不便。因此有很多程序员现在已经充分利用EXECL的强大报表功来实现报表功能。但由于VB与EXCEL由于分别属于不同的应用系统，如何把它们有机地结合在一起，是一个值得我们研究的课题。<br /> 一、 VB读写EXCEL表：<br /> VB本身提自动化功能可以读写EXCEL表，其方法如下：<br /> 1、在工程中引用Microsoft Excel类型库：<b
2010-10-18 15:46:00
296
原创 怎样使DataGrid支持鼠标滚轮滚动记录
<br />在本站的VB源码《数据网格下拉列表框控件》中(链接地址：http://www.mndsoft.com/blog/article.asp?id=214)中，网友 taomaintao 提示支持滚轮鼠标，其实原本代码有已经有部分API代码意图支持鼠标滚轮，但可能作者后来没有加上。基于此，我找到一个解决办法（来自网络），taomaintao 网友可以按照下面自己进行修改吧。<br />首先在DataGrid 的 【拆分】 属性中的【选取框样式】设置为 3，即整行高亮选择，然后加入如下代码就支持了，只要
2010-10-18 15:46:00
1310
原创 各种Excel VBA的命令
<br />本示例为设置密码窗口 (1) <br />If Application.InputBox("请输入密码：") = 1234 Then <br />[A1] = 1 '密码正确时执行 <br />Else: MsgBox "密码错误，即将退出！" '此行与第2行共同设置密码 <br />End If <br />本示例为设置密码窗口 (1) <br />X = MsgBox("是否真的要结帐？", vbYesNo) <br />If X = vbYes Then <br />Close <br /
2010-10-18 15:45:00
612
原创 巧用SendMessage函数扩展Treeview功能
<br />Option Explicit<br />Private Type TPoint<br /> x As Long<br /> y As Long<br />End Type<br />Private Type TVHITTESTINFO<br /> pt As TPoint<br /> flags As Long<br /> hItem As Long<br />End Type<br />Private Type TVITEM<br /> mask As L
2010-10-18 15:44:00
1145
原创 让MSflexgrid支持鼠标滚轮事件
<br />以下程序放在一个公共模块中，<br />在窗体中的form_load事件中 写 HookWheel me.hwnd<br />在窗体中的form_unload事件中 写 UnHookWheel me.hwnd<br />在表格的GotFocus事件中 set CtlWheel=MSFlexGrid1 '( 表格名称，根据具体情况，修改这个名称)<br />在表格的LostFocus事件中 set CtlWheel=Nothing'( 表格名称，根据具体情况，修改这个名称)<br /><br /
2010-10-18 15:44:00
766
转载 一个API方式存取日志文件的模块
<br /><br />'**************************************<br />' 模块名称: AppendToLog<br />' 功能描述:一个很不错的日志文件写入模块，不同于<br />' open/print/close写文件方法,这个模块使用API <br />' 存取文件，这样保证文件能正确的存取，及时被<br />' 存取的文件正被其他用户打开。这个模块是最安全<br />' 有效的文件写入方法,用于日志文件的创建，当然<br
2010-10-18 15:42:00
331
原创 vb中如何在任务管理器里面隐藏应用程序进程
<br />'该模块用于在任务管理器中隐藏进程<br />Private Const STATUS_INFO_LENGTH_MISMATCH = &HC0000004<br />Private Const STATUS_ACCESS_DENIED = &HC0000022<br />Private Const STATUS_INVALID_HANDLE = &HC0000008<br />Private Const ERROR_SUCCESS = 0&<br />Private Const SECTION_
2010-10-18 15:41:00
1315
sleep.dll不带卡机的缓冲等待
2011-04-05
PC春天里的小猫 V1.0
2011-03-21
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人