随机抽取题目测试.xlsm

【文件属性】：

文件名称：随机抽取题目测试.xlsm

文件大小：37KB

文件格式：XLSM

更新时间：2022-07-20 11:44:18

excel VB ECCEL VB

Excel简单三步实现随机抽奖,用VB编程设置两个按钮：开始，结束（按钮控制代码： Dim k As Integer '定义公共变量 Sub start_Click() k = 0 Do [H100] = k DoEvents Loop Until k = 1 If a = 1 Then Exit Sub End Sub Sub stop_Click() k = 1 End Sub）