找人做个抽签的程序
问：在一次公开课中，看到讲课的老师在课堂上使用了一个Excel的抽签程序，由抽到相应学号的同学回答提问，这样能增加课堂的气氛，调动学生积极参与，是一种不错的教学策略。答：这位老师想法很有创意，做起来并不难。其实抽签在我们日常生活中很常见，这里我们介绍一个简单的抽签程序的示例，希望能给大家以更多的启示。假设有25个数，每行5个共5行，在数字的下方绘制两个命令按钮，修改其caption属性分别为“抽签攻和“暂停”.双击“抽签”按钮输入代码，其中关键代码如下： k=0:flag=0 Do until flag=1 for i=6 to 10 for j=3 to 7 if k=0 then cells(i,j).select DoEvents '释放程序控制权，允许运行其他事件 k=1 cells(i,j).select end if next next loop关闭代码窗口回到抽签工作表中，单击“抽签”按钮可实现25个单元格的快速依次选中，单击“暂停”按钮可中断抽签程序的执行（即选中其中的一个数字）。再次单击“抽签”按钮可继续抽取数字，这样一个简单的抽签程序就做好了同时按Alt和F11进入宏界面，点菜单的插入，模块，粘贴如下代码： Dim Flag As Boolean Sub aaa() Dim cell As Range Do Until Flag Range("C6:G10").Cells(Int(Rnd() * 25) + 1).Select DoEvents Loop Flag = False End Sub Sub bbb() Flag = True End Sub 回到Excel，在C6:G10输入25个签（代码中的粗体字按实际修改），插入两个图形比如方框，一个写”抽签“，一个写”暂停“，右键点第一个框，指定宏，aaa；右键点第2个框，指定宏，bbb 就可以了。
求一个抽签程序
代码发了N遍发不上来,直接拿走用吧 html>
梦见看电脑
梦到看电脑：运势不错，参与公益活动，正处于提升自我的状况中，对于工作需要以更严谨的态度，衡量规划认真执行。
老人梦到看电脑：运势不佳，身体状况不好，有可能是平时不锻炼身体造成的，建议每天饭后到外面走走，不仅可以消食，还可以锻炼身体。
未婚者梦到看电脑：运势不佳，双方之间经过一翻吵嘴，好好沟通一番之后，希望双方有所改进。
职员梦到看电脑：运势不佳，工作方面与同事发生口舌是非，有可能自己将会被调到其他地方工作。
生意人梦到看电脑：运势不错，感觉在经营木材的生意，将会获得很高的利润，自己非常的开心。
梦见看电脑
梦到看电脑：运势不错，参与公益活动，正处于提升自我的状况中，对于工作需要以更严谨的态度，衡量规划认真执行。
老人梦到看电脑：运势不佳，身体状况不好，有可能是平时不锻炼身体造成的，建议每天饭后到外面走走，不仅可以消食，还可以锻炼身体。
未婚者梦到看电脑：运势不佳，双方之间经过一翻吵嘴，好好沟通一番之后，希望双方有所改进。
职员梦到看电脑：运势不佳，工作方面与同事发生口舌是非，有可能自己将会被调到其他地方工作。
生意人梦到看电脑：运势不错，感觉在经营木材的生意，将会获得很高的利润，自己非常的开心。
我电脑.......(.) 25分
上海市场装机价 P4 3.0 1080（盒装） 威刚512内存 380 WD120G 硬盘 590 铭喧9550 128M显卡 550 三星COMBO 290 主板—精英915 820 17寸LCD 明基BENQ FP71G 2100 微软500精巧套装 155 世纪之星-风云1号或2号（白或黑）180 三诺A103 2.1音箱 85 共计 6230元 从各方面都远超过联想的配置，起码在同类型的配件上要比联想的好。联想的都是OEM代工产品，而上面的配置虽不能说都是高档品牌，但都是性价比比较高的中端产品，价格适中，品质也有保证。除COMBO和机箱还有键鼠音箱外，其他都是三年保以上的。
抽签概率。？？？？？
第一种： (2/20)*(1/19) 第二种: （2/20）*(2/20)
义务献血需要带什么证件,程序是如何的
第一次带上身份证，不是第一次带上身份证和献血证 献血需先验小血（抽取少量检查有无相关不适宜献血的疾病）， 检验合格即开始献血，一般献200-400ml，建议体质不是非常好的人一次200ml。现在献血过程较快，一般5分钟左右（不含验血时间）。 献血后会发一本献血证，多次献血建议带上此证免得证较多，献完凭证可领取部分营养品， 献血者健康检查标准及体检 1、献血者体格检查标准： ⑴年龄：18~55周岁 ⑵体重：男≥50千克，女≥45千克。 ⑶血压：12~20/8~12Kpa，脉压差：≥4Kpa(千帕)。或：90~140/60~90mmHg，脉压差：≥30mmHg ⑷脉搏：60~100次/分，高度耐力的运动员≥50次/分。 ⑸体温正常。 ⑹皮肤无黄染，无创面感染，无大面积皮肤病，浅表淋巴结无明显肿大。 ⑺五官无严重疾病，巩膜无黄染，甲状腺不肿大。 ⑻四肢无严重残疾，无严重功能性障碍及关节无红肿。 ⑼胸部：心肺正常（心脏生理性杂音可视为正常）。 ⑽腹部：腹平软，无肿块，无压痛，肝脾不肿大。 2、献血者血液检验标准： ⑴血型：ABO血型（正反定型法） Rho(D)血型，在有条件的地区以及Rh阴性率高的地区作测定。 ⑵血比重筛选：硫酸铜法 男≥1.052，女≥1.050，或者比色法。 ⑶丙氨酸氨基转移酶（ALT）酮体粉法：阴性，或者赖氏法：≤25单位。 ⑷乙型肝炎病毒表面抗原（HBsAg）酶标法：阴性（快速诊断法仅限于非固定采血点的初检使用） ⑸丙型肝炎病毒抗体（HCV抗体）酶标法：阴性。 ⑹艾滋病病毒抗体（HIV抗体）酶标法：阴性。 ⑺梅毒试验RPR法或TRUST法：阴性。 ⑻复检上述⑴⑵⑶⑷⑸⑹⑺项。 ⑼甲型肝炎临床治愈一年后连续三次每次间隔一个月化验正常可参加献血（以临床化验报告为准）。 ⑽疟疾高发地区检测疟原虫。
简述发现火情的报警程序
发现火情应该首先拨打火警电话报警，然后把发生火灾的详细址说清楚比如某个区的某条街道某个小区住宅或者某个工作单位及某个公私门市房和某个其他什么地方发生火灾事故现场详细地址一定说清楚省得说错延误第一时间到达火灾现场救火，还要跟火警工作人员说清消防车顺什么街那条胡同等等能顺利的到达火灾现场救火，这也是为了人民财产或者公司财产及生命权限减到最低程度。
去医院验血型需要哪些程序
挂号、开单、交费、抽血、等结果。
收养弃婴需要经过哪些程序
我国收养法第六条规定： 收养人应当同时具备下列条件： 1.无子女； 2.有抚养教育被收养人的能力； 3.未患有在医学上认为不应当收养子女的疾病； 4.年满30周岁。 [领养儿童手续]领养儿童条件及手续 领养条件： （1）夫妇双方均年满30周岁； （2）有抚养教育被收养人的能力； （3）未患有医学上认为不应当收养子女的疾病； （4）夫妇双方收养意见必须一致； （5）无配偶的男性收养女性弃婴（儿童）的,收养人与被收养人的年龄应当相差40周岁以上； （6）被收养人必须是社会福利机构抚养的查找不到生父母的弃婴、儿童,年龄不满14周岁。 申办手续: （1）收养人应提交的证件、证明： a、申请书。内容包括收养原因和目的,对被收养人不遗弃、不虐待,抚养其健康成长的保证； b、护照和海外居住证明；香港居民身份证、香港居民来往内地通行证或者香港同胞回乡证；澳门居民身份证、澳门居民来往内地通行证或者澳门同胞回乡证；在台湾地区居住的有效证明、中华人民共和国主管机关签发或签注的在有效期内的旅行证件； c、经居住国外交机关或者外交机关授权的机构认证,并经中国驻该国使领馆认证的,由收养人居住国有权机构出具的或经国家主管机关委托的香港委托公证人证明的或澳门地区有权机构出具的或经台湾地区公证机关公证的,关于收养人的年龄、婚姻、有无子女、职业、财产、健康、有无受过刑事处罚等状况的证明材料； d、意愿书。被收养人年满10周岁以上的,须提交本人愿意被收养的意愿书。 E、照片。收养人与被收养人二寸合影照2张（彩色或黑白均可）； （2）送养单位应提交的证件、证明： a、主要负责人的身份证；(复印件) b、弃婴、儿童进入儿童福利院的原始记录和集体户籍证明； c、公安机关出具的捡拾弃婴、儿童报案证明,孤儿生父母死亡或法院宣告死亡的证明； d、弃婴公告； e、儿童医院出具的被送养人送养前的健康检查或病残证明； f、收养 。
