定义过形 Sub tryout (x as interger, byval y as interger) X=×+100 工程1 Module(ode 口x加过程 d用 tryout y=y*6 名称⑩: tryout 定 Public Sub tryout O 类型 C属性 取消 Print×y G子程序() End sub C函数① C事件) End sub 范围 建立sub过程的方法(A):1 公有的① C私有的Q 厂所有本地变量为静态变量(A) 1)工程→添加模块→新建→模块(图1) 2)工具→添加过程(如图2窗口) 3)填写名称、设置类型、适用范围,确定回到图1所示窗口 建立sub过程的方法(B) 工程→添加模块,键入过程名称(假设 china) 工程1- Module2(ode) d用 chin Sub china()‘键入内容后回车, end sub自动出现 Sub china End sub End sub(见图3) 在两行之间就可以输入代码。输入代码要用到所学的各种可能的程序语句 3 例如结构, while结构, select case结构等,以及一些语句,如 print等等定义过程 Sub tryout（x as interger，byval y as interger） x=x+100 y=y*6 Print x,y End sub 建立sub过程的方法（A）： 1）工程→添加模块→新建→模块（图1） 2）工具→添加过程（如图2窗口） 3）填写名称、设置类型、适用范围，确定回到图1所示窗口。 建立sub过程的方法（B）： 工程→添加模块，键入过程名称（假设china） Sub china() ‘键入内容后回车，end sub自动出现 End Sub （见图3） 在两行之间就可以输入代码。输入代码要用到所学的各种可能的程序语句 例如if结构，while结构，select case结构等，以及一些语句，如print等等 1 2 3