上网最麻烦的事莫过于在地址栏中输入网址了。虽然有收藏夹帮忙，喜爱的网站多了它也日渐臃肿，占用资源不算，用起来也不是很方便。用VB做个“网络助手”吧！ 这个网络助手至少要实现这样的功能：双击用户界面的网站名称，就能调出浏览器并进入该网站。(当然，如果你愿意...

2008-02-23 06:59:25

含目录底下的子目录，求得其所有文件大小之总和其第二个叁数的目的是起始Static型态的totbyte, 呼叫它时，请不要传叁数进去 Private Sub Command1_Click() Dim tot As Long tot = GetDirTotalByte("c:tools") Debug.Print tot End Sub Private Function GetDirTotalBy...

2008-02-23 06:59:24

了解对象的类型 如果你想知道一个对象是否是特殊的类型，请编写下面的代码： If TypeOf obj Is ListItem Then ... 如果想得到对象类型的名字，使用： MsgBox The item is a TypeName(obj) 控制长时间的循环 当程序陷入一个很长时间的循环中时，你就不可能点击任何一个命...

2008-02-23 06:59:23

代码如下： Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As L...

2008-02-23 06:59:22

一、 简介 众所周知，Visual Basic 5.0（VB5.0）提供了为实现高级Windows程序所需的完备工具与机制，它的强大功能已被广大软件开发人员所共识；Explorer在当今Internet的迅猛发展中，又起着功不可灭的作用，它处理HTML的身手使每一使用者叹服，如果将VB5.0和Explorer联...

2008-02-23 06:59:22

2．使对象可以复制 如果在复本中建立了一个新对象，并且想把它从本地的改为可复制的，使得其它用户都可以使用它，则需要在设计原版中建立该对象，并且将其Replicab1e属性设置为“T”。在这种情况下，务必删除所有复本中的这个本地对象，否则会产生一个错误。 对于TableD...

2008-02-23 06:59:20

想利用 VB 编程实现屏幕变暗的效果（像关闭 Win95 时的效果），只要按下面的步骤来做： 1. 在 Form1 中加入两个 CommandButton 和一个 PictureBox. 2. 在 Form1 的代码窗口中添加以下代码： Private Type RECT Left As Long Top As Long Right As Long Bottom As Long E...

2008-02-23 06:59:20

一个Form 一个TextBox 一个Label 这个修订後的程式是当使用者在TextBox中输入只包含 0~9 的数值後，在Label中就可看见被转换後的中文字，例如：1560890 转成 "壹佰伍拾陆万零捌佰玖拾"。程式限制为不可输入超过16个数字。 请建立一个新专案，并在表单中放入上述物件，再...

2008-02-23 06:59:18

声明： Public Type SHFILEOPSTRUCT hwnd As Long wFunc As Long pFrom As String pTo As String fFlags As Integer fAnyOperationsAborted As Long hNameMappings As Long lpszProgressTitle As Long End Type Public Declare Function SHFileOperation Lib "shell32.d...

2008-02-23 06:59:18

Windows API（应用程序接口）是Windows系列软件为程序开发人员提供的火力强大的“武器库”，在这个武器库中，有很多极具威力的武器，SendMessage就是其中之一，它的功能非常丰富，灵活使用这个函数，会给编程工作带来很多便利。本文以Visual Basic为例，结合几个具体的...

2008-02-23 06:59:16