第一步，做一个界面。
打开wps表单2009并创建一个新的空白文档。假设一个年级有20个班，在a1单元格中输入班主任姓名，在(a2:a21)单元格中输入班主任姓名，在b1单元格中输入抽中的班级，输入单词"未绘制"在牢房中(b2:b21)。如果在单元格e3中显示了抽签产生的类别，则在单元格e3中设置适当的边框和字体大小，然后执行"视图→工具→控制工具箱"。单击命令按钮，在e3单元格下插入两个按钮，并将标题选项设置为"抽签和抽签和"停止"在“属性”窗口中，默认的名称选项是commandbutton1和commandbutton2。
第二步，实现按钮的功能。
双击"抽签和抽签按钮打开代码窗口，输入以下代码(包含"停止"按钮):
选项显式
dim标志为布尔值，i，j，m为整数
私有子命令button1_click()
标志tru:
对于i1到20#39如果有20个类。
do:
然后
如果标志为真，则转到调节1
#39如果在一个循环结束时没有按下停止按钮，则进入下一个循环。
tiaozhuan3:
对于m2至21
如果单元(m，2)#34没有被画出#34，那么
细胞(m，2)细胞(3，5)
出口接头
如果…就会结束
然后
末端接头
私有子命令button2_click()
标志错误#39中断循环
末端接头
现在关闭代码窗口，退出设计模式，一个程序就做好了。当丹单击"抽签和抽签按钮，未绘制的类别将依次显示在
您好
sub是组成子流程的名称、参数和代码。
sub语句的语法包含以下部分:
public是可选的。代表所有模块的所有其他过程都可以访问这个子程序。如果在包含optionprivate的模块中使用，则不能在项目外部使用该进程。
私有是可选的。指示只有包含其声明的模块中的其他过程才能访问sub过程。
朋友是可选的。只能在类模块中使用。这意味着子流程在整个项目中是可见的，但对于对象实例的控制器是不可见的。
static是可选的。表示在调用之间保留sub过程的局部变量的值。static属性对sub外部声明的变量没有影响，即使它们在过程中使用。
需要姓名。sub的名称；遵循标准的变量命名约定。
arglist是可选的。调用时表示传递给sub过程的参数的变量列表。多个变量用逗号分隔。
语句是可选的。sub过程中执行的任何语句组。
