vb程序设计经典例题

“vb程序设计经典例题”相关的资料有哪些?“vb程序设计经典例题”相关的范文有哪些?怎么写?下面是小编为您精心整理的“vb程序设计经典例题”相关范文大全或资料大全,欢迎大家分享。

《VB程序设计》课堂例题总结

标签:文库时间:2024-12-15
【bwwdw.com - 博文网】

《VB程序设计》课堂例题总结

消息对话框的使用

Private Sub Command1_Click() If Not IsNumeric(Text1) Then

i% = MsgBox(\你输入的不是数字!\警告\ If i = 4 Then Text1.SetFocus Else End Else

MsgBox \你好\欢迎\End If End Sub

求圆的周长与面积

Private Sub Form_Click() Dim r!, s!, c!

Const pi = 3.14159 ?用户声明常量 r = InputBox(\请输入园的半径:\s = pi * r * r c = 2 * pi * r

MsgBox \园的周长为:\ 面积为:\End Sub

计算三角形的面积

Private Sub Command1_Click() Dim a%, b%, c%, s#, area# Dim str1$

a = Val(InputBox(\ b = Val(InputBox(\ c = Val(InputBox(\ s = (a + b + c

《VB程序设计》课堂例题总结

标签:文库时间:2024-12-15
【bwwdw.com - 博文网】

《VB程序设计》课堂例题总结

消息对话框的使用

Private Sub Command1_Click() If Not IsNumeric(Text1) Then

i% = MsgBox(\你输入的不是数字!\警告\ If i = 4 Then Text1.SetFocus Else End Else

MsgBox \你好\欢迎\End If End Sub

求圆的周长与面积

Private Sub Form_Click() Dim r!, s!, c!

Const pi = 3.14159 ?用户声明常量 r = InputBox(\请输入园的半径:\s = pi * r * r c = 2 * pi * r

MsgBox \园的周长为:\ 面积为:\End Sub

计算三角形的面积

Private Sub Command1_Click() Dim a%, b%, c%, s#, area# Dim str1$

a = Val(InputBox(\ b = Val(InputBox(\ c = Val(InputBox(\ s = (a + b + c

VB程序设计

标签:文库时间:2024-12-15
【bwwdw.com - 博文网】

《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、 随机访问模式

(八)数据库

C语言程序设计入门经典例题

标签:文库时间:2024-12-15
【bwwdw.com - 博文网】

1、加法练习程序:由用户通过键盘输入加数和被加数,程序显示加法式子,用户通过键盘作答后,程序给出正确与错误提示信息。要求:利用C的选择语句if条件语句或switch开关语句,键盘输入数据前,程序会出被输入数据的信息提示。 #include void main(){ int a,b,c;

printf(\ printf(\

printf(\;scanf(\if(a+b==c)

printf(\else

printf(\}

个人感觉这个程序最不好的地方是,不管回答正确还是回答错误,程都会立即结束,所以我用了do?while实现一个回答错误之后获得再次回答机会的循环,则程序修改如下: #include void main(){ int a,b,c;

printf(\请输入一个加数:\\n\,&a); printf(\请输入一个被加数:\\n\do {

printf(\请回答:a+b=\;scanf(\if(a+b!=c)

printf(\请再想一想\\n\}

while(a+b==c)

printf(\回答正确!\}

2、判闰年程序:判断某一年是否闰年? 要求:程序首先提示用户从键盘输入4位数年份,程序能显示“XXXX年是闰年”

VB程序设计习题

标签:文库时间:2024-12-15
【bwwdw.com - 博文网】

练习一

一、选择题

1、下面列出的程序设计语言中( A )是面向问题的语言。 A、机器语言 B、汇编语言

C、高级语言 D、0、1二进制语言

解释:机器语言和汇编语言都是面向机器的语言,二进制语言为机器语言,故其为面向机器的语言 2、下面列出的程序设计语言中( C )不是面向对象的语言。 A、C B、C++ C、Java D、VB 3、下列( D )不属于VB 6.0的版本。

A、学习版 B、专业版 C、企业版 D、共享版

解释:VB6.0共有三个版本:标准版、专业版、企业版。而其中的标准版是为初学者了解基于windows的应用程序开发而设计的,也可称为学习版。 二、填空题

1、从程序设计语言发展过程的角度来分类,计算机程序设计语言分:机器语言、汇编语言和高级语言。 2、VB 6.0采用了面向对象、事件驱动(可视化编程)的编程机制。

3、启动VB 6.0后可以从“现存”选项卡选择并打开系统中现存的工程文件。

练习二

一、选择题

1、如果窗体对象的名称为Forma1,Backcolor是窗体对象的一个属性,用来设置窗体的背景色,那么设置窗体背景色为

VB程序设计习题

标签:文库时间:2024-12-15
【bwwdw.com - 博文网】

练习一

一、选择题

1、下面列出的程序设计语言中( A )是面向问题的语言。 A、机器语言 B、汇编语言

C、高级语言 D、0、1二进制语言

解释:机器语言和汇编语言都是面向机器的语言,二进制语言为机器语言,故其为面向机器的语言 2、下面列出的程序设计语言中( C )不是面向对象的语言。 A、C B、C++ C、Java D、VB 3、下列( D )不属于VB 6.0的版本。

A、学习版 B、专业版 C、企业版 D、共享版

解释:VB6.0共有三个版本:标准版、专业版、企业版。而其中的标准版是为初学者了解基于windows的应用程序开发而设计的,也可称为学习版。 二、填空题

1、从程序设计语言发展过程的角度来分类,计算机程序设计语言分:机器语言、汇编语言和高级语言。 2、VB 6.0采用了面向对象、事件驱动(可视化编程)的编程机制。

3、启动VB 6.0后可以从“现存”选项卡选择并打开系统中现存的工程文件。

练习二

一、选择题

1、如果窗体对象的名称为Forma1,Backcolor是窗体对象的一个属性,用来设置窗体的背景色,那么设置窗体背景色为

VB程序设计重点

标签:文库时间:2024-12-15
【bwwdw.com - 博文网】

VB程序设计部分 重点程序

08管理VB程序设计部分1.

几里德算法)求两个自然数的最大公约数的算法。

(欧Private Sub Form_Click() Dim n%, m%, g%

n = InputBox("输入N") m = InputBox("输入M") g = gcd(n, m)

Print n; "和"; m; "的最大公约数是:"; g Private Function gcd(ByVal a%, ByVal b%) End Sub

Dim r As Integer r = a Mod b Do While r <> 0 a = b b = r

gcd = b

Loop r = a Mod b End Function

2. 存放在数组编写一个数组,随机产生compare中,并从中找出一个最12个两位数,大数和一个最小数

VB程序设计题库

标签:文库时间:2024-12-15
【bwwdw.com - 博文网】

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

VB试卷(VB程序设计基础) - 图文

标签:文库时间:2024-12-15
【bwwdw.com - 博文网】

VB科期中试卷

班级: 姓名: 座号: 成绩:

一、选择题(每题1分,共35分)

1.以下4个选项中,属性窗口未包含的是( )。

A、对象列表 B、工具箱 C、属性列表 D、信息栏 2.事件的名称( )。

A、都是由系统预先定义 B、都要由用户定义 C、有的由用户定义,有的由系统定义 D、是不固定的 3.窗体的caption属性值是( )类型的数据。 A、整型 B、字符型 C、逻辑型 D、实型

4..改变控件在窗体中的左右位置应修改该控件的( )属性。 A、Top B、Left C、Width D、Right 5.为了装入一个VB应用程序,应当( )。 A、分别装入工程文件和标准模块文件 B、只装入窗体模块文件

C、只装入工程文件

D、分别工程文件、窗体文件和标准模块文件 6.以下进入代码窗口的方法中错误的是( )

VB程序设计上机题目

标签:文库时间:2024-12-15
【bwwdw.com - 博文网】

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

VB程序设计上机题目

45

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

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

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

(1)在名称为Form1,标题为\图片\的窗体上画1个名称为Image1的图像框,其

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

图片文件pic1.jpg,并使图片适应图像框的大小(如图所示)。 注意:

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

为sjt1.frm。

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