snowtree_ok的专栏

VBA写的小型抽奖系统。可以手动抽奖，也可以自动抽奖。 - 手动抽奖：点击开始后，遍历每个员工，抽取随机数，返回中奖员工ID。下一轮中，跳过已中奖的员工。 - 自动抽奖：根据用户选择的数量自动随机抽取中奖员工，并在Excel表格中显示中奖信息

可以把要做的事存在手机上，按优先顺序和时间显示。<br><br>数据库：rms. 程序中用到两个recordStore。rsTodo用的最常用的方法--把数据读入到objects中，然后存入vector。但是此过程中会多次调用"new",如果记录比较多，特别是频繁读取记录，会大大降低效率。所以第二个recordstore将记录从rms中读出来，不unpack到objects里，直接append到list上，同时用一个数组记录在list上的序列和在rms中的recordID。查询、删除、更新时直接从这个数组中读出recordID然后进行相应操作。<br><br>用Netbeans写的，MIDlet代码用eclipse看可能会有些Netbeans的多余的预置码。