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 属性 |