关于ActiveX的教程[vb]（转帖）
关于ActiveX的教程
Visual Basic是面向对象的程序设计语言，微软公司推出了ActiveX技术，利用ActiveX技术提出的标准，对界面的设计进行了封装，形成了一系列编程控件，即特定功能的程序模块。在程序的设计中，设计人员只需要拖动所需控件到窗体，然后对控件进行属性设置和使用其方法、事件即可，大大减轻了繁琐的程序设计。
第一节 认识并装载ActiveX控件
任务1：ActiveX控件的概念和ActiveX控件的装载方法
【任务的提出】Visual Basic工具箱上的标准控件只有21个。对于复杂的应用程序，仅仅使用一些标准控件是不够的，可以应用Visual Basic以及第三方开发商提供的大量AcitveX控件。这些控件可以添加在工具箱上。目前在Internet上大约有1000多种AcitveX控件可供下载，大大节约了我们的开发时间。
本任务主要包括以下内容：
(1) 控件分类及ActiveX的概念。
(2) 装载ActiveX控件。
11.1.1 控件分类及ActiveX的概念
Visual Basic 6.0中控件主要分为三种：内部控件（标准控件）、ActiveX控件（外部控件）和可插入对象。
1．内部控件（也称标准控件）
就是我们通常使用的如标签、文本框、命令按钮等常用控件，在我们运行Visual Basic 6.0环境时，可自动在工具箱中出现。如图11-1所示。
图11-1 工具箱中的内部控件
2．ActiveX控件
（1）ActiveX部件
VB功能之所以强大，很大程度上是借助于ActiveX部件。所谓ActiveX部件是指一件可招待的代码，如一个.exe 、.dll或 .ocx文件，它们在提供对象时遵循ActiveX的规范。在VB中，具有四种类型的ActiveX部件：ActiveX 控件、ActiveX.EXE、ActiveX.DLL 、ActiveX 文档。ActiveX.EXE部件是不可视的代码部件，能够服务于多个应用程序，并且能够在远程计算机上运行，能安装在服务器端；ActiveX.DLL 部件是不可视的代码部件，能够与应用程序运行在同一个进程中，能安装在客户端；ActiveX 控件是一个可视的部件，能够作为控件被拖放到不同的应用程序中；ActiveX 文档也是一个可视的部件，能够通过Internet上的Web浏览器打开。
（2）ActiveX控件
ActiveX控件称为扩充控件。ActiveX控件是一种具有可视设计外观，并且能够作为可插件引入到应用程序中去的ActiveX部件，如ADO Data控件就是其中之一。“ActiveX控件”是一种扩展名为 .OCX的独立文件，通常存放在Windows的System目录中。
大部分应用程序可以用内部控件来设计，但是有些功能，如：多媒体、动画、计算机通讯等无法用内部控件�
相关文档：
开始使用vb的时候喜欢用手画出那个控件的位置.然后一个一个的拖动,一点一点的移动.直到感觉满意了为止.如果是控件多了这个就很麻烦了
一不小心可能会将谋个控件拖到一边去
所以,我们在以后的作品中
尽量使用代码来定义控件位置,,要灵活的掌握坐标位置.,可以使用自定义坐标.使用像素来更好的来分区显示控件.
& ......
这一段大家编写程序很多时候都在使用API,它给我们带来了强大的功能.让我们非常惊喜.
但是我们在调试程序的时候有时候总会奔溃.这样很不方便.
其中有些是api惹的祸
使用api注意事项:
首先我说说我的观点.
1:Api是很多系统也在用.我们在设置参数时如果和系统的参数有冲突.就可能引起软件出错
2.api很多都是c语言编写的, ......
文章来源:vb大世界 作者：王国荣
「VB 没有提供这样的功能， 必须呼叫 Windows API」， 当笔者这样回答读者之後，有些读者会要求笔者介绍 Windows API 方面的书籍， 尤其是中文书， 但实际上，目前市面上只看到一本原文书(ZD Press 出版的 Visual Basic 5.0 Programming Guide to Win32 API)， 中文书则未见过， 为什麽没� ......
添加2个text，一个command，一个 WebBrowser
Dim vDoc, vTag
Dim i As Integer
Private Sub Command1_Click()
Set vDoc = WebBrowser1.Document
For i = 0 To vDoc.All.length - 1
If UCase(vDoc.All(i).tagName) = "INPUT" Then
Set vTag = vDoc.All(i)
If vTag.Type = "text" Then
Select Case vTag.Nam ......
就这么一个函数就解决了那位仁兄3天多的工作
唉~！真被一个函数玩死了
这里顺便帖出来吧
Public Class Form1
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Microsoft.VisualBasic.Shell( ......
