全文预览已结束
下载本文档
版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
VB程序设计实验报告 实验日期:2010.09.16 一、实验目的与要求理解变量与常量的概念、定义及使用,并且理解程序设计的算法及算法表示;掌握各种常用数据类型的数据在内存中的存放形式,选择及循环控制语句的运用;了解自定义数据类型,各种运算符、表达式的使用方法,顺序结构程序设计方法;会用常用的内部函数,并且能够灵活运用各种选择结构进行和循环控制进行综合程序设计。二、实验内容1.设计一个字符大小写转换程序,当在文本框Text1中输入大写字母,在文本框Text2中同时显示其小写字母;当在文本框Text1中输入小写字母,在文本框Text2中同时显示其大写字母;当输入其他字符,则在文本框Text2中原样输出。2. 编写华氏温度与摄氏温度的转换程序,转换公式如下:F = 95 c + 32 摄氏温度转化为华氏温度,F为华氏温度C = 59 F -32 华氏温度转化为摄氏温度,C为摄氏温度要求按两种方法进行转换。(1) 用命令按钮实现转换,即单击“转换华氏”按钮,则将摄氏温度转换成华氏温度;同样,单击“转换摄氏”按钮,则将华氏温度转换成摄氏温度。(2) 不用命令按钮,当文本输入时直接完成转换。当用户在“摄氏温度”文本输入框内输入值后按回车键,自动将摄氏温度转换成华氏温度;同样,华氏转换成摄氏的方法也是如此。三、实验步骤第一题实验步骤;(1) 将label1、label2的caption属性写为“输入文本”;(2) 将text1、text2的内容清空;(3) 将form1的caption属性改为“字符大小写转换”。第二题实验步骤(1) 将命令按钮Command1、Command2的caption属性改为“转换华氏”、“转换摄氏”,并统一大小,设置间距;(2) 将label1、label2的caption属性改为“摄氏温度”、“华氏温度”,并设置字体大小。(3) 将text1、text2的内容清空;四、程序代码第一题实验代码:Private Sub Text1_KeyPress(KeyAscii As Integer)Select Case KeyAsciiCase 0 To 64Text2.Text = Text2.Text + Chr(KeyAscii)Case 65 To 90Text2.Text = Text2.Text + Chr(KeyAscii + 32)Case 97 To 122Text2.Text = Text2.Text + Chr(KeyAscii - 32)Case ElseKeyAscii = 0End SelectEnd Sub第二题实验代码:Private Sub Command1_Click()Dim f!, c!c = Text1.Textf = 9 / 5 * c + 32Text2.Text = fEnd SubPrivate Sub Command2_Click()f = Text2.Textc = 5 / 9 * (f - 32)Text1.Text = cEnd SubPrivate Sub Text1_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Thenc = Text1.Textf = 9 / 5 * c + 32Text2.Text = fEnd IfSelect Case KeyAsciiCase 48 To 57, 8, 46Case ElseKeyAscii = 0End SelectEnd SubPrivate Sub Text2_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Thenf = Text2.Textc = 5 / 9 * (f - 32)Text1.Text = cE
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 2024-2029年管理培训行业分析及发展趋势预测报告预测
- 2024-2029年中国高铁座椅行业市场现状分析及竞争格局与投资发展研究报告
- 2024-2029年中国驱虫灭害器具行业市场发展现状及发展趋势与投资前景研究报告
- 2024-2029年中国食用色素行业深度调研及投资前景预测研究报告
- 2024-2029年中国音乐培训行业十四五发展分析及投资前景与战略规划研究报告
- 电力信息化行业并购重组操作与风险策略研究报告
- 2024-2029年中国陶瓷刚玉行业市场现状分析及竞争格局与投资发展研究报告
- 2024-2029年中国阴离子型加脂剂行业市场现状分析及竞争格局与投资发展研究报告
- 2024-2034年中国影视行业市场全景分析及投资策略研究报告
- 2024-2029年中国牛肉丸行业发展分析及市场竞争格局与发展前景预测研究报告
- 岗位序列、职等职级及薪酬管理规定.doc
- 垂直分型无箱射压造型线应用中地几个标准工艺规范问题
- 英语语法之被动语态
- 数学绘本阅读买卖国的乘法队长
- Excel函数产生的多维引用及其应用
- 部编版三年级下册语文非连续性文本阅读含答案
- 《我是霸王龙》绘本故事PPT课件
- 2钢结构安装工程综合劳动定额
- 《中央企业领导班子和领导人员考核评价办法》
- 地铁工程交通疏解施工组织设计
- genderdiscrimination性别歧视PPT课件
评论
0/150
提交评论