VisualBasic程序设计案例教程 第3章 赋值与输入输出

VisualBasic程序设计案例教程 第3章 赋值与输入输出

ID:45860128

大小:413.00 KB

页数:37页

时间:2019-11-18

VisualBasic程序设计案例教程 第3章 赋值与输入输出_第1页
VisualBasic程序设计案例教程 第3章 赋值与输入输出_第2页
VisualBasic程序设计案例教程 第3章 赋值与输入输出_第3页
VisualBasic程序设计案例教程 第3章 赋值与输入输出_第4页
VisualBasic程序设计案例教程 第3章 赋值与输入输出_第5页
资源描述:

《VisualBasic程序设计案例教程 第3章 赋值与输入输出》由会员上传分享,免费在线阅读,更多相关内容在行业资料-天天文库

1、第3赋值与输入输出掌握VB中赋值语句和常用基本语句的用法理解掌握print方法输出数据理解并熟练运用窗体和基本控件的运用熟练运用对话框教学重点与难点:VB程序设计中数据的输入和输入,掌握VB程序设计数据输入和输出的两种实现:方法和相关控件第3章赋值与输入输出【案例说明】1.已知a=5,b=7,计算c=的值。2.设计一个“万年历”程序,用来查看某年的元旦是星期几,运行结果如图3.1所示:分析1:此案例赋值语句的运用,后面会详细讲,还会用到求平方根函数应该是(sqr)读者可以参考第二章的函数表。分析2:要求输入的年份的元旦是星期几,除了相关的赋值语句外,还要会求任

2、何一年的元旦是周几的式子,现给出如下:,k=fmod7。其中[]表示求整,y为某年公元年号,计算出k为星期几,k=0表示星期天。3.1赋值语句案例【技术要点】已知a=5,b=7,计算c=的值。编写的窗体单击事件过程代码如下:PrivateSubForm_Click()DimaAsSingle,bAsSingle,cAsSinglea=5b=7c=Sqr(a*a+b*b)Print”c=”;cEndsub运行程序后单击窗体,输出结果如下:C=8.6023253.1赋值语句案例2.设计一个“万年历”程序,用来查看某年的元旦是星期几,运行结果如图3.1所示:(1)我

3、们先把程序所用的数学式子转为程序语言所表过的格式对应的语言表达式为:f=y+Int(y/4)-Int(y/100)+Int(y/400)+1(2)创建应用程序的用户界面。(3)设置对象属性。如表3.1所示。(4)编写程序代码。编写“查看”按钮(Commandl)单击事件过程代码如下:PrivateSubcommand1_click()DimyAsInteger,fAsInteger,kAsIntegery=Val(Text1.Text)-1f=y+Int(y/4)-Int(y/100)+Int(y/400)+1k=fMod7Text2.Text=kEndSub

4、3.1赋值语句案例相关知识及注意事项关于赋值语句:(1)表达式中的变量必须是赋过值的,否则变量的初值自动取零值(变长字符串变量取空字符)。例如:a=3c=a+b+3,b未赋值,为0,执行后,c值为6。(2)利用赋值语句,可以改变变量的值,因此同一变量在不同时刻可以取不同的值。例变量赋值示例。PrivateSubform_click()a=2Print"*A=";aa=4Print"**A=";aa=a*2+2Print"***A=";aEndSub运行程序后单击窗体,输出结果如下:*A=2**A=4***A=103.1赋值语句案例【案例说明】1.使用Print

5、方法输出全班学生的平均年龄,已知18岁10人,19岁20人,20岁20人,21岁10人。2.使用Tab对输出进行定位,输出结果如右图所示。【技术要点】该应用程序设计步骤如下。1.运用【案例说明】中的第一部份(1)启动VB后,进入代码窗口(可以直接双击窗口),在过框中选择click事件。(2)运行下面的代码:PrivateSubForm_click()DimaAsInteger,bAsInteger,cAsIntegerDimdAsInteger,sAsInteger,mAsSinglea=10:b=20:c=20:d=10s=a+b+c+dm=(a*18+b*

6、19+c*20+d*21)/s'舍入到小数后1位Print"平均年龄:";Int(m*10+0.5)/10EndSub单击窗体,结是在窗体中输入:平均年龄:19.53.3Print方法输出数据和特殊打印格式案例2.运用【案例说明】中的第二部份使用Tab对输出进行定位(1)启动VB后,进入代码窗口(可以直接双击窗口),在过框中选择click事件。(2)运行下面的代码:PrivateSubForm_click()PrintPrintTab(15);"学号";Tab(26);"姓名";Tab(36);"成绩"PrintTab(14);String(27,"-")'输

7、出27个减号字符“-”PrintTab(14);"19011001";Tab(26);"张明明";Tab(36);57PrintTab(14);"19011003";Tab(26);"李小月";Tab(36);69PrintTab(14);"19011012";Tab(26);"王小五";Tab(36);92PrintTab(14);String(27,"-")'输出27个减号字符“-”EndSub3.3Print方法输出数据和特殊打印格式案例相关知识及注意事项1.Print方法Print方法用于在窗体、图片框和打印机上显示或打印输出文本。语法格式:[对象名.

8、]Print[表达式列表]说明:(1)

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

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

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