VB中使用汇编一例（国外英文资料）.doc

VB中使用汇编一例（国外英文资料） Use assembly in VB Release date: 2008-04-03 10:45:00 source: programming enthusiasts website author: programming enthusiasts website click: 397 the examples below fully undertake the ASM programming with VB examples, get the CPU ID in this case. The engineering files are divided into form1.frm and a module module1.bas -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- -- VERSION 5.00 The Begin VB. Form Form1 Caption = Form1 ClientHeight = 1Array65 ClientLeft = 60 ClientTop = 345 ClientWidth = 3105 LinkTopic = Form1 ScaleHeight = 1Array65 ScaleWidth is equal to 3105 StartUpPosition = 2 Bildschirmmitte The Begin VB.Com mandButton Command1 Caption = Get CPU Name Height is equal to 4Array5 Left = 840 TabIndex = 0 Top = 315 Width = 1425 The End The Begin VB. Label Label2 Alignment = 2 Zentriert AutoSize = -1 True BeginProperty Font Name = MS Sans Serif Size = Array. 75 Charset = 0 Weight = 400 The Underline = 0 False Italic = 0 False Strikethrough = 0 False EndProperty Height = 240 Left = 1515 TabIndex = 2 Top = 1065 Width = 60 The End The Begin VB. Label Label1 Alignment = 2 Zentriert AutoSize = -1 True BeginProperty Font Name = Arial Size = 12 Charset = 0 Weight = 700 The Underline = 0 False Italic = 0 False Strikethrough = 0 False EndProperty Height = 285 Left = 1515 TabIndex = 1 Top = 1350 Width = 75 The End The End Attribute VB_Name = Form1 The Attribute VB_GlobalNameSpace = False The Attribute VB_Creatable = False The Attribute VB_PredeclaredId = True The Attribute VB_Exposed = False Option Explicit Private Sub Command1_MouseDown (Button As Integer, Shift As Integer, x As Single, Y As Single) Label1 = Label2 = End Sub Private Sub Command1_Click () Label1 =