VB6和VBNet对照表

1、VB6.0和VB.Net的对照表VB6.0VB.NETAddItem Object名.AddItemObject名.Items.Add ListBox1.Items.Add ComboBox1.Items.AddAbs 函数System.Math.Abs 方法API 函数关系Microsoft Win32和Microsoft .NET Framework API的对应App.Path 等1. System.Reflection.Assembly.GetExecutingAssembly.Location2. Application.StartupPath3. Application.Execu

2、tablePath4. 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()Ca

3、ption 属性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 函数

4、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.Colo

5、r.BlackCommandSystem.Environment.GetCommandLineArgsCombo1.AddItemComboBox1.Items.AddCos 函数System.Math.Cos 方法CSng 函数CSng 函数CStr 函数CStr 函数CurDir 函数System.IO.Directory.GetCurrentDirectory() 方法Currency 类型Decimal 类型CurrentX 属性各种图形相关方法的 x 参数。比如、DrawRectangle(pen, x, y, width, height)CurrentY 属性各种图形相关方法的 y

6、 参数。比如、DrawRectangle(pen, x, y, width, height)Date 函数、Date 语句System.DateTime.Now System.DateTime.Today.ToStringDate$ 函数Microsoft.VisualBasic.DateAndTime.DateStringDateAdd 函数System.DateTime.AddYears 方法 AddMonths AddDaysDateDiff 函数Microsoft.VisualBasic.DateDiff 函数DateValue 函数System.DateTime.Parse 方法 C

7、Date 函数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

8、 属性DrawWidth 属性System.Drawing.Pen.Width 属性EnvironMicrosoft.VisualBasic.Interaction.EnvironSystem.Environment.GetFolderPathExp 函数System.Math.Exp 方法FillColor 属性System.Drawing.SolidBrush.Color 属性FileCopy 语句Microsoft.VisualBasic.FileSystem.FileCopy 函数System.IO.File.Copy 方法FileLen 函数System.IO.FileInfo.Le

9、ngth 属性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

10、属性没有相同项目。HDC 属性没有相同项目。Height 属性Control.Size 属性Hour 函数System.DateTime.Hour 属性hwnd Form1.hwndForm1.Handle 定义处也是 ByVal hWnd As IntPtrImage 属性Image 属性Input # 语句Microsoft.VisualBasic.FileSystem.Input 函数InStr 函数System.String.IndexOfMicrosoft.VisualBasic.Strings.InStr 函数InStrB 函数Microsoft.VisualBasic.Strin

11、gs.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 ShortDim y As Long 改为 Dim y As IntegerIsEmpty 函数Microsoft.VisualBasic.Information.IsN

12、othing 函数IsDate 函数Microsoft.VisualBasic.IsDate 函数IsNull 函数Microsoft.VisualBasic.Information.IsDBNull 函数IsObject 函数Microsoft.VisualBasic.Information.IsReference 函数Join 函数System.String.Join 方法KeyAsciie.KeyChar 属性Kill 语句Microsoft.VisualBasic.FileSystem.Kill 函数System.IO 命名空间 FileInfo.Delete 方法LBound UBo

13、undSystem.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.LenLenB System.Text.Enc

14、oding.GetEncoding("gb2312").GetByteCount(str1)System.Text.Encoding.Unicode.GetByteCount("123大小大") '结果 12System.Text.Encoding.Default.GetByteCount("123大小大") '结果 9Line 方法System.Drawing.Graphics.DrawLine 方法Line Input # 语句Microsoft.VisualBasic.FileSystem.LineInput 函

15、数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.Tri

16、mStartMicrosoft.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.Mouse

17、PointerSystem.Windows.Forms.Cursors.WaitCursor()System.Windows.Forms.Cursor.Current = Cursors.WaitCursorMod 运算符Math.IEEERemainder 方法 Debug.WriteLine(Math.IEEERemainder(10, 3) '结果 1System.Math.DivRem(10, 3, intResult) '结果 3 (10 3) Debug.WriteLine(intResult) '结果 1 (10 Mod 3)Month 函数System.

18、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没有提供

19、支持。Option PrivateVisual Basic .NET没有提供支持。PaintPicture 方法System.Drawing.Graphics.DrawImage 方法Point 方法不存在相同的Form和控件。使用Bitmap时用System.Drawing.Bitmap.GetPixel 方法Print 方法System.Drawing.Graphics.DrawString 方法PrintFormVisual Basic .NET没有提供支持。Print# 语句Microsoft.VisualBasic.FileSystem.Print 函数Private 语句Publi

20、c 语句Private PublicFriend Protected Protected FriendPset 方法不存在相同的Form和控件。使用Bitmap时用System.Drawing.Bitmap.SetPixel 方法Put 语句Microsoft.VisualBasic.FileSystem.FilePut 函数Replace 函数Microsoft.VisualBasic.Strings.Replace 函数Right$ 函数、RightB 函数System.String.SubStringMicrosoft.VisualBasic.Strings.Right 函数ReDim

21、语句ReDim MyArray(5) ReDim Preserve MyArray(15) 语句RmDir 语句Microsoft.VisualBasic.FileSystem.RmDir 函数 System.IO.Directory.Delete() 方法Round 函数System.Math.Round 方法RTrim$ 函数System.String.TrimEndMicrosoft.VisualBasic.Strings.RTrimSaveSetting 语句Microsoft.VisualBasic.Interaction.SaveSetting 函数Scale 方法Visual B

22、asic .NET没有提供支持。Screen.ActiveControlScreen.ActiveFormScreen.FontsScreen.HeightScreen.MousePointerScreen.Width其他 Screen 对象System.Windows.Forms.Application.ActiveForm.ActiveControlSystem.Windows.Forms.Application.ActiveFormSystem.Drawing.FontFamiliesSystem.Windows.Forms.Screen.PrimaryScreen.Bounds.Hei

23、ghtSystem.Drawing.Cursor.CurrentSystem.Windows.Forms.Screen.PrimaryScreen.Bounds.Width其他Second 函数System.DateTime.Second 属性SendKeys 语句System.Windows.Forms.SendKeys.Send("C")SetAttrSystem.IO.File.SetAttributesSgn 函数System.Math.Sign 函数ShellMicrosoft.VisualBasic.ShellSin 函数System.Math.Sin 函数Sp

24、ace 函数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.TimeOfDayTimeVal