vb程序设计题目及答案上机题

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

VB程序设计上机题目

45

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

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

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

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

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

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

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

为sjt1.frm。

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

9、Visual Basic程序改错

1. 程序功能：求s=1+3+5+7+...直到s>2000为止。程序中有两行有错误。改正错误，使它能输出正确的结果。 (2025) 平方和

Private Sub Form_Click()

Dim i As Integer, s As Long s = 0 : i = 1

Do Until s < 2000 s = s + i i = i + 1 Loop Print s End Sub

答案：s>2000 ; i+2

2. 程序功能：计算s=2!+4!+8!。程序中有两行有错误。

改正错误，使它能输出正确的结果。 (40346) Private Sub Command1_Click()

Dim k As Integer, i As Integer Dim s As Long, t As Long s = 0 i = 1

Do While i <= 3 t = 1 k = 1

While k <= 2*i t = t * k k = k + 1 Wend s = s + t i = i + 1 wend Print s End Sub

答案：k<=2^i ; loop

3. 程序功能：计算s=2!+4!+6!+8!。程序中有错误。改正错误，使它能输出正确的结果。 (41066) Private Sub Command1_Click()

Dim k As Integer, i As Integer Dim s As Long, t As Long s = 0 : i = 1

Do While

首字母大写

Time Limit:1000MS Memory Limit:65536K

Total Submit:588 Accepted:427

Description

对一个字符串中的所有单词，如果单词的首字母不是大写字母，则把单词的首字母变成大写字母。在字符串中，单词之间通过空白符分隔，空白符包括：空格(' ')、制表符('\\t')、回车符('\\r')、换行符('\\n')。

Input

输入一行：待处理的字符串（长度小于80）。

Output

输出一行：转换后的字符串。

Sample Input

if so, you already have a google account. you can sign in on the right.

Sample Output

If So, You Already Have A Google Account. You Can Sign In On The Right.

Source

? ? ? ? ? ? ? ? ? ?

#include using namespace std; int main() {

string b; while(cin>>b) {

if(b[

第一部分 链表相关联系

1．做一个函数fun(int,int)。在主函数中定义两个变量int a,b。请设计一个程序能够反映值传递无法对实参进行改变。

2．做一个函数fun(int &,int &)。在主函数中定义两个变量int a,b。请设计一个程序能够反映引用传递对实参的改变。

3．做一个函数fun(int *,int *)。在主函数中定义两个变量int a,b。请设计一个程序能够反映指针传递对实参的改变。 4．定义一个结构体 Struct A { };

a.请手动建立一个含有三个元素的链表，链表中所有的元素都是A类型的。

b.请用图来描述你的建表过程。 c.请手动插入一个节点。 d.请手动删除一个节点。

e.请将上述内容改成自动的过程，也就是用循环结构。 f.请做一个查找函数，完成对某个节点的查找。 int a; A *p;

第一部分 类和对象

1． 集合是具有共同属性（共性）而又能互相区别（个性）的多个成员的汇集起来的整体，

构成集合的每个成员称为集合的元素，元素间没有顺序关系。例如：所有的大写英文字母是一个集合，它包括26个元素：A，B，…，Z。不包含任何元素的集合称为空集合。 【要求】自定义一个集合类set，采用数组存放集合的

《VISUAL BASIC》教学执行大纲

(试行稿)

[适用于计算机应用专业(学分制) 100学时]

(二○○八年二月制订)

一、课程内容 （一）概 论

1、VISUAL BASIC发展概述 2、VB.NET 语言及特点简介 3、VB.NET集成开发环境

（二）数据类型与运算表达式

1、 对象和类 2、 属性、事件和方法 3、 变量与数据类型 4、 运算符与表达式 5、 结构类型及其数组

(三)控制结构

1、 顺序结构 2、 选择结构 3、 循环结构 4、 其他控制语句

（四） 数 组

1、 数组定义及基本操作 2、 数组排序 3、 结构类型及引用 4、 结构数组及应用

（五）函数过程

1、 函数过程的定义和调用 2、 子过程的定义与调用 3、 参数传递 4、 函数的递归调用

1

（六）常用标准控件

1、 常用控件 2、 鼠标事件 3、 键盘事件 4、 用户界面设计

（七）文件操作

1、 文件及其结构 2、 顺序访问模式 3、 随机访问模式

（八）数据库

《程序设计语言VB》单选题

1. Visual Basic是一种面向（ ）的程序设计语言。

A. 用户 B. 事件 C. 程序 D. 对象

2. 在Visual Basic6.0中规定工程文件的扩展名是（ ）。

A. vbp B. for C. frm D. bas

3. Visual Basic6.0中规定窗体文件的扩展名是（ ）。

A. for B. frm C. vbp D. bas

4. 如何使一个标签或按钮控件在运行时不可用（ ）。

A. 把它的Visible属性设置成False B. 把它的Visible属性设置成True C. 把它的Enabled属性设置成False D. 把它的Enabled属性设置成True

5. 控件的字体可在属性窗口的（）属性中调整？

A. Font B. Color C. Text D. Caption

6. 若要将某命令按钮设置为默认命令按钮。则应设置为True的属性是（ ）。

A. Value B. Cancel C. Default D. Enabled

7. 在VB中，记录对象数据的是（）。

A. 方法 B. 事件 C. 属性 D. 语句

第 1 页 共 13 页

8. 在文本框上显示文本的属

第一部分 链表相关联系

1．做一个函数fun(int,int)。在主函数中定义两个变量int a,b。请设计一个程序能够反映值传递无法对实参进行改变。

2．做一个函数fun(int &,int &)。在主函数中定义两个变量int a,b。请设计一个程序能够反映引用传递对实参的改变。

3．做一个函数fun(int *,int *)。在主函数中定义两个变量int a,b。请设计一个程序能够反映指针传递对实参的改变。 4．定义一个结构体 Struct A { };

a.请手动建立一个含有三个元素的链表，链表中所有的元素都是A类型的。

b.请用图来描述你的建表过程。 c.请手动插入一个节点。 d.请手动删除一个节点。

e.请将上述内容改成自动的过程，也就是用循环结构。 f.请做一个查找函数，完成对某个节点的查找。 int a; A *p;

第一部分 类和对象

1． 集合是具有共同属性（共性）而又能互相区别（个性）的多个成员的汇集起来的整体，

构成集合的每个成员称为集合的元素，元素间没有顺序关系。例如：所有的大写英文字母是一个集合，它包括26个元素：A，B，…，Z。不包含任何元素的集合称为空集合。 【要求】自定义一个集合类set，采用数组存放集合的

C语言上机程序设计题库

【程序设计】

功能：根据整型形参m，计算如下公式的值：y=sin(m)*10。 【参考代码】 double y=0; y=sin(m)*10; return(y);

功能：若x、y为奇数，求x到y之间的奇数和；若x、y为偶 数，则求x到y之间的偶数和。 【参考代码】 int i,s=0;

for(i=x;i<=y;i+=2) s=s+i; return s;

功能：编写程序，实现矩阵（3行3列）的转置（即行列互换） 【参考代码】 int i,j,t;

for(i=0; i < 3; i++) for(j=0; j < i; j++) { t=array[i][j]; array[i][j]=array[j][i]; array[j][i]=t; }

功能：求一个四位数的各位数字的立方和。 【参考代码】 int d,s=0; while (n>0) {d=n; s+=d*d*d; n/=10;

}

return s;

功能：请编一个函数void fun(int tt[M][N],int pp[N])， tt指向一个M行N列的二维数组，求出二维数组每列 中最小元素，并依次放入pp所指一维数组中。二维 数组中的数已在主函数中赋予。 【参考代码】 int i,j;

for(j=0;j

pp[j]=tt[0]

VB课后习题解答

第一、二章：

1、 简述VB6.0的主要特点

答：方便、直观的可视化设计工具；面向对象程序设计方法；事件驱动的编程机制；易学易用的应用程序集成开发环境；结构化程序设计语言；完备的联机帮助功能；强大的多媒体、数据库和网络功能。 2、 当正常安装VB6.0后，误把Windows子目录删除。当重新安装Windows后，是否需要再次安装VB6.0？

答：要重新安装的。因为安装VB6.0时，有些VB程序被系统自动安装在Windows目录下，所以一旦删除Windows子目录，就必须重新安装VB6.0。

3、 Visual Basic 6.0分为学习版、专业版和企业版，如何知道所安装的是哪个版本？

答：在VB6.0的启动界面上，能显示对应的版本。 4、 叙述建立一个完整应用程序的过程

答：首先建立用户界面的控件对象（简称控件）；然后对控件属性进行设置；再对控件事件过程及编程；保存应用程序；程序调试和运行。

5、 Visual Basic 6.0有多种类型窗口，若要在设计时看到代码窗口，应怎样操作？

答：选择“视图”—>“代码窗口”命令或单击“工程资源管理器”窗口中的“查看代码”按钮。 6、 当建立好一个简单的应用程序后，假定该

一、单选 共300题 （共计300分）

滚动条的( )属性用于指定用户单击滚动条的滚动箭头时,Value属性值的改变量. A:Value B:LargeChange C:Change D:SmallChange 答案：D

运行时,当用户向文本框输入新的内容,或在程序代码中对文本框 的TEXT属性进行赋值从而改变了文本框的TEXT属性值时,将触发文 本框的()事件. A:CLICK B:DBLCLICK C:GOTFOCUS D:CHANGE 答案：D

要获得用户在组合框输入的内容,应利用的组合框的属性是( ). A:List B:ListIndex C:Selected D:Text 答案：D

输入对话框InputBox的返回值的类型是 . A:长整数

1

B:字符串 C:浮点数 D:整数 案：B

要使得标签能自动扩充以满足字体大小则可对其()属性进行设置. A:alignment B:usemnemonic C:autosize D:tag 答案：C

假设变量BOOLVAR是一个布尔型变量,则下面正确的赋值语句是(). A:BOOLVAR='TRUE' B:BOOLVAR=.TRUE. C:BOOLVAR=#TR