VB6.0和VB.Net的对照表
关于VisualBasic6.0类模块
关于VisualBasic6.0类模块对程序员和编程爱好者来说，VB中类的技术是学习中的一个难点，在大型软件的开发过程中，模块（Moudle) 、控件（Activeocx) 、链接库（ Active dll) 和类（ Classmoudle) 构成了系统化、高效化的软件工程，而类的技术是控件和链接库技术的基础，因此掌握类的理论和编程方法是非常有意义的。
（一）类的基本定义和应用概述；类是包含了方法、属性、数据成员的高级代码模块，它既在模块的范畴之内，又是一个没有图形界面的Activeocx，程序员可以象使用控件一样使用它，但却不能看到它，值得注意的是，类是不能继承的。
类能够使我们高效的完成对某一个或者某几个特定的对象的复杂操作，对象的动作就是类的方法，对象的属性就是类的属性过程。
相对而言，如果编程的对象是一组事物，那么，我们采用标准模块的方式是非常合适的，在下列两种情况下，应该使用类进行代码处理：（1）创建大量性质相近的对象；（ 2）提高代码的封装性。
类的创建非常简单，在进行代码编写的时候，在“工程”菜单中选择“添加类模块”项目，就可以添加一个空白的类。
类文件一般以.cls 作为扩展名保存。
（二）类的方法的实现；类的方法类似于动态链接库的接口函数，它能够接受其他窗体代码的指定类型参数，并且传递到类中。
一般来说类的方法是能够指定是否有返回值的。
它在类中通常是一个public 过程。
请看下面的代码示例，它使一个密码框拒绝非字母的输入：（1 ）类cls的代码；Option Explicit '变量检查Private WithEvents mytxt As TextBox '本类中的方法接受和控制一个text密码框Dim isNUM As Boolean '类的模块级变量Public Sub Attach(itTEXT As TextBox) '接受外部变量到mytxt中Set mytxt = itTEXTEnd SubPrivate Sub mytxt_KeyUp(KeyCode As Integer,Shift As Integ er)isNUM= (KeyCode >= 65) And (KeyCode<= 90) ' 测试密码框的键盘输入是否是英文字母If isNUM = False ThenBeep mytxt.Text = "" ' 如果输入不是英文字母则响铃并且清空密码框内容MsgBox"非法字符输入！"End IfDebug.Print mytxt.Text ' 调试输出密码框内容End Sub'类的代码结束（ 2）类的引用；已经编写完成的类可以经过两种格式进行引用，第一种方式：Private（public或者Dim) myCLS （指定的类名）As Newcls（编写完成的类名）；第二种方式较多用于程序编写风格较“老”的程序员：首先在窗体代码中进行模块级声明――DimmyCLS As cls,然后在具体代码过程中进行具体定义――Setmycls = Newcls。
第十一讲：VB6.0基础知识
16
7．窗体布局窗口
窗体布局窗口显示在屏幕右下角。用户可使用表示屏幕的小图像 来布置应用程序中各窗体的位置。这个窗口在多窗体应用程序中很有用， 因为这可以指定每个窗体相对于主窗体的位置。
17
VB的基本语法
一、编辑规则 1．VB代码中不区分字母的大小写。 2．同一行上可以书写多条语句，但语句间要用冒号“:”分 隔。 3．若一个语句行不能写下全部语句，或在特别需要时，可 以换行。换行时需在本行后加入续行符，1个空格加下划线 “_”。 4．一行最多允许255个字符。
六、控制流程语句 例: For I=2 To 13 Step 3 Print I , Next I Print “I=“, I
循环执行次数 输出I的值分别为:
2
5
8
11
33
出了循环输出为: I=14
VB的基本语法
六、控制流程语句
6 Do…Loop循环语句
形式1：（当型循环） Do While<条件> 语句块 Loop 形式2：(直到循环） Do 语句块 Loop While<条件>
34
VB的基本语法
六、控制流程语句
7、 While…Wend语句
使用格式如下：
While <条件 > <循环块> Wend 说明：该语句的功能与Do While <条件>….Loop实现
的循环完全相同。
35
VB的基本语法
六、控制流程语句
8、 Exit 语句
Exit 语句用于退出 Do...Loop、For...Next、Function或 Sub代码块。 对应的使用格式为：Exit Do、Exit For、Exit Function、Exit Sub。分别表示退出DO循环、For循环、函 数过程、子过程。
visual basic语言的发展历史
visual basic语言的发展历史Visual Basic 1.0（1991年）： Microsoft于1991年发布了第一个版本的Visual Basic，也被称为Visual Basic 1.0。
它是一种图形用户界面（GUI）编程语言，旨在简化Windows应用程序的开发。
Visual Basic 1.0是Windows 3.0和3.1时代的主要开发工具之一。
Visual Basic 2.0（1992年）： Visual Basic 2.0于1992年发布，引入了更多的控件和新的开发环境功能，提高了开发者的生产力。
Visual Basic 3.0（1993年）：发布于1993年，Visual Basic 3.0引入了对32位Windows平台的支持，同时加入了数据库访问工具。
这使得Visual Basic成为Windows应用程序开发的首选语言之一。
Visual Basic 4.0（1995年）： Visual Basic 4.0于1995年发布，引入了类模块（Class Modules）的概念，增强了对象导向编程（OOP）的支持。
这个版本还提供了对ActiveX控件的支持。
Visual Basic 5.0（1997年）：发布于1997年，Visual Basic 5.0引入了更多的Internet开发支持，包括使用HTML和HTTP的应用程序开发。
Visual Basic 6.0（1998年）： Visual Basic 6.0是VB的一个重要版本，发布于1998年。
它引入了Windows Common Controls，Data Environment等新特性，使得VB成为当时最流行的企业级应用程序开发语言之一。
Visual Basic .NET（2001年）：在2001年，Microsoft发布了Visual Basic .NET，这是一个基于.NET平台的全新版本。
引入了许多新的特性，如强类型、CLR（Common Language Runtime）支持、继承和多态性等，使VB更加现代化。
VB6.0简介
VB6.0 简介第一章Visual Basic 集成开发环境1、Visual BasicBASIC（Beginners' All-purpose Symbolic Instruction Code“初学者通用符号指令代码”）于1964年创建，是一种适合初学者使用的程序设计语言。
VB有多种版本,目前实际编程使用的Basic一般是。
有如下版本：2003年推出V isual Basic .NET 20032005年11月推出V isual Basic 20052008年1月推出V isual Basic 2008本文简介的是VB , 不是, 适合初学者快速掌握VB的基本语法.2、IDE(Integrated Development Environmnet,集成开发环境)集成开发环境（简称IDE）一般包括代码编辑器、编译器、调试器和图形用户界面工具，是集成了代码编写功能、分析功能、编译功能、debug功能等一体化的开发软件套件。
3、VB相对VB以前的编程语言有如下特点：（1）可视化编程（2）事件驱动VB运行在windows环境下，所开发的程序也只能运行于windows环境。
4、VB6安装有独立的vb6安装版本和集成于visual studio6的VB版本。
安装时为开发方便，一般还需安装MSDN(Microsoft Develpoer Network)帮助系统。
5、vb的典型开发界面上图左侧是控件工具箱, 中间是工作窗口(用于设计界面,编写代码), 右侧上部显示工程窗口,右侧下部显示属性窗口.6、程序开发的一般步骤（1）设计算法或处理流程（2）设计界面（3）编写程序代码(4）测试（5）实际运行（修改完善、升级）7、初学vb应重点掌握(1) 程序设计的思路（2）基本程序语句（3）事件处理（4）常用控件(5) VB的ADO数据模型第二章预定义对象1、VB程序主要由各种控件和一些基本语句构成。
各种控件也称之为“对象”。
vbnet类型转换：从VB
类型转换:从VB 6.0到的转换(5)疯狂代码 / ĵ:http://VisualBasic/Article15163.html升级向导无需特别处理。
ClipboardVisualBasic 6.0 Clipboard 对象提供了对系统剪贴板的访问。
Visual Clipboard 类提供了在系统剪贴板上放置数据和从其上检索数据的方法。
新的 Clipboard 类提供了更多功能，并且支持的剪贴板格式比 Visual Basic 6.0 Clipboard 对象更多。
对象模块经过了重新构建以支持这些功能。
升级向导由于对象模块之间的差异，现有的剪贴板代码无法自动升级。
Clipboard 语句将标记有升级错误。
动态数据交换VisualBasic 6.0 某些控件具有支持动态数据交换 (DDE) 会话的属性和方法。
Visual Windows 窗体不支持内置 DDE。
升级向导DDE 属性和方法标记有升级警告。
Web 应用程序WebClassVisualBasic 6.0 WebClass 是驻留在 Web 服务器上的 Visual Basic 组件，能够响应浏览器的输入。
WebClass 通常包括 WebItems，用于为浏览器和公开事件提供内容。
Visual Web 窗体具有 .NET 框架功能，可以用来为 Web 应用程序创建基于浏览器的用户界面。
Visual 具有“所见即所得”的设计器，可以使用工具箱中的控件创建图形 Web 窗体。
这样，Web 用户界面开发与Windows 开发具有同样的形式。
此外，当创建项目后，Internet Information Services (IIS) 服务器不必停止并重新启动即可开始部署新内容，而使用 WebClass 则不能。
升级向导WebClass 将升级为 Web 窗体。
所有状态存储调用均标记有升级警告。
可以重新编写这些代码，以使用 状态管理的优势。
您也可以选择继续使用 Visual Basic 6.0 中的 WebClass 应用程序，从 Visual Web 窗体中定位至WebClass 和 WebForm，等等。
vb6.0
新闻网页贴吧知道MP3图片视频百科文库窗体顶端窗体底端帮助设置首页自然文化地理历史生活社会艺术人物经济科学体育核心用户年终盘点VB百科名片Visual Basic6.0开始界面vb是V isual Basic的简称，是由美国微软公司于1991年开发的一种可视化的、面向对象和采用事件驱动方式的结构化高级程序设计语言，可用于开发Windows 环境下的各类应用程序。
它简单易学、效率高，且功能强大可以与Windows 专业开发工具SDK相媲美。
在V isual Basic环境下，利用事件驱动的编程机制、新颖易用的可视化设计工具，使用Windows内部的广泛应用程序接口（API）函数，动态链接库（DLL）、对象的链接与嵌入（OLE）、开放式数据连接（ODBC）等技术，可以高效、快速地开发Windows环境下功能强大、图形界面丰富的应用软件系统。
目录Visual Basic编程语言由VB派生的语言VB编程语言历史1991-西雅图夜空的雷电Visual Basic 1.0Visual Basic 2.0专业版Visual Basic 3.0特别版Visual Basic 4.0Visual Basic 5.0Visual Basic 6.0Visual 2002Visual 2003Visual Basic .NET 2005Visual 2008Visual 2010VB的特点1．面向对象2．事件驱动3．软件Software集成式开发4．结构化设计语言5．强大数据库访问功能6．支持对象链接和嵌入技术7．网络功能8．多个应用向导9．支持动态交换、动态链接技术．lO．联机帮助功能虚拟网桥（Virtual Bridge）维多利亚啤酒(Victoria Beer)Visual Basic编程语言由VB派生的语言VB编程语言历史1991-西雅图夜空的雷电Visual Basic 1.0Visual Basic 2.0专业版Visual Basic 3.0特别版Visual Basic 4.0Visual Basic 5.0Visual Basic 6.0Visual 2002Visual 2003Visual Basic .NET 2005Visual 2008Visual 2010VB的特点1．面向对象2．事件驱动3．软件Software集成式开发4．结构化设计语言5．强大数据库访问功能6．支持对象链接和嵌入技术7．网络功能8．多个应用向导9．支持动态交换、动态链接技术．lO．联机帮助功能虚拟网桥（Virtual Bridge）维多利亚啤酒(Victoria Beer)展开编辑本段Visual Basic编程语言1991年，美国微软公司推出了V isual Basic 1.0(可简称VB），1992年，Microsoft公司又推出VB6.0[1]了VB 1.0的升级版VB 2.0……目前的最新版本是VB 2010 测试版。
第二章vb6.0概述
5.0 ,6.0包含三种版本（学习版、专业版和企业版）
2.1 Visual Basic 6.0语言简介
英 文 Visual 的 意 思 是 “ 视 觉 的 ” ， “ 可 视 的 Baisc” 这个名字可能抽象了点，但实际上它却是最 直观的编程方法，之所以叫做“可视”，你只要看 到VB的界面就会明白，实际上你无需编程，就可以 完成许多步骤。 在VB中引入了控件的概念，在Windows中控件 的身影无处不在，如按钮、文本框等，VB把这些控 件模式化，并且每个控件都有若干属性用来控制控 件的外观，工作方法，能够响应用户操作（事件）。
2.3 Visual Basic 6.0的集成开发环境
7.代码(code)窗口
在设计模式中，通过双击窗体或窗体上任何对象或通过
“工程资源管理器”窗口中的“查看代码”按钮来打开代码编 辑器窗口。代码编辑器是输入应用程序代码的编辑器。
各种子窗口及工具栏的显示与隐藏
隐藏方法:单击对应子窗口或工具栏的关闭按钮 显示方法:在视图菜单执行相应命令
第二章
Visual Basic程序设计语言概述
本章要求：
1.了解VB的运行环境及启动、退出。
2.了解VB功能及特点。 3. 熟习VB的集成开发环境。 4. 初步建立事件驱动面向对象程序设计的概念 。
2.1 中文Visual Basic 6.0简介
一、Visual Basic的发展
Visual Basic 是Microsoft 公司开发的Windows 应用程序 开发工具，Visual ——“可视化的”，是一种开发图形户界面 （GUI）的方法。 1991年推出 VB1.0 1992、1993、1995、1997、1998,2000相继推出： 2.0, 3.0, 4.0, 5.0, 6.0,(7.0)版本
VB6.0与VB.NET的不同之处（转）
VB6.0与的不同之处（转）除了上面谈到的语言进化，还有一些语法上的变化。
所有这些语言和语法的变化在MSDN中均可查到，本文只作简单介绍。
数据类型（Data Type）的改变中有些数据类型得到改进。
下面是变化对照表。
在中，Short数据类型是16 bit的。
Short，Integer和Long都等同于CLR的System.Int16、System.Int32和System.Int64类型。
变量声明的变化在VB6.0中，变量声明有许多限制。
其中之一就是不能同行声明多个变量。
如果一定要在一行中声明多个变量，就一定得指明每个变量的类型，否则将被默认为Variant类型。
Dim a1, a2 As IntegerDim a3 As Integer, a4 As Integer第一行中的a1是Variant类型，a2是Integer类型。
第二行中两个变量都是Integer类型。
支持同行声明多个变量，举例如下：Dim a1, a2, a3 As Integer变量初始化是另一个问题。
在VB6.0中不能同时声明和初始化变量，而则支持这个特性。
Dim name As String = "Mahesh"System.Console.Write(name)声明常量也可以照此办理：Const DT_COUNT As Integer = 23New关键字。
在中，New关键字用于创建对象。
由于数据类型是对象，所以New关键字用以创建一个数据类型对象。
Dim i As Integer = New Integer()i = 10System.Console.WriteLine(i.ToString())代码块级别支持。
像C++一样，支持代码块级别的作用域检查。
在语句块中声明的变量只在块内有效。
For i = 1 To 10Dim p As LongSystem.Console.WriteLine(i.ToString())NextSystem.Console.WriteLine(p.ToString())这段代码在中会得到一个编译错误，因为p在For..Next 语句块之外不可访问。
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
VB6.0和的对照表VB6.0和的对照表VB6.0AddItem Object名.AddItemObject名.Items.Add ListBox1.Items.AddComboBox1.Items.AddAbs 函数System.Math.Abs 方法API 函数关系Microsoft Win32和Microsoft .NET Framework API的对应App.Path 等1.System.Reflection.Assembly.GetExecutingAssembly.Loca tion2. Application.StartupPath3. Application.ExecutablePath4. System.AppDomain.CurrentDomain.BaseDirectoryApp.PrevInstanceProcess.GetProcessesByName(pn).GetUpperBound(0)> 0As Any 关键词Visual Basic .NET 不提供支持。
参考方法(SendMessage)AscB 函数Microsoft.VisualBasic.Strings.Asc 函数Atn 函数System.Math.Atan 方法AutoRedraw 属性没有相同项目。
BeepMicrosoft.VisualBasic.Beep()Caption 属性Text 属性CBool 函数CBool 函数CByte 函数CByte 函数CDate 函数CDate 函数CDbl 函数CDbl 函数CDec 函数CDec 函数ChDir 语句Microsoft.VisualBasic.FileSystem.ChDir 函数System.IO.Directory.SetCurrentDirectory 方法ChDrive 语句Microsoft.VisualBasic.FileSystem.ChDrive 函数Chr$ 函数、ChrB 函数Microsoft.VisualBasic.Strings.Chr 函数CInt 函数CInt 函数Circle 方法System.Drawing.Graphics.DrawEllipse 方法CLong 函数CLong 函数Close 语句Microsoft.VisualBasic.FileSystem.FileClose 函数System.IO.StreamReader.Close 方法Clipboard 对象System.Windows.Forms.Clipboard 命名空间ClipControls 属性没有相同项目。
Cls 方法System.Drawing.Graphics.Clear 方法Color QBColorvbBlack RGB()System.Drawing.Color.BlackCommandSystem.Environment.GetCommandLineArgsCombo1.AddItemComboBox1.Items.AddCos 函数System.Math.Cos 方法CSng 函数CStr 函数CStr 函数CurDir 函数System.IO.Directory.GetCurrentDirectory() 方法Currency 类型Decimal 类型CurrentX 属性各种图形相关方法的x 参数。
比如、DrawRectangle(pen, x, y, width, height)CurrentY 属性各种图形相关方法的y 参数。
比如、DrawRectangle(pen, x, y, width, height)Date 函数、Date 语句System.DateTime.Now System.DateTime.Today.ToStringMicrosoft.VisualBasic.DateAndTime.DateStringDateAdd 函数System.DateTime.AddYears 方法AddMonths AddDaysDateDiff 函数Microsoft.VisualBasic.DateDiff 函数DateValue 函数System.DateTime.Parse 方法CDate 函数DatePart 函数Microsoft.VisualBasic.DatePart 函数Day 函数System.DateTime.Day 属性Debug.PrintDebug.WriteLineDeleteSetting 语句Microsoft.VisualBasic.Interaction.DeleteSettingDoEvents 函数System.Windows.Forms.Application.DoEvents 方法DrawMode 属性System.Drawing.Pen.Color 属性DrawStyle 属性System.Drawing.Pen.PenType 属性DrawWidth 属性System.Drawing.Pen.Width 属性EnvironMicrosoft.VisualBasic.Interaction.Environ System.Environment.GetFolderPathExp 函数System.Math.Exp 方法FillColor 属性System.Drawing.SolidBrush.Color 属性FileCopy 语句Microsoft.VisualBasic.FileSystem.FileCopy 函数System.IO.File.Copy 方法FileLen 函数System.IO.FileInfo.Length 属性Microsoft.VisualBasic.FileSystem.FileLenFillStyle 属性System.Drawing.Pen.Brush 属性Get 语句Microsoft.VisualBasic.FileSystem.FileGet 函数GetAttrSystem.IO.File.GetAttributesGotFocus 事件Enter 事件GetSetting 语句Microsoft.VisualBasic.Interaction.GetSettingFileDateTime 函数System.IO.File.GetCreationTime 方法HasDC 属性没有相同项目。
HDC 属性没有相同项目。
Height 属性Control.Size 属性Hour 函数System.DateTime.Hour 属性hwnd Form1.hwndForm1.Handle 定义处也是ByVal hWnd As IntPtr Image 属性Image 属性Input # 语句Microsoft.VisualBasic.FileSystem.Input 函数InStr 函数System.String.IndexOfMicrosoft.VisualBasic.Strings.InStr 函数InStrB 函数Microsoft.VisualBasic.Strings.InStr 函数InStrRev 函数stIndexOf 方法Microsoft.VisualBasic.Strings.InStrRev 函数Int 函数System.Math.Floor 方法System.Math.Ceiling 方法Microsoft.VisualBasic.Int 函数Integer 类型Long 类型Dim y As Integer 改为Dim x As ShortDim y As Long 改为Dim y As IntegerIsEmpty 函数rmation.IsNothing 函数IsDate 函数Microsoft.VisualBasic.IsDate 函数IsNull 函数rmation.IsDBNull 函数IsObject 函数rmation.IsReference 函数Join 函数System.String.Join 方法KeyAsciie.KeyChar 属性Kill 语句Microsoft.VisualBasic.FileSystem.Kill 函数System.IO 命名空间FileInfo.Delete 方法LBound UBoundSystem.Array.GetLowerBound System.Array.GetUpperBoundLCase$ 函数String.ToLower 方法Microsoft.VisualBasic.Strings.LCase 函数Left 属性Control.Location 属性Left$、LeftB、LeftB$System.String.SubStringMicrosoft.VisualBasic.Strings.Left 函数LenSystem.String.LengthMicrosoft.VisualBasic.Strings.LenLenBSystem.Text.Encoding.GetEncoding("gb2312").GetByteCo unt(str1)System.Text.Encoding.Unicode.GetByteCount("123大小大") '结果12System.Text.Encoding.Default.GetByteCount("123大小大") '结果9Line 方法System.Drawing.Graphics.DrawLine 方法Line Input # 语句Microsoft.VisualBasic.FileSystem.LineInput 函数List1.AddItemListBox1.Items.AddLoadPicture 函数System.Drawing.Image.FromFile("..\..\test.bmp")Lock 语句Microsoft.VisualBasic.FileSystem.Lock 函数Log 函数system.Math.Log 方法Long 类型Integer 类型Dim y As Integer 改为Dim x As ShortDim y As Long 改为Dim y As IntegerLostFocus 事件Leave 事件LTrim$ 函数System.String.TrimStartMicrosoft.VisualBasic.Strings.LTrim 函数Mid 函数System.String.SubStringMicrosoft.VisualBasic.Strings.Mid 函数MidB 函数Microsoft.VisualBasic.Strings.Mid 函数Minute 函数System.DateTime.Minute 属性MkDir 语句Microsoft.VisualBasic.FileSystem.MkDir 函数System.IO.Directory.CreateDirectory 方法MousePointer=11Screen.MousePointerSystem.Windows.Forms.Cursors.WaitCursor() System.Windows.Forms.Cursor.Current =Cursors.WaitCursorMod 运算符Math.IEEERemainder 方法Debug.WriteLine(Math.IEEERemainder(10, 3)) '结果1 System.Math.DivRem(10, 3, intResult) '结果 3 (10 \ 3)Debug.WriteLine(intResult) '结果 1 (10 Mod 3)Month 函数System.DateTime.Month 属性MsgBoxSystem.Windows.Forms.MessageBox.Show("Hello, world!")Microsoft.VisualBasic.MsgBoxName 语句Microsoft.VisualBasic.FileSystem.Rename 函数Now 函数System.DateTime.Now Microsoft.VisualBasic.NowOpen 语句Microsoft.VisualBasic.FileSystem.FileOpen 函数Option Base 语句Visual Basic .NET没有提供支持。