---- 条 形 码 技 术 简 介 ---- 条 形 码 作 为 一 种 识 别 输 入 技 术， 由 于 其 显 而 易 见 的 快 速、 准 确、 低 廉 等 优 点， 被 广 泛 应 用 于 商 品 流 通、 图 书 馆 管 理 等 众 多 的 自 动 化 管 理 系 统 中。 ---- 条 形 码 是 利 用 条（ 着 色 部...

2008-02-23 06:49:58

事实上是使用SetCursorPos()便可以了，而它的参数是对应於萤的座标，而不是对应某一个Window的Logic座标。这个例子中的MoveCursor()所传入的POINTAPI也是相对於萤屏的座标，指的是从点FromP移动到ToP。最後面我也付了Showje的文章，使用的方式全部不同，不管是他的或我...

2008-02-23 06:49:57

我们可以通过Windows shell.方法使用ShellExecute API函数来加载文档。这个函数将自动的来判断文件的默认打开方式，并用默认的打开方式来开启文档。 以下就是ShellExecute函数的声明： Public Declare Function ShellExecute Lib "shell32.dll" Alias _ "ShellExecuteA...

2008-02-23 06:49:57

Option Explicit Private Sub Command1_Click() Dim strPathName As String strPathName = strPathName = InputBox(请输入需要删除的文件夹名称∶, 删除文件夹) If strPathName = Then Exit Sub On Error GoTo ErrorHandle SetAttr strPathName, VBNormal '此行主要是...

2008-02-23 06:49:55

VB.net中的CliPBoard对象（在System.Windows.Forms命名空间里）允许你在一个应用程序或几个应用程序之间存储和检索数据。使用Clipboard对象非常简单，就像下面这样： 注释：拷贝数据 Clipboard.SetDataObject(TextBox1.Text) 注释：粘贴数据 TextBox2.Text = Clipboard...

2008-02-23 06:49:55

一 前言 用户界面是一个应用程序最重要的部分，对用户而言，界面就是应用程序，他们感觉不到幕后正在执行的代码。不论花多少时间和精力来编制和优化代码，应用程序的可用性仍然在很大程度上依赖于界面的好坏。第一步就设计出非常完美的界面是十分困难的，它需要在用户...

2008-02-23 06:49:53

用Mid$命令超速字符串添加操作 大家都知道，操作符的执行速度是相当慢的，特别是处理长字符串时。当必须重复地在同一变量上附加字符时，有一个基于Mid$命令的技巧可以使用。基本思路就是：预留一个足够长的空间存放操作的结果。下面是应用这个技术的一个例子。 假设要建...

2008-02-23 06:49:53

Set dom = GetObject("WinNT://aDomain") Set usr = dom.Create("user","jsmith") usr.SetInfo Set grp = GetObject("WinNT://aDomain/group") grp.Add ("WinNT://aDomain/jsmith") 注意 1.aDomain改为机器名 2.Win2k自带ADSI，并不需要安装Active Directory 上一篇： V...

2008-02-23 06:49:51

要使用这一技巧，你就需要声明用于剪切、复制和粘贴的常数： Private Const WM_COPY = H301 Private Const WM_CUT = H300 Private Const WM_PASTE = H302 然后，声明对SendMessage API的调用： Private Declare Function SendMessage Lib "user32" _ Alias "SendMessag...

2008-02-23 06:49:49

以下代码行假设你在文本框中显示错误行，这些代码稍加更改就可以适用其他范围。 首先，在窗体中建立一个“线”控件，并把它的索引号定为0。接着，添加如下的代码： Private Sub SetErrorState(ByVal ErrorState As Boolean, _ ByRef Control As Control) On Error Resu...

2008-02-23 06:49:50