VB程序设计教程 实验2答案.doc

41011066付乾峰资源1103实验2自测练习1，程序Private Sub Command1_Click()Dim ss = Text1.TextLabel1.Caption = Left(s, 2)End SubPrivate Sub Command2_Click()Dim ss = Text1.TextLabel2.Caption = Right(s, 2)End SubPrivate Sub Command3_Click()Dim ss = Text1.TextText1.Text = Label1.Caption & Label2.CaptionEnd Sub截图自测练习2，程序Private Sub Command1_Click()Dim m%, a%, b%, c%, d%m = Val(Text1.Text)a = m Mod 10b = m 10 Mod 10c = m 100 Mod 10d = m 1000a = (a + 7) Mod 10b = (b + 7) Mod 10c = (c + 7) Mod 10d = (d + 7) Mod 10Print 加密前的4位整数是 & mPrint 加密后的结果是 & a & b & c & dEnd SubPrivate Sub Command2_Click()EndEnd Sub截图“我和校庆合张影，我给校庆送祝福”北京科技大学学生公寓九斋活动策划一、 活动名称“我和校庆合张影，我给校庆送祝福”北京科技大学学生公寓九斋活动二、 活动意义1. 在校庆前，表达九斋学员对北科60年校庆的祝福2. 展现九斋学子积极向上的精神风貌 3.加深学生与楼层长之间的友谊便于以后的管理 4.调动大家对校庆的热情与关注欲望 5.增进同学与同学之间的联系 活动地点及时间地点：九斋一楼大厅校篮球场时间：2011年3月20日-25日三、 活动对象北京科技大学九斋公寓所有学生四、 内容：1. 活动时间推进表时间任务3月19日-3月24日 成立策划小组，完成活动策划，确定活动主题、模式、流程等基本情况； 成立出题组、宣传组、财务组、后勤保障组进行前期的活动准备3月24日-3月29日向九斋全体学员征集照片；给每个宿舍成员一张祝福卡片，征集好的祝愿词；采购奖品；做好前期活动宣传3月29日4月6日 将收集的照片编辑，美化，用计算机软件做成照片墙展布； 安排工作人员及明确分工； 派层长去照一些反应九斋成员精神风貌的特写照片 继续做好宣传，让同学们多多配合4月6日-4月15 找到展布打印店，将做成的照片打印成展布； 购置合适大小的展板用来贴祝愿词4月15日-4月22日 将做成的展布挂在篮球场边的围栏； 将写上祝愿词的展板放在九斋宿舍内。 将活动成果转化及后期宣传 根据建议墙的同学们意见进行适当调整2.活动宣传途径（1）条幅、展板的平面宣传（2）人人平台及微博的网络宣传（3）楼、层长与宿舍长信息平台的短信宣传五、 经费预算项目资金预算/元合计1000 （不清楚展板展布的收费情况，等具体了解后再做详细预算）六、 活动中应注意的问题和细节：1、随时保持与公寓自律委员会中心联系，确保信息的顺畅沟通及工作进度报告；2、各工作人员必须保持高度责任感，明确此次活动不仅是在为同学服务，同时也涉及到学生楼、层