实验二实验报告_第1页
实验二实验报告_第2页
实验二实验报告_第3页
实验二实验报告_第4页
实验二实验报告_第5页
已阅读5页,还剩14页未读 继续免费阅读

付费下载

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

实验报告课程名称VISUALBASIC程序设计实验项目顺序结构程序设计一、实验目的1掌握窗体、标签、文本框、命令按钮的常用属性、方法和时间的使用。2理解常量、变量、数据类型、运算符和表达式的使用。3掌握常用内部函数的功能和使用。4掌握赋值语句、END语句、INPUTBOX函数和MSGBOX语句的使用。5掌握计时器空间的使用。二、实验内容(任选4个题目)1实验21【内容描述】实际一个利用标签制作文字阴影效果的程序。单机阴影按钮,标签文字出现黑色阴影,此时恢复按钮变为可用,阴影按钮变为不可用,单击恢复按钮,则恢复到原来的文字效果。【分析】(1)界面分析(用到哪些控件)窗体、命令按钮。(2)程序分析(用到哪些算法和关键技术)1利用两个标签制作阴影效果,两个标签显示的文字相同,字体相同,但颜色不同,作为阴影现实的标签文字为黑色;两个标签的位置不同,在属性窗口中调整提昂个标签的TOPHE和LEFT属性值,时期产生交错的阴影效果;在程序中通过设置阴影标签的VISIBLE属性即可实现阴影或取消阴影的效果。2通过设置按钮的ENABLED属性可是按钮变为可用或不可用状态。【设计】(1)界面设计(给出界面截图)(2)代码设计(给出程序代码)PRIVATESUBCMDNEW_CLICKLABEL1VISIBLETRUECMDOLDENABLEDTRUECMDNEWENABLEDFALSEENDSUBPRIVATESUBCMDOLD_CLICKLABEL1VISIBLEFALSECMDOLDENABLEDFALSECMDNEWENABLEDTRUEENDSUB【运行结果】(给出运行结果界面截图)2实验22【内容描述】设计一个简单的文本操作程序。单机隶书按钮,可以设置文字的字体为隶书;单击放大和缩小按钮,可以改变文字的大小;单机复制按钮,可以将选择的文字复制到右侧的文本框,单击剪切按钮,可以讲选择的文字剪切到右侧文本框。【分析】(1)界面分析(用到哪些控件)命令按钮、文本框、标签、窗体。(2)程序分析(用到哪些算法和关键技术)1通过设置问问你笨矿的FONT属性乐意改变文本框中文本的字体和字号。2在复制和剪切功能中,需要将选中的你诶荣及其字体格式复制或剪切到右侧的文本框。3通过文本框的SELTEXT属性可以获得选中的内容。【设计】(1)界面设计(给出界面截图)(2)代码设计(给出程序代码)PRIVATESUBCOMMAND1_CLICKTEXT1FONTNAME“隶书“ENDSUBPRIVATESUBCOMMAND2_CLICKTEXT1FONTSIZETEXT1FONTSIZE1ENDSUBPRIVATESUBCOMMAND3_CLICKTEXT1FONTSIZETEXT1FONTSIZE1ENDSUBPRIVATESUBCOMMAND4_CLICKTEXT2TEXTTEXT1SELTEXTTEXT2FONTNAMETEXT1FONTNAMETEXT2FONTSIZETEXT1FONTSIZEENDSUBPRIVATESUBCOMMAND5_CLICKTEXT2TEXTTEXT1SELTEXTTEXT1SELTEXT“TEXT2FONTNAMETEXT1FONTNAMETEXT2FONTSIZETEXT1FONTSIZEENDSUBPRIVATESUBFORM_LOADTEXT1TEXT“欲穷千里目,更上一层楼“ENDSUB【运行结果】(给出运行结果界面截图)1实验23【内容描述】实际一个华氏温度与摄氏温度之家转换的程序。首先在指定的文本框中输入数据,然后单击摄转华按钮,即可将摄氏温度转化为华氏温度;单击划转舍按钮即可将华氏温度转化微微摄氏温度,单击清楚按钮,则将文本框中的数据清除,并将输入焦点赚为化石文本框中,等待输入新的数据;推出按钮,则结束程序进行。【分析】(3)界面分析(用到哪些控件)窗体、命令按钮、文本框、标签。(4)程序分析(用到哪些算法和关键技术)可以通过FORMAT函数控制计算结果保留两位小数。【设计】(1)界面设计(给出界面截图)(2)代码设计(给出程序代码)PRIVATESUBCOMMAND1_CLICKDIMF,CFVALTEXT1TEXTC5/9F32TEXT2TEXTFORMATC,“000“ENDSUBPRIVATESUBCOMMAND2_CLICKDIMF,CCVALTEXT2TEXTF9/5VALTEXT2TEXT32TEXT1TEXTFORMATF,“000“ENDSUBPRIVATESUBCOMMAND3_CLICKTEXT1TEXT“TEXT2TEXT“TEXT1SETFOCUSENDSUBPRIVATESUBCOMMAND4_CLICKENDENDSUB【运行结果】(给出运行结果界面截图)1实验24【内容描述】设计一个简单的四则运算计算器程序。在文本框输入数据,单击命令按钮,即可的到运算结果单击清楚即可清除文本框数据。【分析】(5)界面分析(用到哪些控件)窗体、命令按钮、文本框、标签。(6)程序分析(用到哪些算法和关键技术)通过文本框的TEXT属性指控可以事先清除数据【设计】(1)界面设计(给出界面截图)(2)代码设计(给出程序代码)PRIVATESUBCMDADD_CLICKLABEL3CAPTIONVALTEXT1TEXTVALTEXT2TEXTENDSUBPRIVATESUBCMDEXIT_CLICKENDENDSUBPRIVATESUBCMDSUB_CLICKLABEL3CAPTIONVALTEXT1TEXTVALTEXT2TEXTENDSUB【运行结果】(给出运行结果界面截图)1实验25【内容描述】打印一个三角形图案的程序。在行数文本框输入行数,字符文本框输入要打印的字符单击图案按钮即可显示三碱性的图案单击清除按钮即可清除图案单击推出按钮则推出程序。【分析】(7)界面分析(用到哪些控件)窗体、命令按钮、文本框、标签、计时器。(8)程序分析(用到哪些算法和关键技术)使用两个计时器控件控制图案的打印【设计】(1)界面设计(给出界面截图)】(2)代码设计(给出程序代码)DIMNASINTEGERDIMCHASSTRINGPRIVATESUBCOMMAND1_CLICKDIMHASINTEGERN0HVALTEXT1TEXTCHTEXT2TEXTTIMER2INTERVALH1200TIMER1ENABLEDTRUETIMER2ENABLEDTRUEENDSUBPRIVATESUBTIMER1_TIMERNN1PRINTTAB28NSTRING2N1,CHENDSUBPRIVATESUBTIMER2_TIMERTIMER1ENABLEDFALSETIMER2ENABLEDFALSEENDSUBPRIVATESUBCOMMAND2_CLICKCLSENDSUBPRIVATESUBCOMMAND3_CLICKENDENDSUB【运行结果】(给出运行结果界面截图)1实验26【内容描述】设计一个计算构成所发工资的各种面额钞票张数最少的付款方案【分析】(9)界面分析(用到哪些控件)文本框、按钮(10)程序分析(用到哪些算法和关键技术)可以通过整除运算计算某种面额钞票的张数,通过求余运算计算去掉该种面额后剩余的工资数【设计】(1)界面设计(给出界面截图)(2)代码设计(给出程序代码)PRIVATESUBCOMMAND1_CLICKDIMXASLONG,YASLONGXVALTEXT1TEXTYX100TEXT2TEXTYXXMOD100YX50TEXT3TEXTYXXMOD50YX20TEXT4TEXTYXXMOD20YX10TEXT5TEXTYXXMOD10YX5TEXT6TEXTYXXMOD5TEXT7TEXTXENDSUBPRIVATESUBCOMMAND2_CLICKTEXT1TEXT“TEXT2TEXT“TEXT3TEXT“TEXT4TEXT“TEXT5TEXT“TEXT6TEXT“TEXT7TEXT“TEXT1SETFOCUSENDSUB【运行结果】(给出运行结果界面截图)2实验27【内容描述】倒计时,计时器【分析】(3)界面分析(用到哪些控件)计时器(4)程序分析(用到哪些算法和关键技术)使用计时器控件控制倒计时,通过整除和求运算计算出剩余的时间【设计】(1)界面设计(给出界面截图)(2)代码设计(给出程序代码)DIMTASINTEGERPRIVATESUBCOMMAND1_CLICKTVALTEXT1TEXT3600VALTEXT2TEXT60TIMER1ENABLEDTRUECOMMAND1ENABLEDFALSECOMMAND2ENABLEDTRUEENDSUBPRIVATESUBCOMMAND2_CLICKCOMMAND1ENABLEDTRUECOMMAND2ENABLEDFALSETIMER1ENABLEDFALSEENDSUBPRIVATESUBCOMMAND3_CLICKENDENDSUBPRIVATESUBTIMER1_TIMERDIMHASINTEGER,MASINTEGER,SASINTEGERTT1HT3600MT60MOD60STMOD60LABEL5CAPTIONH“小时“M“分“S“秒“ENDSUB【运行结果】(给出运行结果界面截图)8实验28【内容描述】计算出两点的距离【分析】(5)界面分析(用到哪些控件)用文本框接收(6)程序分析(用到哪些算法和关键技术)使用INPUTBOX函数实现点的坐标的输入使用MSGBOX语句输出计算的结果【设计】(1)界面设计(给出界面截图)(2)代码设计(给出程序代码)DIMAXASINTEGER,AYASINTEGERDIMBXASINTEGER,BYASINTEGERPRIVATESUBCOMMAND1_CLICKDIMXASSTRINGDIMNASINTEGERXINPUTBOX“请输入第一个点的坐标X,Y,以“,”分隔“,“输入点坐标“NINSTRX,“,“AXVALLEFTX,N1取左边的数字AYVALRIGHTX,LENXNXINPUTBOX“请输入第二个点的坐标X,Y,以“,”分隔“,“输入点坐标“NINSTRX,“,“BXVALLEFTX,N1BYVALRIGHTX,LENXNLABEL5CAPTIONAXLABEL6CAPTIONAYLABEL7CAPTIONBXLABEL8CAPTIONBYENDSUBPRIVATESUBCOMMAND2_CLICKDIMRESULTASSINGLERESULTSQRAXBX2AYBY2TEXT1TEXTFORMATRESULT,“000“ENDSUBPRIVATESUBCOMMAND3_CLICKENDENDSUB【运行结

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论