VB6.0和VB.Net对照表

想在网上找一下VB.Net中,哪些是VB6.0遗留下来的东西,哪些是VB.Net增加的东西。结果中文的没有找到,找到了一个日文网页。简单的翻译了一下,放在这里,供需要的人参考。

VB6.0和VB.Net的对照表
VB6.0 VB.NET
AddItem Object名.AddItem Object名.Items.Add ListBox1.Items.Add ComboBox1.Items.Add
Abs 函数 System.Math.Abs 方法
API 函数关系 Microsoft Win32和Microsoft .NET Framework API的对应
App.Path

1. System.Reflection.Assembly.GetExecutingAssembly.Location
2. Application.StartupPath
3. Application.ExecutablePath
4. System.AppDomain.CurrentDomain.BaseDirectory

App.PrevInstance Process.GetProcessesByName(pn).GetUpperBound(0) > 0
As Any 关键词 Visual Basic .NET 不提供支持。 参考方法(SendMessage)
AscB 函数 Microsoft.VisualBasic.Strings.Asc 函数
Atn 函数 System.Math.Atan 方法
AutoRedraw 属性 没有相同项目。
Beep Microsoft.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 QBColor
vbBlack
RGB()
System.Drawing.Color.Black
Command System.Environment.GetCommandLineArgs
Combo1.AddItem ComboBox1.Items.Add
Cos 函数 System.Math.Cos 方法
CSng 函数 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.ToString
Date$ 函数 Microsoft.VisualBasic.DateAndTime.DateString
DateAdd 函数 System.DateTime.AddYears 方法 AddMonths AddDays
DateDiff 函数 Microsoft.VisualBasic.DateDiff 函数
DateValue 函数 System.DateTime.Parse 方法  CDate 函数
DatePart 函数 Microsoft.VisualBasic.DatePart 函数
Day 函数 System.DateTime.Day 属性 
Debug.Print Debug.WriteLine
DeleteSetting 语句 Microsoft.VisualBasic.Interaction.DeleteSetting
DoEvents 函数 System.Windows.Forms.Application.DoEvents 方法
DrawMode 属性 System.Drawing.Pen.Color 属性
DrawStyle 属性 System.Drawing.Pen.PenType 属性
DrawWidth 属性 System.Drawing.Pen.Width 属性
Environ Microsoft.VisualBasic.Interaction.Environ
System.Environment.GetFolderPath
Exp 函数 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.FileLen
FillStyle 属性 System.Drawing.Pen.Brush 属性
Get 语句 Microsoft.VisualBasic.FileSystem.FileGet 函数
GetAttr System.IO.File.GetAttributes
GotFocus 事件 Enter 事件
GetSetting 语句 Microsoft.VisualBasic.Interaction.GetSetting
FileDateTime 函数 System.IO.File.GetCreationTime 方法
HasDC 属性 没有相同项目。
HDC 属性 没有相同项目。
Height 属性 Control.Size 属性
Hour 函数 System.DateTime.Hour 属性
hwnd Form1.hwnd Form1.Handle 定义处也是 ByVal hWnd As IntPtr
Image 属性 Image 属性
Input # 语句 Microsoft.VisualBasic.FileSystem.Input 函数
InStr 函数 System.String.IndexOf
Microsoft
.VisualBasic.Strings.InStr 函数
InStrB 函数 Microsoft.VisualBasic.Strings.InStr 函数
InStrRev 函数 System.String.LastIndexOf 方法
Microsoft.VisualBasic.Strings.InStrRev 函数
Int 函数 System.Math.Floor 方法       System.Math.Ceiling 方法
Microsoft
.VisualBasic.Int 函数 
Integer 类型 Long 类型 Dim y As Integer 改为 Dim x As Short
Dim y As Long 改为 Dim y As Integer
IsEmpty 函数 Microsoft.VisualBasic.Information.IsNothing 函数
IsDate 函数 Microsoft.VisualBasic.IsDate 函数
IsNull 函数 Microsoft.VisualBasic.Information.IsDBNull 函数
IsObject 函数 Microsoft.VisualBasic.Information.IsReference 函数
Join 函数 System.String.Join 方法
KeyAscii e.KeyChar 属性
Kill 语句 Microsoft.VisualBasic.FileSystem.Kill 函数
System.IO 命名空间 FileInfo.Delete 方法
LBound UBound System.Array.GetLowerBound System.Array.GetUpperBound
LCase$ 函数 String.ToLower 方法 
Microsoft.VisualBasic.Strings.LCase 函数
Left 属性 Control.Location 属性
Left$、LeftB、LeftB$ System.String.SubString
Microsoft.VisualBasic.Strings.Left 函数
Len System.String.Length
Microsoft.VisualBasic.Strings.Len
LenB
System.Text.Encoding.GetEncoding("gb2312").GetByteCount(str1)
System
.Text.Encoding.Unicode.GetByteCount("123大小大") '结果 12
System.Text.Encoding.Default.GetByteCount("123大小大") '结果 9
Line 方法 System.Drawing.Graphics.DrawLine 方法
Line Input # 语句 Microsoft.VisualBasic.FileSystem.LineInput 函数
List1.AddItem ListBox1.Items.Add
LoadPicture 函数 System.Drawing.Image.FromFile("..\..\test.bmp")
Lock 语句 Microsoft.VisualBasic.FileSystem.Lock 函数
Log 函数 system.Math.Log 方法
Long 类型 Integer 类型 Dim y As Integer 改为 Dim x As Short
Dim y As Long 改为 Dim y As Integer
LostFocus 事件 Leave 事件
LTrim$ 函数 System.String.TrimStart
Microsoft.VisualBasic.Strings.LTrim 函数
Mid 函数 System.String.SubString
Microsoft.VisualBasic.Strings.Mid 函数
MidB 函数 Microsoft.VisualBasic.Strings.Mid 函数
Minute 函数 System.DateTime.Minute 属性
MkDir 语句 Microsoft.VisualBasic.FileSystem.MkDir 函数
System.IO.Directory.CreateDirectory 方法
MousePointer=11
Screen.MousePointer
System.Windows.Forms.Cursors.WaitCursor()
System.Windows.Forms.Cursor.Current = Cursors.WaitCursor
Mod 运算符 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 属性
MsgBox System.Windows.Forms.MessageBox.Show("Hello, world!")
Microsoft
.VisualBasic.MsgBox
Name 语句 Microsoft.VisualBasic.FileSystem.Rename 函数
Now 函数 System.DateTime.Now Microsoft.VisualBasic.Now
Open 语句 Microsoft.VisualBasic.FileSystem.FileOpen 函数
Option Base 语句 Visual Basic .NET没有提供支持。
Option Private Visual Basic .NET没有提供支持。
PaintPicture 方法 System.Drawing.Graphics.DrawImage 方法
Point 方法 不存在相同的Form和控件。
使用Bitmap时用System.Drawing.Bitmap.GetPixel 方法
Print 方法 System.Drawing.Graphics.DrawString 方法
PrintForm Visual Basic .NET没有提供支持。
Print# 语句 Microsoft.VisualBasic.FileSystem.Print 函数
Private 语句
Public 语句
Private Public
Friend Protected Protected Friend
Pset 方法 不存在相同的Form和控件。
使用Bitmap时用System.Drawing.Bitmap.SetPixel 方法
Put 语句 Microsoft.VisualBasic.FileSystem.FilePut 函数
Replace 函数 Microsoft.VisualBasic.Strings.Replace 函数
Right$ 函数、RightB 函数 System.String.SubString
Microsoft.VisualBasic.Strings.Right 函数
ReDim 语句 ReDim MyArray(5)     ReDim Preserve MyArray(15)  语句
RmDir 语句 Microsoft.VisualBasic.FileSystem.RmDir 函数 System.IO.Directory.Delete() 方法
Round 函数 System.Math.Round 方法
RTrim$ 函数 System.String.TrimEnd
Microsoft.VisualBasic.Strings.RTrim
SaveSetting 语句 Microsoft.VisualBasic.Interaction.SaveSetting 函数
Scale 方法 Visual Basic .NET没有提供支持。
Screen.ActiveControl
Screen.ActiveForm
Screen.Fonts
Screen.Height
Screen.MousePointer
Screen.Width
其他 Screen 对象
System.Windows.Forms.Application.ActiveForm.ActiveControl
System.Windows.Forms.Application.ActiveForm
System.Drawing.FontFamilies
System.Windows.Forms.Screen.PrimaryScreen.Bounds.Height
System.Drawing.Cursor.Current
System.Windows.Forms.Screen.PrimaryScreen.Bounds.Width
其他
Second 函数 System.DateTime.Second 属性
SendKeys 语句 System.Windows.Forms.SendKeys.Send("^C")
SetAttr System.IO.File.SetAttributes
Sgn 函数 System.Math.Sign 函数
Shell Microsoft.VisualBasic.Shell
Sin 函数 System.Math.Sin 函数
Space 函数 Microsoft.VisualBasic.Strings.Space 函数
Sqr 函数 System.Math.Sqrt 函数
StrComp 函数 Microsoft.VisualBasic.Strings.StrComp 函数
StrConv 函数 Microsoft.VisualBasic.Strings.StrConv 函数
String$(256, Chr(0)) buf = New String(CChar(" "), 256) Microsoft.VisualBasic.Strings.StrDup 函数
StrReverse 函数 Microsoft.VisualBasic.Strings.StrReverse 函数
Tan 函数 System.Math.Tan 方法
TextHeight 属性 System.Drawing.Font.Height 属性
TextWidth 属性 System.Drawing.Graphics.MeasureString 方法
Time$ 函数 Microsoft.VisualBasic.DateAndTime.Timer 属性
System.DateTime.Now.TimeOfDay
TimeValue 函数 System.DateTime.Parse 方法  CDate 函数
Top 属性 Control.Location 属性
Trim$ 函数 Microsoft.VisualBasic.Strings.Trim 函数
System.String.Trim
Type 语句 Structure 语句
UCase$ 函数 String.ToUpper 方法 
Microsoft.VisualBasic.Strings.UCase 函数
Unlock 语句 Microsoft.VisualBasic.FileSystem.Unlock 函数
Unload 事件 Closed 事件 Me.Close()
Variant 型 Dim x As Variant 改为 Dim x As Object
VarPtr、StrPtr、ObjPtr Dim MyGCHandle As GCHandle = GCHandle.Alloc(o,GCHandleType.Pinned)
Dim Address As Integer = CInt(MyGCHandle.AddrOfPinnedObject())
MyGCHandle.Free() ' 允许对象实例再移动。
vbCrLf Microsoft.VisualBasic.Constants.vbCrLf
Microsoft.VisualBasic.vbCrLf
Weekday Microsoft.VisualBasic.Weekday System.DateTime.DayOfWeek
WeekdayName Microsoft.VisualBasic.WeekdayName (System.DateTime 构造体中没有相同项目)
Width 属性 Control.Size 属性
Write # 语句 Microsoft.VisualBasic.FileSystem.Write 函数
Year 函数 System.DateTime.Year 属性

posted @ 2006-06-27 16:29  Ronin  阅读(8832)  评论(2编辑  收藏  举报