ITPub博客

---- Visual Basic 5.0 是 一 个 功 能 强 大 的 集 成 开 发 环 境， 它 可 以 自 动 检 查 语 法 错 误， 提 示 编 码 员 语 法 格 式。 这 些 功 能 都 大 大 提 高 了 编 码 效 率。 可 是 它 作 为 快 捷 开 发 工 具， 它 的 特 点 还 突 出 体 现 在 那 就 是Add-In 技 术 上。 利 用 它， 我 们 可 以 强 化 和 定 制VB 开 发 环 境： 可 以 自 动 在 所 有Project 中 自 动 加 入 一 个 模 块； 可 以 将 每 个 模 块 中 的 某 个 模 块 替 换 成 另 一 个 模 块； 可 以 在 程 序 中 查 找 某 段 代 码， 并 将 它 替 换 掉； 理

---- 澳门就要回归祖国的怀抱，而且“千年虫”（ 2000年）也一步步地在向我们逼近。对于这些即将到来的时刻，我们最好做一个倒计时，来时刻提醒我们它们的到来。而且如果在你的网页上加上一个澳门回归的倒计时牌，那么也会使用你的主页立意更加新颖。下面我们来用VBScript来实现这个功能。 ---- 要实现倒计时，主要用到的是一个时间函数： DateDIFF()，它的作用是求出两个日期之间的时间间隔。它的格式如下： DateDIFF(format,Date1,Date2) ---- 其中， format是指返回的格式。我们可以按相差多少天，相差多少小时，或相差多少秒的格式来返

---- 随 着Windows 98 正 式 版 的 推 出， 越 来 越 多 的 人 开 始 关 注 它。 本 人 最 近 也 在 机 器 中 安 装 了 一 套， 的 确 发 现 许 多 新 的 东 西， 操 作 更 加 自 如、 方 便， 但 是， 最 近 在Windows 98 下 使 用VB 5.0 编 程 却 遇 到 了 一 个 大 难 题： 原 来 在Windows 95 中 编 写 的VB 可 执 行 程 序 却 怎 么 也 不 能 运 行， 总 是 提 示：" 该 程 序 执 行 了 非 法 操 作， 即 将 关 闭。 如 果 仍 有 问 题， 请 与 程 序 供 应 商 联 系。" 当 我 查 看 详 细 资 料 则 显 示："user.exe

---- 条 形 码 技 术 简 介 ---- 条 形 码 作 为 一 种 识 别 输 入 技 术， 由 于 其 显 而 易 见 的 快 速、 准 确、 低 廉 等 优 点， 被 广 泛 应 用 于 商 品 流 通、 图 书 馆 管 理 等 众 多 的 自 动 化 管 理 系 统 中。 ---- 条 形 码 是 利 用 条（ 着 色 部 份）、 空（ 非 着 色 部 份） 及 其 宽、 窄 的 交 替 变 换 来 表 达 信 息。 每 一 种 编 码， 都 制 定 有 字 符 与 条 空、 宽 窄 表 达 的 对 应 关 系， 只 要 遵 循 这 一 标 准 打 印 出 来 的 条、 空 交 替 排 列 的“ 图 形 符 号”， 这 一“ 图 形 符 号

---- VB 无 法 在 日 期/ 时 间 字 段 中 存 放 和 测 量 累 计 时 间， 日 期/ 时 间 存 放 成 特 定 的 时 间 点 而 不 是 一 个 时 间 跨 度， 并 且 无 法 在 一 个 日 期/ 时 间 变 量 中 存 放 超 过24 小 时 的 值。 如 输 入9:30， 输 入 的 不 是 某 台 设 备 工 作 的 时 间 长 度， 而 是 一 个 特 定 时 间， 即 是 早 晨9:30。 在 日 期/ 时 间 字 段 中 输 入26:30，VB 会 显 示 出 错 信 息， 认 为 这 不 是 一 个 合 法 的 输 入。VB 不 是 不 能 进 行 日 期/ 时 间 字 段 的 累 加 计 算， 它 在 内 部 以 浮 点 值 的

----去年以来笔者参与完成了国内几个商品软件的开发工作，感觉到底这种实战和平时自己练习编程不同，短时间内编程水平得到极大的提高。有些项目是用VB做的，接这些项目之前本人还根本没有用过VB，虽然VB较之VC++为简单，容易入门，但是要弄得清楚彻底也不是易事，在开发中，本人积累了一些经验，在此写出来与大家共享，有偏颇之处请指正。下面将针对开发中具体的问题逐一展开叙述： 一、 界 面 设 计 ---- 1、 一 般 性 原 则 ---- 界 面 设 计 的 一 般 性 原 则， 对C++ 的 程 序 员 也 适 用。 界面的整体性。 整 体 性 在 界 面 设 计

二、判断Windows的安装路径 　　 在我们开发的软件中，有时会直接调用Windows提供的小应用程序，如计算器、计事本等；或需要把一些特殊的文件放到Windows或SYSTEM的路径下。通常，Windows都安装在C:＼WINDOWS目录下，但用户可以任意修改Windows的主目录名，因此，在我们的软件中，就需要判断Windows的安装路径。 　　 对于这个问题，Windows提供了两个API函数： GetWindowsDirectory和GetSystemDirectory，可以返回Windows目录和SYSTEM目录的名称。 　　 为此，编制一个通用函数GetWinDir，它返回Windows的安装目录名称。类似，可以写出Ge

Windows 3.1允许程序员用GetModuleUsage()函数来测试一个程序或模块是否仍在运行。但在Windows95及Windows NT下，每个程序都独立地运行在单独的环境中，因此就排除了测试过程的状态。 Microsoft 提供了少量的函数，如：WaitForSingleObject和 WaitForMultipleObjects 来完成该功能。尽管如此，这些函数并不是时时都有效。举例来说，如果你调用WaitForSingleObject函数监测Internet Explorer的运行，同时你又选择了“帮助”菜单中的“教程”项，结果将会是系统死锁，你不得不终止WaitForSingleObject函数的运行。造成这种结果的 原因是你点

在软件开发过程中，有一些看似很简单的问题，却很容易被一般的开发人员所忽略，这些“Bugs”的存在，影响我们软件走向商品化。下面所列出的是笔者在使用Visual Basic开发软件时，碰到了几个这类问题，这里给出其解决方法，供大家探讨交流。 　　 一、防止应用程序加载两份 　　 当我们的应用程序在Windows下运行后，在操作过程中，有时会把它最小化隐藏起来，或者切换到程序管理器下进行其它操作，而后又想进入原来的应用程序，这时如果忘记了刚才启动的应用程序，又去重新启动该应用程序，在内存中就同时加载了两份同样的应用程序，这样不

在窗体的LOAD事件中加入如下代码： Set cnn1 = New ADODB.Connection ‘生成一个连接 strCnn = "DSN=MYDSN;uid=sa;pwd=" ‘创建的系统数据源MYDSN指向PUBS数据库 cnn1.Open strCnn ‘打开连接 在窗体的UNLOAD中的加入代码如下： cnn1.Close ‘关闭连接 Set cnn1 = Nothing ‘释放连接 在按钮中的代码如下： Dim I As integer Dim j as integer Set parm_jobid = New ADODB.Parameter Set mycommand = New ADODB.Command ' parm_jobid.Name = "name1" this line can be ommited parm_jobid.Type = adInteger ‘参数类型

根据思路二，得到算法二： A： 函数入口，仍需要两个参数a和b。 B： 搜索算式中的乘除号，若有则C；否则E C： 计算与之相连的前后两个数，并赋值给第一个数。 D： 将后面的各元素均前移两位，形成新的算式，B E： 如果只有一个元素，则G；否则F F： 按1±2→2，2±3→3，……的方法顺序计算。 G： 返回最后那个元素的值。 　　 以此算法得到QB语言程序function jdjs2$(a%,b%)（附后） 　　 算法二思路简洁清晰，容易实现，而且因不用递归，节省了大量 的堆栈操作，速度也应该更快。 　　 附：两个简单计算函数源程序说明：程序中的csf()和

VB做为快速应用开发（RAD）工具越来越得到开发人员的认可和接受。它对许多API（如ODBC API、SOCKET API等等）的封装使得编程变得简单起来。同时，它支持集成开发环境下的可视化、事件驱动、面向对象等编程特点。下面，我们谈谈在VB中调用存储过程的实现方法及其注意事项。 ---- 我们知道，VB的数据库编程有许多种方法，比如直接用ODBC API编程，这种方法灵活、高效，程序员可以实现对数据库复杂的控制；也可以用VB中的数据对象，如RDO（远程数据对象）、DAO（数据访问对象）、ADO（ActiveX 数据对象），这种方法实现起来方便、快捷，但灵活

编程中常常会与时间打交道，VB编程自然也不例外。以下就谈谈我在这方面的一点经验。 　　 VB中提供了很多变量类型，DATE型就是专门用了存储时间的。 　　 1、DATE型变量及其相关函数。 　　 在内部，一个Date占8个字节的内存，你可以方便地用它来存储日期和时间。给Date变量赋值是很容易的。但请保证输入顺序与系统默认的时间表示顺序相同。例如： 　　 Dim d As Date 　　 d = ＃5/23/99 11:45:34 AM＃ 　　 DateSerial函数可以把年、月、日的数字组合成一个Date值。TimeSerial函数可把小时、分、秒的数字组合成一个Date值。且两函数可以

本人在编写算术运算练习程序时，觉得其中的计算函数下的简单计算函数的编写过程很有意思，当时作了详细记录，现将计算函数整 理为计算程序，并将（不带括号的简单算式的）简单计算函数的编制过程整理成文，献给《网络时代》各位读者，敬请批评指正。 　　 计算主程序负责初始算式整理、算式中变量的赋值、脱括号及脱括号后的算式整理、调用简单计算函数、输出计算结果。 　　 思路：如果第一个运算符是乘除，则计算它前后的两个数，其值作为新算式的第一个数，再继续计算这个新算式；如果是加减则用第 一个数加减后面的算式（如果是减，还

命令行: rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl,,4 　　 功能: 显示“控制面板－多媒体属性－设备”属性页。 　　 命令行: rundll32.exe shell32.dll,Control_RunDLL mmsys.cpl @1 　　 功能: 显示“控制面板－声音”选项窗口。 　　 命令行: rundll32.exe shell32.dll,Control_RunDLL netcpl.cpl 　　 功能: 显示“控制面板－网络”选项窗口。 　　 命令行: rundll32.exe shell32.dll,Control_RunDLL odbccp32.cpl 　　 功能: 显示ODBC32数据管理选项窗口。 　　 命令行: rundll32.exe shell32.dll,OpenAs_RunDLL {drive:pa

常用Windows9x的朋友一定对Rundll32.exe和Rundll.exe这两个文件不会陌生吧，不过,由于这两个程序的功能原先只限于在微软内部使用，因而真正知道如何使用它们的朋友想必不多。那么好，如果你还不清楚的话，那么就让我来告诉你吧。 　　 首先，请你做个小实验（请事先保存好你正在运行的程序的结果，否则...）：点击“开始－程序－Ms－Dos方式”，进入Dos窗口，然后键入"rundll32.exe user.exe,restartwindows"，再按下回车键，这时你将看到，机器被重启了！怎么样，是不是很有趣？ 　　 当然，Rundll的功能绝不仅仅是重启你的机器

如今的CPU的发展是越来越快，从386、486到今天的Pentium、Pentium Ⅱ，发展速度可谓快矣。然而，在CPU高速发展的同时，应用软件的“体重”也随之猛涨，从我学电脑时的几K、几十K ，到今天的几十兆、几百兆，这变化连我自己都感到吃惊。CPU的进步，使人们工作更加快速，效率大增，同时也养成了人们“不求简”的不良习惯。笔者曾见过一位朋友正在编写一段程序，用的是VBA，程序代码如下： 　　 With ActiveWindow 　　 If WindowState = wdWindowStateMaximize Then 'this is the first part! 　　 MsgBox "This is a Maximize Window&

注册表在Windows 9x中的作用是不言而喻的，它除了保存操作系统自身的软件、硬件及环境信息外，一个重要的用途就是保存应用程序中允许用户定制修改的配置信息。 在Visual Basic应用程序中，有两种访问系统注册表的方法：一种是使用VB自带的注册表函数，另一种则是使用Windows API函数，这两种方法各有优缺点，前者功能简单但容易使用，后者则功能强大但使用相对复杂一些，本文给大家介绍用VB自带的函数访问系统注册表的方法。 一、用VB函数访问注册表的方法 在VB5.0中自带的注册表函数（命令）共有4条，分别是SaveSetting、GetSetting、Get

上述代码的第一行是用来设置MyDog的Name变量，同时第二行语句是用来将该变量的内容显示在消息对话框中。最后： 　　Set MyDog = Nothing 　　 用来将MyDog对象简单的置空。 　　 按F5键运行并测试。 　　 怎么样？但同时，我们可能不禁要问，标准模块和类模块究竟有什么不同？我们再来看看下面的示例： 　　 将命令按钮的代码变成： 　　Dim MyDog As CDog 　　 Set MyDog = New CDog 　　 Dim MyDog2 As CDog 　　 Set MyDog2 = New CDog 　　 MyDog.Name = "Billy Moore" 　　 MsgBox MyDog.Name 　　 MyDog2.Name = "Sa

"世上无难事，只要肯登攀"，所以你要有信心成为一个COM程序员，而且你一定能。 　　事实上，我们每次设置文本编程控件的Text属性时，就已经在使用COM，同样在DAO数据控件运行MoveNext方法时，甚至在使用VB控制字时，也都是在使用COM。 　　那么，什么是COM呢？ 　　首先，COM是一种通信的方式。 　　例如，就像我们的电视遥控一样。当我们按下某个频道按钮时，电视频道立马切换；而当我们按下开关按钮时，电视立即关闭等等。其实，我们并不关心它们是怎样工作的，我们只知道按下按钮就能产生某个动作就可以了。 　　程序的原理也