将这部分代码放入初始化模块中:
ComboBox1.AddItem "男"
ComboBox1.AddItem "女"
ComboBox2.AddItem "0"
ComboBox2.AddItem "10"
ComboBox2.AddItem "20"
ComboBox2.AddItem "30"
ComboBox2.AddItem "40"
ComboBox2.AddItem "50"
ComboBox2.AddItem "60"
在你需要的地方这样调用值:
这样给a赋值:a=ComboBox1.value
这样给b赋值:b=ComboBox2.value