孤夜寒心泪学习随笔

CallByName函数用于执行一个对象的方法，或者设置或返回一个对象的属性。利用它可以轻松实现动画。这里举个字符动画的例子，让大家感受一下此函数的强大功能。 要尝试本例，请在窗体上添加一个Label和一个Timer控件。 Option Explicit Dim ss As Integer, x As Integer 声明变量 Private Sub Form_Load() ss = 0 时间

FSO对象模型在VB中的应用 从 Visual Basic 的第一版至今，VB中有关文件的处理都是通过使用 Open 、Write以及其它一些相关的语句和函数来实现的。随着软件技术的不断发展，加上面向对象编程概念的日臻成熟，这些文件操作语句已经不能适应软件不断增加的复杂程度的需要了。因此，从VB6.0开始，微软提出了一个全新的文件系统对象FSO。一、简介文件系统对象FSO的英文全称是File Sy

 1. 如何消除textbox中按下回车时的beep声？ Private Sub Text1_KeyPress(KeyAscii As Integer)   If KeyAscii = 13 Then      KeyAscii = 0   End If End Sub 2.Textbox获得焦点时自动选中。 Private Sub Text1_GotFocus()   Text1.SelStar

文本文件的操作  此种方式是以行为单位进行读取的基本单位，主要应用的方法和函数有Open,Close,Line Input,FreeFile，EOF等。下面先简述其功能然后结合代码示例进行说明。Open：顾名思义，它的作用是打开文件，换而言之打开某个文件就是获得某个的控制权，一般情况下当文件处于打开状态时只有打开者才能对它进行操作。打开文件时要指定

  用API函数实现文件夹列表 　　在安装软件等一些操作中，需要用户指定安装路径，现在软件的安装界面都是非常友好的，一般来说给出一个

CursorLocation 属性经常出现的recordcount=-1，在这里使用aduseclient属性一般就可以解决问题了。设置或返回游标服务的位置。设置和返回值设置或返回可设置为以下某个常量的长整型值。常量 说明 adUseNone 没有使用游标服务。（该常量已过时并且只为了向后兼容才出现）。 adUseClient 使用由本地游标库提供的客户端游标。本地游标服务通常允许使用的许多功能可

Deftype 语句在模块级别上，为变量和传给过程的参数，设置缺省数据类型，以及为其名称以指定的字符开头的 Function 和 Property Get 过程，设置返回值类型。语法DefBool letterrange[, letterrange] . . .DefByte letterrange[, letterrange] . . .DefInt letterrange[, letterra

如何使用ADO及DAO设置Me.RecordSet您可以使用 Recordset 属性来指定或获得 ADO Recordset 或 DAO Recordset 对象，这些对象代表窗体的记录源。在 Microsoft Access 数据库 (.mdb) 中要求使用记录集时， 将返回 DAO 记录集，在 Microsoft Access 项目 (.adp) 中要求使用记录集时，将返回 ADO

需要添加Microsoft XML,version2.0的引用或更高版本一 创建ＸＭＬDim xmlDocum As MSXML2.DOMDocument    Dim xmlRoot As MSXML2.IXMLDOMElement    Dim xmlNode As MSXML2.IXMLDOMNode    Dim xmlElement As MSXML2.IXMLDOMElemen

摘自:http://www.cnblogs.com/wddavid/archive/2005/06/19/176978.html一、用Webbrowser 代码：Webbrowser.navigate ("http://xxx/1.htm?name=apple&id=001")二、用Inet (注意数据接收方式是POST还是GET ，具体的方式是在1.htm的...中代码：（post方式）1、

Option ExplicitPrivate Declare Function SendMessage Lib "user32" _                          Alias "SendMessageA" (ByVal hwnd As Long, ByVal wMsg _                          As Long, ByVal wParam As Lon

Visual Basic 6.0 TreeView控件及右击弹出菜单Demo1.       新建一exe工程2.       Ctrl+T 打开组件对话框,将Microsoft Windows Common Controls 6.0(SP 6)添加进项目工程3.       在窗体中添加一TreeView 将其命名为tvOrg4.       右击窗体，选择编辑菜单，打开菜单编辑

什么是XML 　　扩展标记语言XML是一种简单的数据存储语言，使用一系列简单的标记描述数据，而这些标记可以用方便的方式建立，虽然XML占用的空间比二进制数据要占用更多的空间，但XML极其简单易于掌握和使用。 　　XML与Access,Oracle和SQL Server等数据库不同，数据库提供了更强有力的数据存储和分析能力，例如：数据索引、排序、查找、相关一致性等，XML仅仅是展示数据。事实上XML

Visual Basic COM基础讲座之简介 "世上无难事，只要肯登攀"，所以你要有信心成为一个COM程序员，而且你一定能。 　　事实上，我们每次设置文本编程控件的Text属性时，就已经在使用COM，同样在DAO数据控件运行MoveNext方法时，甚至在使用VB控制字时，也都是在使用COM。　　那么，什么是COM呢？　　首先，COM是一种通信的方式。　　例如，就像我们的电视遥控一样。当我们按

组件："Adodb.Stream" 有下列方法： Cancel 方法 　 使用方法如下 　 Object.Cancel 　 说明：取消执行挂起的异步 Execute 或 Open 方法的调用。 Close 方法 　 使用方法如下 　 Object.Close 　 说明：关闭对像 CopyTo 方法 　 使用方法如下 　 Object.CopyTo(destStream,[CharNumber]

摘要 ：本文从一个具体例子出发阐述了在Visual Basic 5.0环境下进行外接程序（Add-Ins）开发的原理、关键技术和注意事项，并对其相关技术，如ActiveX、多态性与接口、事件变量等VB5新引进的编程概念也做了必要的分析和描述。 关键词：外接程序（Add-Ins），ActiveX，接口，多态，事件变量一、 概述Visual Basic下的Add-Ins，即外接程序，是扩展VB编程环境

在程序中经常要用到设置或者其他少量数据的存盘，以便程序在下一次执行的时候可以使用，比如说保存本次程序执行时窗口的位置、大小、一些用户设置的数据等等，在 Dos 下编程的时候，我们一般自己产生一个文件，由自己把这些数据写到文件中，然后在下一次执行的时候再读出来使用。在 Win32 编程中当然你也可以这样干，但 Windows 已经为我们提供了两种方便的办法，那就是使用注册表或者 ini 文件（Pro

********************************************************************将日期转换成中文：二零零七年六月二十五日 十点二十七分五十六秒Function CDateToString(ByVal d As Date) As String    Dim s As String    Dim tmp() As String   

Split 函数返回基于 0 的一维数组，其中包含指定数目的子字符串。Split(expression[, delimiter[, count[, start]]])参数expression必选项。字符串表达式，包含子字符串和分隔符。如果 expression 为零长度字符串，Split 返回空数组，即不包含元素和数据的数组。delimiter可选项。用于标识子字符串界

用内存映射判断应用程序是否运行多次判断应用程序是否运行多次在 VB 中多种方法可以实现：1、查找窗口法，利用 FindWindow 函数查找同名的窗口，如找到则说明运行了多个实例。2、枚举窗口法，利用 EnumWindows 函数枚举屏幕中的所有窗口，再用 GetWindowText 函数取得标题，然后检查标题。3、文件标识法，在第一次运行程序时在文件中、或注册表中写入判断的标识，程序退出时再把标

利用VB自身的文件处理命令，在对付几兆大小的文件时往往显得力不从心，速度慢得令人难以忍受。其实可以用一种方法将整个文件都读入内存，而不用一次又一次地访问磁盘。这个方法的实现可以通过多种方式。例如你可以将文件读入到一个Byte数组或一个字符串中，就象下面的代码一样： Public Function GetFileBytes (FileName as String, Data() as Byt

 VB COM基础讲座之建立测试程序 这里我们直接创建一个应用程序来测试一下前面生成的ActiveX EXE文件监视组件： 　　新建一个"Standard EXE"工程；下面需要添加一个引用到我们的新的文件组件中去，然后添加少量的代码作尝试：　　选择"Project"->"References"菜单；　　选中"File"组件选项，然后单击[OK]按钮；　　在表单的通用声明部分添加下列代码：　　

基础：添加以下引用：1，iisext.dll; 2, adsiis.dll; 3,activeds.tlb。1，在 IIS 建立虚拟目录，    Dim sComputer as string    Dim websvc, vRoot, vDir    sComputer = "localhost"        Get Default Web Site Object    Set web

VB COM基础讲座之可重用性 还记得我们是怎么将一个类添加到标准的Visual Basic工程中的？ 　　是的，一流的COM体系的最大特点是其代码的可重用性。　　换句话说，如果用Visual Basic创建一个用于财务管理的类，那么该类不仅可以通过其他程序来访问，而且还可用于其他合作者的应用程序。比如，一张Excel电子数据表可能就需要这样的数据，或者一个C++程序员可能需要获取他人最新工程

VB COM基础讲座之编译的实例选项  在测试文件组件之前，我们必须先编译它。但在进行这项工作之前，让我们先来浏览一下Visual Basic所给出来的一些额外选项。　　在打开FileCheck代码窗口的同时，我们来看看它的属性窗口。 　　属性有Name、DataBindingBehaviour(用于将类和数据源相"绑定")、可持久性(用于控件中，允许保存某个类的属性)以及实例。 　　当类名属

Visual Basic 6.0 TreeView控件及右击弹出菜单Demo1.       新建一exe工程2.       Ctrl+T 打开组件对话框,将Microsoft Windows Common Controls 6.0(SP 6)添加进项目工程3.       在窗体中添加一TreeView 将其命名为tvOrg4.       右击窗体，选择编辑菜单，打开菜单编辑