事实上是使用SetCursorPos()便可以了，而它的参数是对应於萤的座标，而不是对应某一个Window的Logic座标。这个例子中的MoveCursor()所传入的POINTAPI也是相对於萤屏的座标，指的是从点FromP移动到ToP。最後面我也付了Showje的文章，使用的方式全部不同，不管是...
Visual Basic中的Do循环语句用于控制循环次数未知的循环结构。此种语句有两种语法形式。 格式一：以下是引用片段：Do{While I Until}<条件> <语句块> [Exit Do] <语句块> loop 格式二：以下是引用片...
Private Declare Function GetSystemMenu Lib "User32" (ByVal hwnd As Long, ByVal bRevert As Long) As Long Private Declare Function RemoveMenu Lib "User3...
相信电脑界的每个人都痛恨计算机病毒，她给我们带来了很多麻烦和损失，可你知道编写病毒的方法和过程吗？在此我仅以VB编写为例，揭开她的面纱。 用VB编写病毒需要考虑到如下几点： * 感染主机 首先染毒文件运行后先要判断主机是否以感染病毒，也就是判断病毒主体文件是否存在，如果不存在则将病毒主体...
请在声明区中放入以下声明 Const GWL_EXSTYLE = (-20) Const WS_EX_TRANSPARENT = &H20& Const SWP_FRAMECHANGED = &H20 Const SWP_NOMOVE = &H2 Const SWP_...
我们在用VB开发大型应用程序时遇到如下问题，进入调试、维护阶段开发小组进驻用户单位，软件交用户试用会经常修改程序并重新编译。然后再由程序员给用户复制更新，或者通知用户自行复制更新。对于少量用户可以做到及时更新。而我们的一个用户在一座十层的大厦中办公，有十几个部门(即有管理部门又有生产车间分布在不同的...
很长时间以来，都认为只能通过绝对路径引用标准DLL中的函数。其实，你也可以用相对路径。很简单的，现在就尝试一下吧。 1）绝对路径方法 比如你的DLL文件位于c:\testDLL\debug\testDLL.dll 一般来说，你需要在VB中作如下声明 Declare Sub m...
语法：Set objectvar = {[New] objectexpression | Nothing} Nothing 为选择性引数。停止 objectvar 和任何特定物件的关连。指定 objectvar 为 Nothing，会在没有其它变数引用时，释放所有与先前物件有关的系统和内存资源。 当...
第一种场景: 主表单调出客户列表表单选择一个客户 流程：用户单击主表单相应控件调出客户列表表单，选择一个客户，被选中的客户数据返回给主表单。 代码解释： a. 主表单mainform声明一个私有的客户列表表单CustomerList，WithEvents关键字表明该对象可以...
打印多页Rich Text 打印对象在处理RichTextBox时由于忽视了Rich Text代码将不会工作得很好。为了打印RichTextBox，要使用SelPrint命令，但是SelPrint不是非常得友好，它按照自己的方式打印然后产生退纸动作。为了打印多页Rich Text，要找到...
同步（Synchronization）是数据库在网络环境中应用所要涉及到的一个重要概念。其基本过程大致分以下几个步骤：首先把一个数据库设为可复制副本属性，使其成为设计正本（VB中称设计原版，ACCESS中称设计母版）；然后根据应用程序的实现需要从设计正本复制出多个副本（VB中称复本），这些副本组成一...
以下代码演示了如何用Windows API函数遍历指定驱动器、目录的所有文件。其思路是：调出浏览文件夹窗口让用户指定所要搜索的起始路径，然后用查找文件的API函数遍历该目录下及其包含的子目录下的所有文件。本例需要：一个按钮，一个TextBox和一个ListBox，其中，TextBox应设置为多行。 ...
