郑州大学vb实验报告册答案

郑州大学vb实验报告册答案

ID:30459754

大小:17.53 KB

页数:11页

时间:2018-12-30

郑州大学vb实验报告册答案_第1页
郑州大学vb实验报告册答案_第2页
郑州大学vb实验报告册答案_第3页
郑州大学vb实验报告册答案_第4页
郑州大学vb实验报告册答案_第5页
资源描述:

《郑州大学vb实验报告册答案》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库

1、为了适应公司新战略的发展,保障停车场安保新项目的正常、顺利开展,特制定安保从业人员的业务技能及个人素质的培训计划郑州大学vb实验报告册答案  郑州大学VB实验报告书参考答案。。以下内容均来自百度文库,所以仅供参考。。  不过经亲自测试习题及实验的答案基本正确,除了实验题的3,4小题没有改字形字体颜色什么的。。  实验一  一、选择题  DDBAB,C(CD)DDC,ADDCA  二、填空题  Windows  中断  工具箱  代码  分类  有语法错误  错误  事件  结构化  文件名和结构  工程  编写代码目的-通过该培训员工可对保安行业有初步了解,并感受到安保行业的发

2、展的巨大潜力,可提升其的专业水平,并确保其在这个行业的安全感。为了适应公司新战略的发展,保障停车场安保新项目的正常、顺利开展,特制定安保从业人员的业务技能及个人素质的培训计划  双击任意控件或右健快捷菜单选“代码窗口”  vb的安装文件夹  属性  方法  font  load  对象  三、编程  1-1  PrivateSubCommand1_Click()  PrintSqr(8),8^(1/3)  EndSub  1-2  PrivateSubCommand2_Click()  Fori=100To110  PrintSqr(i)  Nexti  EndSub  1-3

3、  PrivateSubCommand3_Click()  Print"郑州大学在前进!"  EndSub目的-通过该培训员工可对保安行业有初步了解,并感受到安保行业的发展的巨大潜力,可提升其的专业水平,并确保其在这个行业的安全感。为了适应公司新战略的发展,保障停车场安保新项目的正常、顺利开展,特制定安保从业人员的业务技能及个人素质的培训计划  1-4  PrivateSubCommand4_Click()  Label1="蓝天、白云、绿水、青山"  EndSub  实验二  一  BCBCC,CBBDA,CCCBA,CBDCC  二  form_click()  inter

4、val,5000  vbp,frm  top,left,height,width,像素  picture  load  locked  font,alignment  gotfocus,lostfocus  属性窗口,代码  三  2-1  PrivateSubCommand1_Click()  Label3=Text1*Text2目的-通过该培训员工可对保安行业有初步了解,并感受到安保行业的发展的巨大潜力,可提升其的专业水平,并确保其在这个行业的安全感。为了适应公司新战略的发展,保障停车场安保新项目的正常、顺利开展,特制定安保从业人员的业务技能及个人素质的培训计划  EndS

5、ub  PrivateSubCommand2_Click()  Label3=Text1/Text2  EndSub  2-2  PrivateSubCommand1_Click()  =True  Picture1=LoadPicture("C:DocumentsandSettingsAllUsersDocumentsMyPictures示例图片Water")  EndSub  PrivateSubCommand2_Click()  =True  Picture1=LoadPicture("C:DocumentsandSettingsAllUsersDocu

6、mentsMyPictures示例图片")  EndSub  PrivateSubCommand3_Click()  =False  EndSub  2-3  PrivateSubCommand1_Click()目的-通过该培训员工可对保安行业有初步了解,并感受到安保行业的发展的巨大潜力,可提升其的专业水平,并确保其在这个行业的安全感。为了适应公司新战略的发展,保障停车场安保新项目的正常、顺利开展,特制定安保从业人员的业务技能及个人素质的培训计划  Label3=Text1*Text2  EndSub  2-4  PrivateSubCommand1_Click()  T

7、ext2=Text1  EndSub  PrivateSubCommand2_Click()  Text1=""  Text2=""  EndSub  PrivateSubText1_Change()  =True  =True  EndSub  2-5  PrivateSubCommand1_Click()  =500  EndSub  PrivateSubCommand2_Click()  =0  EndSub  PrivateSubTimer1_Timer()目的-通过该培训员工可对保

当前文档最多预览五页,下载文档查看全文

此文档下载收益归作者所有

当前文档最多预览五页,下载文档查看全文
温馨提示:
1. 部分包含数学公式或PPT动画的文件,查看预览时可能会显示错乱或异常,文件下载后无此问题,请放心下载。
2. 本文档由用户上传,版权归属用户,天天文库负责整理代发布。如果您对本文档版权有争议请及时联系客服。
3. 下载前请仔细阅读文档内容,确认文档内容符合您的需求后进行下载,若出现内容与标题不符可向本站投诉处理。
4. 下载文档时可能由于网络波动等原因无法下载或下载错误,付费完成后未能成功下载的用户请联系客服处理。