相关分类: Java技术 C/C++ VB delphi
  • 如何使用文件复制对话框

    Visual Basic 提供了过时的FileCopy语句.问题是使用该函数时并不显示文件复制对话框,也就是说,当拷贝一个大文件时,用户看不到Windows的标准 文件复制对话框,无法从进度条上判断当前复制的进度.那么,如何做到这一点呢?请看下面: Public Type SHFILEOPSTRUCT hWnd As Long...

    2008-02-23 06:51:24

  • VB多类图片数据库存取技巧

    一、实现思路: 用户添加或修改图片时控制使用COMMONDIALOG的SHOWOPEN对话框,然后记录通用对话框的FILENAME到变量A,再使用APP.PATH找到到特定目录下的该图片文件,改变窗体上放置图片控件的属性即可显示。数据库中只使用一文本型字段记录下变量A,图片文件保存在程序...

    2008-02-23 06:51:07

  • Visual Basic串口通信程序设计

    1 mscomm.VBx通信控件描述 mscomm.vbx通信控件可直接从vb的toolbox中加入窗体form,即可用其进行通信。若toolbox中无此控件,则用tools的custom controls 将mscomm.vbx从Windows的system子目录中加入vb的toolbox中。 1.1 通信方式 mscomm.vbx有2种不同的方式来处理和解...

    2008-02-23 06:51:05

  • 解除网虫心病 VB做定时断线程序

    运行VB 6,向窗体添加7个Label控件、1个Timer控件、3个Text文本输入框以及4个Command按钮。 原理简介:用Timer控件的True或者False值,控制倒计时的开始,当到达设定时间的时候,弹出对话框提示断开连接。 Option Explicit Dim Hours As Integer Dim Minutes As Intege...

    2008-02-23 06:51:03

  • Visual Basic 安装程序的制作

    在此笔者介绍一个最简单的安装方法,就是用VB自带的打包程序进行打包,虽然比较普通,不过内部却有不少窍门,相信这一点知道的人可能不多吧!!(请大家一定看到最后,好戏在后头)好了,不废话了,开始进入正题。 ①运行打包向导,如下图所示: ②点击“浏览”按钮...

    2008-02-23 06:51:01

  • 用VB编程检测当前电池使用情况

    你想知道你的机器当前电池使用情况吗?系统电池如电压不足将导致系统时间变慢等后果。所以你应该知道电池现在的状态,如电压不足则应该尽快去更换电池。用系统测试软件可以办到,但如果你没有也没关系,我们可以用VB编程来帮我们找到答案,具体做法如下: 首先,新建一个工...

    2008-02-23 06:50:59

  • VB 技巧 - 文件操作的技巧

    1、建立和删除目录 你可以用 MKDIR语句建立一个新目录,可以用RMDIR语句删除一个目录。下面是一个例子: mkdir c:data rmdir c:data 2、改变当前目录: 可用CHDIR改变当前目录为指定目录,例如: CHDIR C:Windows 如果想改变当前目录为应用程序所在的目录,可以使用...

    2008-02-23 06:50:59

  • 复制字符串中的字符

    FillString函数有两个参数,一个是用来重复填充的字符,另一个是填充后的字符串长度。然后它返回填充后的字符串,重复次数由填充字符的个数和填充后字符串长度决定。 该函数建立一个循环,循环次数基于所要求的字符串长度。循环步长有参数Value(即用来重复填充的子字...

    2008-02-23 06:50:57

  • VB中使用SQL查询语句

    一、简单查询 简单的Transact-SQL查询只包括选择列表、FROM子句和WHERE子句。它们分别说明所查询列、查询的 表或视图、以及搜索条件等。 例如,下面的语句查询testtable表中姓名为“张三”的nickname字段和email字段。 SELECT nickname,email FROM testtable WHERE nam...

    2008-02-23 06:50:58

  • VB6在拖托盘中写入应用程序图标

    1、新建立一个VB6工程,将Form1的ShowInTaskBar属性设置为False 2、菜单:工程--添加模块 按“打开”这样就添加了一个新模块,名为Module1,保存为Module1.bas 3、在Module1中写下如下代码: Option Explicit Public Const MAX_TOOLTIP As Integer = 64 Public Const NI...

    2008-02-23 06:50:55

2