信息技术会考vb上机编程模拟题new

信息技术会考vb上机编程模拟题new

ID:18550239

大小:1010.50 KB

页数:72页

时间:2018-09-18

信息技术会考vb上机编程模拟题new_第1页
信息技术会考vb上机编程模拟题new_第2页
信息技术会考vb上机编程模拟题new_第3页
信息技术会考vb上机编程模拟题new_第4页
信息技术会考vb上机编程模拟题new_第5页
资源描述:

《信息技术会考vb上机编程模拟题new》由会员上传分享,免费在线阅读,更多相关内容在教育资源-天天文库

1、2009信息技术会考VB上机编程模拟题说明:下列练习题是模拟系统中的一部分,要求学生平时练习时为每道题建一个专用文件夹,文件夹的名称可与窗体的Caption属性相同。会考时共有四道编程题,其中A类题、B类题、C类题、D类题各一题。A类(每题8分)说明:A类题以顺序结构的解析算法为主,解决学生在数学、物理和生活中遇到的简单计算问题。用到的控件有:标签框、文本框、滚动条、命令按钮等。A01、编写加法器,在文本框中输入两个数,单击“计算”求和并显示结果;单击“清除”清除各项数值。PrivateSubCommand1_Click()   a=Val(Tex

2、t1.Text)   b=Val(Text2.Text)   c=a+b   Label4.Caption=cEndSubPrivateSubCommand2_Click()   Text1.Text=""   Text2.Text=""   Label4.Caption=""EndSubA02、编写计算水果价钱的程序。在文本框中输入水果的购买量。单击“一级”时按2.5元/kg计价,单击“二级”按2元/kg计价,并在价钱框中显示价钱。单击“清除”清除各框数据;单击“退出”退出程序。PrivateSubCommand1_Click()   Text1

3、.Text=""   Label3.Caption=""EndSubPrivateSub    b=a*2.5    Label3.Caption=bEndSubPrivateSubOption2_Click()   a=Command2_Click()   EndEndSubPrivateSubOption1_Click()    a=Val(Text1.Text)Val(Text1.Text)   b=a*2   Label3.Caption=bEndSubA03、已知y=x3+

4、x-10

5、+4,编程求y的值。要求:在文本框中输入x的值,单击“

6、计算”按钮后在“y”框中显示y的值;单击“退出”按钮退出程序。PrivateSubCommand1_Click()   x=Val(Text1.Text)   y=x^3+Abs(x-10)+4   Label3.Caption=yEndSubPrivateSubCommand2_Click()   EndEndSubA04、编程实现:在“半径”框中输入圆的半径,单击“确定”按钮时,“周长”、“面积”框中显示圆的周长和面积。PrivateSubCommand1_Click()   r=Val(Text1.Text)   c=2*3.14*r   s

7、=3.14*r^2   Label4.Caption=c   Label5.Caption=sEndSubA05、编程计算圆锥的体积。要求:输入圆锥的半径与高度,单击“计算”按钮可以计算出圆锥的体积并显示出来;单击“清除”按钮可以清除各项数值。提示:V=πhr2,π取3.14PrivateSubCommand1_Click()   r=Val(Text1.Text)   h=Val(Text2.Text)   v=1/3*r^2*h   Label4.Caption=vEndSubPrivateSubCommand2_Click()   Text1

8、.Text=""   Text2.Text=""   Label4.Caption=""EndSubA06、华氏温度(F)与摄氏温度(C)之间的转换关系为: 。编程实现:若用户在文本框中输入一个摄氏温度,单击“转换”按钮可以换算成华氏温度,并显示出来;单击“清除”按钮可以清除各温度值。PrivateSubCommand1_Click()   a=Val(Text1.Text)   b=a*9/5+32   Label3.Caption=bEndSubPrivateSubCommand2_Click()   Text1.Text=""   Label

9、3.Caption=""EndSubA07、某市近20年的生产总值情况如下:第1年是1000亿元,以后平均每年以5%的速度增长,通过滚动条求各年份该市生产总值是多少?提示:某年生产总值=PrivateSubHScroll1_Change()   n=HScroll1.Value   z=1000*(1+0.05)^(n-1)   Label2.Caption=n   Label4.Caption=zEndSubPrivateSubForm_Load()   HScroll1.Min=1   HScroll1.Max=20EndSubA08、已知计算

10、人口增长的公式是:,其中pl为所求人口数,p为人口基数,r为年增长率,n为经过的年头。已知2000年我国有13.25亿人口

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

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

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