vb程序设计上机实验教程答案

演讲稿 工作总结 调研报告 讲话稿 事迹材料 心得体会 策划方案

VB程序设计上机题目

45

1. 基本操作（2小题，每小题15分，共计30分） 注意：下面出现的\考生文件夹\均为%USER%

**********************************************************************

请根据以下各小题的要求设计Visual Basic应用程序（包括界面和代码）。

（1）在名称为Form1，标题为\图片\的窗体上画1个名称为Image1的图像框，其

高为2500，宽为2000。请通过属性窗口设置适当属性，装入考生目录下的

图片文件pic1.jpg，并使图片适应图像框的大小（如图所示）。 注意：

存盘时必须存放在考生文件夹下，工程文件名为sjt1.vbp，窗体文件名

为sjt1.frm。

***********************************************************

实验A A．1

Private Sub Command1_Click() Label3 = Text1 End Sub

A．2

Private Sub Form_Load() Timer1.Interval = 0 End Sub

Private Sub Command1_Click() '自动 Timer1.Interval = 200 End Sub

Private Sub Command2_Click() '手动 Timer1.Interval = 0 Call MyMove End Sub

Private Sub Timer1_Timer() Call MyMove End Sub

Sub MyMove()

Label1.Move Label1.Left - 50

If Label1.Left < 0 Then Label1.Left = Form1.Width End Sub

A．3

Private Sub Form_Click() Text1 = Val(Text1) + 1 End Sub

Private Sub Form_Load() Text1 = 0 End Sub

A．4

Private Sub Form_Click()

Caption

实验A A．1

Private Sub Command1_Click() Label3 = Text1 End Sub

A．2

Private Sub Form_Load() Timer1.Interval = 0 End Sub

Private Sub Command1_Click() '自动 Timer1.Interval = 200 End Sub

Private Sub Command2_Click() '手动 Timer1.Interval = 0 Call MyMove End Sub

Private Sub Timer1_Timer() Call MyMove End Sub

Sub MyMove()

Label1.Move Label1.Left - 50

If Label1.Left < 0 Then Label1.Left = Form1.Width End Sub

A．3

Private Sub Form_Click() Text1 = Val(Text1) + 1 End Sub

Private Sub Form_Load() Text1 = 0 End Sub

A．4

Private Sub Form_Click()

Caption

第3章 程序控制结构

1.1 选择结构部分

一、选择题

1 B 17 C 2 A 18 C 3 D 19 B 4 B 20 D 5 D 21 B 6 D 22 B 7 A 23 C 8 D 24 A 9 C 25 D 10 C 26 D 11 D 27 A 12 B 28 A 13 A 29 C 14 D 30 C 15 A 31 C 16 A 32 D 二、填空题 1. OK!

NO! ERROR! 2. x=1 y=0

x=2

3. ch>=’A’&& c<=’Z’ ch=ch-32 4. -1 5. x=6 6. （1）2

（2）3

CC

a=2,b=2,c=4 7. （1）a

（2）a>c&&b>c （3）a

三、程序设计题

1. #include

#define pi 3.14159 main( ) { int k;

float r,c,a;

printf(“input r,k\\n”); scanf(“%f%d”,&r,&k); switch(k) {

case 1: a=pi*r*r; printf(“area=%f\\n”,a);break; case 2: c=2*pi*r;printf(“circle=%f\\n”,c

课 程 号：10010402

适用专业：全校非计算机专业 制 定 人：

教 研 室：计算机公共基础教研室

计算机科学与信息工程学院 2007 年5 月 前言

VB语言是一种被广泛学习、普遍使用的计算机程序设计语言。它的高级语言行式、低级语言功能具有特殊的魅力。由于VB语言具有完整的编程语言特点，因而被大多数高等院校作为典型的计算机教学语言。在计算机等级、全国计算机应用证书考试等多种计算机知识考试中都有VB语言。此外，VB语言作为一门实用的、功能强大的程序语言，被程序设计人员广泛使用。因此，VB语言是一门十分重要的程序设计语言。

《VB语言程序设计》课程，面向全校非计算机专业的本科生开设计算机基础课。以VB语言为平台，介绍程序设计的思想和方法。通过学习，不仅使学生掌握高级编程语言的知识、编程技术和基本算法，更重要的是掌握程序设计的思想和方法，具备利用计算机求解实际问题的基本能力，能灵活应用高级语言进行程序设计。

本实验指导书中详细介绍了每个实验的目的、实验内容，并在方法上给出了指导，希望对同学们的学习能够有所

实 验 报 告

实验日期_____________________

实验名称： 实验一 常用标准控件一

【实验目的与要求】

1.掌握Visual Basic的启动与退出。 2.熟悉Visual Basic的集成开发环境。 3.掌握在窗体中放置控件的方法。

4.掌握在“属性窗口”中设置控件属性的方法。

5.掌握在“代码编辑器”窗口中输入程序代码的方法。 6.掌握工具栏上启动按钮、结束按钮的使用方法。

7.掌握标签、文本框、命令按钮、列表框等控件的使用方法。

【实验内容与步骤】

实验1.1.1 标签的使用(一)

1.题目与要求：在名称为Form1、标题为“标签”的窗体上画一个名称为Label1的标签，并设置适当属性以满足以下要求：

1)标签的内容为“计算机等级考试”； 2)标签可根据显示内容自动调整其大小； 3)标签带有边框，且标签内容显示为三号字。 2.实验步骤

1)界面设置：在名称为Form1的窗体上放置一个标签控件Label1； 2)属性设置（请将表格补充完整）

表1.1.1 对象属性

对 象 Form1 属性名称 Caption Caption Label1 AutoSize Font BorderStyle 标签 计算机等级

Visual Basic 程序设计学习与实验指导答案

上篇 学习指导

第1章 Visual Basic 概述

1. 事件 2. 查看对象 3. 工程

4. 视图 属性窗口 5. 窗体编辑器

第2章 面向对象程序设计初步

1. 控件 2. 事件 3. 类 属性 4. 属性 5. 略 6. Name

第3章 Visual Basic 语言基础

1. (a*sin(30/180*3.14)+c*(log(b)/log(10)))/((Abs(d)+1)*(e+f))+1

2. mod

3. X=Int(X) And Y=Int(Y) And X*Y>0

4. 4.Y Mod 4=0 And Y Mod 100<>0 Or Y Mod 400=0 5. x=Int((99-10+1)*Rnd+10) 6. 0 “” 7. 空格

8. 6，845.30 9. （1）8 （2）1 （3）abcd

（4）出错，类型不匹配 （5）False

（6）2008-6-29 （7）I likeVB （8）4 （9）4 4 （10）3 4 （11）10 -10 （12）-1 （13）aa （14）3 （15）0 （16）1 （17）C （18）5 （19）

《VB程序设计教程》（第3版）习题解答

习题1答案

一、选择题

1.1 Visual Basic 6.0分为3种版本，不属于这3种版本的是 A）学习版 B）专业版 C）企业版 D）业余版 【答】D。

1.2 下列方法中不能退出Visual Basic的是 A）按Alt+Q组合键

B）按下Alt+F组合键，然后按Esc键 C）按F10键，然后按F键，再按X键 D）打开“文件”菜单→“退出”命令 【答】B。

1.3 Visual Basic集成的主窗口中不包括 A）属性窗口 B）标题栏 C）菜单栏 D）工具栏 【答】A。

1.4 下列操作可以打开立即窗口的是 A）Ctrl+D B）Ctrl+F C）Ctrl+G D）Ctrl+E 【答】C。 二、填空题

1.5 与传统的程序设计语言相比，Visual Basic最突出的特点是____。 【答】事件驱动编程机制。

1.6 如果不使用鼠标，用键盘打开菜单和执行菜单命令，第一步应按____键。

【答】功能键F10或Alt键。

1.7 建立一个新的标准模块，应该选择____菜单下的“添加模块”命令。 【答】“工程”菜单。

三、思考题

1.8 简述Visua

上机实验五 循环结构程序设计

姓名：

学号:

姓名：

本次实验一共5个题目，4个必做，一个选做

我建的浙师大c程序设计群，群号为：185106065，大家加入下，验证信息请写为班级+姓名。

我打算以后把每次实验的答案（我写的代码）都放到群共享里面，大家可以在群里讨论下不会的地方或者不同的实现方法。

！！！！！重要提醒：邮件主题和本word文件名统一用 班级+学号+姓名+实验几 命名（学号和姓名记得不能少），不然我在检查作业提交情况时可能会漏掉！！！！！

一．目的要求

1． 掌握用for、while、do-while语句实现循环的基本技巧； 2． 掌握循环次数不确定的解题技巧；

3． 掌握break语句、continue语句在循环语句中的作用以及不同之处； 4． 掌握多重循环的编程技巧。 二．实验内容

【实验题1】. 程序填空：分别用for、while、do-while语句编程，输出菲波那契数列的前20项，要求每行输出10项。

源程序1： 用for语句实现 #include void main() { int i,x1,x2,x; x1=x2=1; printf(\ /*Line 5: 输

(此文档为word格式，下载后您可任意编辑修改！)

台州学院

《VB程序设计》实验报告

实验1.1 设计一个程序，程序运行的初始界面如图1-1所示。当单击“显示”按钮时，在文本框中显示“欢迎使用VB！”（图1-1）；当单击“清除”按钮时，清除文本框内的文本；当单击“退出”按钮时，结束程序运行。 Private Sub Command1_Click() Text1.Text = \欢迎使用VB！\End Sub

Private Sub Command2_Click() Text1.Text = \End Sub

Private Sub Command3_Click() End End Sub

实验1.2 设计一个程序，程序运行的初始界面如图1-3所示，其中“显示”按钮为不可用。同时要求：

（1）当单击“改变文字”按钮时，在左边标签文字内容改为“你好，张三！”，同时“改变文字”按钮变为不

1 可用（图1-4）；

（2）当单击“隐藏”按钮时，将左边标签设为不可见，同时“隐藏”按钮变为不可用，“显示”按钮变为可用（图1-5）；

（3）当单击“显示”按钮时，重新显示左边标签，同时“隐藏”按钮变为可用，“显示”

Privat