VB6与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 |
System.Windows.Forms.Cursors.WaitCursor() |
|
Screen.MousePointer |
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 语句 |
Private Public |
|
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 |
System.Windows.Forms.Application.ActiveForm.ActiveControl |
|
Screen.ActiveForm |
System.Windows.Forms.Application.ActiveForm |
|
Screen.Fonts |
System.Drawing.FontFamilies |
|
Screen.Height |
System.Windows.Forms.Screen.PrimaryScreen.Bounds.Height |
|
Screen.MousePointer |
System.Drawing.Cursor.Current |
|
Screen.Width |
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 属性 |