实验报告VB程序设计
VB程序设计的实验报告
VB程序设计的实验报告VB程序设计的实验报告引言：VB（Visual Basic）是一种广泛应用于Windows操作系统的编程语言，它具有简单易学、功能强大的特点，被广泛用于开发各种桌面应用程序。
本文将介绍我在VB程序设计实验中的学习和实践经验。
一、实验目的本次实验的主要目的是让我们学习并掌握VB程序设计的基本知识和技巧，通过实践编写简单的应用程序，提升我们的编程能力和解决问题的能力。
二、实验环境在实验中，我们使用了Visual Studio作为开发工具。
Visual Studio是一款功能强大的集成开发环境，它提供了丰富的开发工具和调试功能，极大地方便了我们的开发工作。
三、实验内容在实验中，我们主要完成了以下几个实验任务：1. 界面设计：首先，我们需要设计程序的界面，包括窗体、按钮、文本框等控件的布局和样式。
通过拖拽控件、设置属性等操作，我们可以快速创建出一个漂亮的界面。
2. 事件处理：接下来，我们需要为各个控件添加事件处理程序。
当用户点击按钮或输入文本时，我们的程序需要做出相应的反应。
通过编写事件处理程序，我们可以实现各种功能，如计算、数据处理等。
3. 数据存储：在实验中，我们还学习了如何使用VB提供的数据库连接工具，将数据存储到数据库中。
通过编写SQL语句，我们可以实现数据的增删改查等操作，方便我们对数据进行管理和分析。
四、实验心得通过本次实验，我对VB程序设计有了更深入的了解和掌握。
在实验中，我遇到了一些困难和问题，但通过不断尝试和学习，我最终成功完成了实验任务。
首先，我学会了如何使用VB的开发工具和调试功能。
Visual Studio提供了许多方便的功能，如自动补全、调试器等，它们大大提高了我们的开发效率和代码质量。
其次，我学会了如何设计程序的界面。
一个好的界面设计可以使用户更加方便地使用我们的程序，并提升用户体验。
通过实验，我学会了如何合理布局控件、设置属性，使界面更加美观和易用。
最重要的是，我学会了如何编写事件处理程序。
VB实验报告(含答案)
If Check1.Value = 1 Then
Label1.FontBold = True
Else
Label1.FontBold = False
End If
If Check2.Value = 1 Then
Label1.FontItalic = True
Else
Label1.FontItalic = False
图1.1实验1-1运行界面
三．实验结果：对象属性设置
对象
属性
属性值
说明
Form1
caption
我的第一个vb程序
窗体
Label1
caption
请输入姓名
标签
Text1
text
““
文本框
Command1
caption
显示
命令按钮
Command2
caption
清除
命令按钮
四．实验思考：
1.标签label控件设置的属性代码有哪些？
加粗
复选框
Check2
Caption
倾斜
复选框
Check3
Caption
下划线
复选框
Check4
Caption
删除线
复选框
四．实验思考：
1.模拟简易计算器Command1命令的单击事件的程序代码是什么？
Private Sub Command1_Click()
Dim a!, b!
Dim c As String
If Option1.Value = True Then
Label1.FontName = “宋体”
ElseIf Option2.Value = True Then
(最新版)VB程序设计实验报告
湖北文理学院VB程序设计课程实验报告学院物电学院专业自动化班级 1211学号姓名王亮任课教师王福林实验一、VB控制结构一、实验目的1.掌握选择语句的使用2.掌握循环语句的使用二、实验内容1、选择语句程序1：创建应用程序。
要求：单击窗体可弹出输入框，任意输入三个数，然后按从小到大的顺序输出到窗体上。
程序2：创建应用程序。
要求：单击窗体可弹出一输入框，任意输入一个正整数，在窗体上显示该整数是否为素数的字样。
2、循环语句程序3：创建应用程序。
要求：单击窗体可显示一个由“*”组成的平行四边形图案。
程序4：创建应用程序，其功能是显示所有的水仙花数。
三、实验记录程序1如下：Private Sub Command1_Click()Dim a As Integer, b As Integer, c As Integer, t As Integer '定义a,b,c,t为整形变量Cls '清屏a = Val(InputBox("请输入第1个数：")) '给a赋值b = Val(InputBox("请输入第2个数：")) '给b赋值c = Val(InputBox("请输入第3个数：")) '给c赋值If a > b Then t = a: a = b: b = t '如果a>b，把a的值赋给t，b的值赋给a，t的值赋给bIf b > c Then '嵌套，如果b>ct = b: b = c: c = t '把b的值赋给t，b的值赋给c，t的值赋给cIf a > b Then '再次嵌套，如果a>bt = a '把a的值赋给ta =b 'b的值赋给ab = t 't的值赋给bEnd IfEnd IfPrint a; "、"; b; "、"; c '输出 a "、"b;"、"; c End SubPrivate Sub Command2_Click()End '退出程序End Sub程序2如下：Private Sub Command1_Click()Dim i As Integer, k As Integer, n As Integer '定义整形变量i,k,n n = Val(InputBox("任意输入一个整数：")) '给n输入值i = 2 'i初始值为2k = Int(n / 2) '为整形的二分之一n的值赋给kDo While i <= k '当i小于且等于k If n Mod i = 0 Then '如果n模除i为0 Exit Do '退出循环Elsei = i + 1 '否则i加1End IfLoopIf i > k Then Print n; "是素数" Else Print n; "不是素数" '如果i大于k，输出n的值是素数，否则输出n的值不是素数End SubPrivate Sub Command2_Click()End ' 退出程序End Sub程序3如下：Private Sub Form_Click()Dim m As Integer, n As Integer '定义整形变量m,nCls '清屏PrintFor m = 1 To 6 'm赋初始值为1，当m大于6停止 Print Tab(15 - m); '第15 - m列开始输出For n = 1 To 8 'n赋初始值为1，当n大于6停止 Print "*"; '输出*Next nPrint "" '输出空格Next mEnd Sub程序4如下：Private Sub Command1_Click()Dim i As Integer, m As Integer, n As Integer, k As Integer, sxh As Intege '定义整形变量i,m,n,k,sxkFor i = 100 To 999 'i赋初始值为100，当i大于999，停止循环 m = i \ 100 'i除以100，结果赋给mn = (i Mod 100) \ 10 'i模除100后的值再除以10,最后结果赋给n k = i Mod 10 'i模除10后的值赋给ksxh = m ^ 3 + n ^ 3 + k ^ 3 'sxh作算术运算If sxh = i Then '如果sxh等于iPrint i, '输出i的值End IfNext iEnd SubPrivate Sub Command2_Click()End '程序结束End Sub四、实验总结实验二、窗体和标准控件一、实验目的1.掌握命令按钮、标签及文本框控件的使用方法2.掌握复选框、单选按钮及框架控件的使用方法3.掌握列表框和组合框控件的使用方法4.掌握滚动条和定时器控件的使用方法二、实验内容1、命令按钮、标签及文本框控件的使用方法程序1：在窗体上建立两个标签、两个文本框和两个命令按钮，运行界面如左图所示。
vb程序实验报告
vb程序实验报告VB 程序实验报告一、实验目的通过本次实验，深入了解和掌握 Visual Basic（VB）程序设计的基本概念、语法和编程技巧，提高解决实际问题的能力，培养逻辑思维和创新能力。
二、实验环境操作系统：Windows 10开发工具：Microsoft Visual Basic 60三、实验内容本次实验主要包括以下几个方面的内容：1、界面设计使用 VB 的窗体设计器，创建一个简单的用户界面，包含文本框、按钮、标签等控件，并设置其属性，如字体、颜色、大小等，以实现美观和友好的用户交互。
2、变量与数据类型在程序中声明不同类型的变量，如整数型（Integer）、字符串型（String）、布尔型（Boolean）等，并进行赋值和运算操作，理解不同数据类型的特点和适用场景。
3、控制结构运用顺序结构、选择结构（IfThenElse、Select Case）和循环结构（ForNext、WhileWend）编写程序，实现条件判断和重复执行的功能，例如计算阶乘、判断素数、打印九九乘法表等。
4、数组与过程定义数组来存储和处理大量的数据，掌握数组的声明、初始化和遍历操作。
同时，学习使用过程（Sub 过程和 Function 过程）来封装可重复使用的代码块，提高程序的可读性和可维护性。
5、文件操作实现对文本文件的读写操作，包括创建文件、写入数据、读取数据和关闭文件，了解文件处理在实际应用中的重要性。
四、实验步骤1、界面设计（1）打开 Microsoft Visual Basic 60，新建一个标准 EXE 工程。
（2）在窗体上添加所需的控件，如文本框 Text1、Text2，命令按钮 Command1、Command2，标签 Label1 等。
（3）通过属性窗口设置各个控件的属性，如 Text1 的 Text 属性为空，Command1 的 Caption 属性为“计算”，Label1 的 Caption 属性为“结果：”等。
实验报告VB程序设计
Else
Label4.Caption = "方程无解"
End If
Else
x1 = (-c) / b
Label4.Caption = "方程有一个解：" & x1
End If
Else
d = b * b - 4 * a * c
t = Sqr(Abs(d))
If (d >= 0) Then
x1 = (-b + t) / (2 * a)
x2 = (-b - t) / (2 * a)
Label4.Caption = "方程有两个实数根： x1=" & x1 & " x2=" & x2
Else
x3 = (-b) / (2 * a)
x4 = t / (2 * a)
Text3.Text = ""
Label4.Caption = ""
End Sub
（4）保存工程，运行程序
3、调试过程及运行结果
4、实验心得
（1）要把求解过程中遇到的情况考虑全面。
（2）要善于利用系统提供的计算函数。
Label4.Caption = "方程有两个复数根： x1=" & x3 & "+" & x4 & "i" & " x2=" & x3 & "-" & x4 & "i"
End If
End If
VB程序设计实验报告
《VB程序设计》实验单元二实验报告专业班级：新闻班姓名：学号：指导教师：完成时间：一、实验题目数组和自定义类型二、实验环境Visual 程序软件三、实验目的1.掌握数组的声明、数组元素的引用。
2.掌握固定长度数组和动态数组的使用差别。
3.掌握数组常用的操作和常用算法。
4.掌握列表框和组合框的使用。
5.掌握自定义类型及数组的使用。
四、实验内容1.随机产生30—100（包括30、100）的10个正整数，求最大值、最小值、平均值，并显示整个数组的只和结果。
2.随机产生20个学生成绩，统计各分数段人数。
即0~59、60~69、70~79、80~89、90~100，并显示结果。
五、实验步骤1.打开VB界面，建立工程2.在窗体窗口设置界面3.属性窗口控件对象属性设置4.编写程序代码5.运行程序及调试6.程序建立，保存工程文件六、实验结果第1题：第2题：七、实验体会编程虽然有些复杂，但是在一步步的学习探索中我也找到了其中的乐趣，看着自己一点点地在进步，真的很兴奋很激动。
2.在这次实验课题中，我在学习、参考书中的案例的同时，还上网查询了一些小的课外知识，例如：如何改变Print之后的字体颜色、字号、位置等并加以尝试、应用。
在我实验成功时，内心真的是抑制不住地开心。
3.当然，实验的过程，并不是一帆风顺的，然而，只要静下心来，仔细思考，问题总能解决的。
“世上无难事，只怕有心人”，在今后的学习中，我也要敢于面对困难、着力解决，把困难看成挑战，努力超越自我。
4.数组很奇妙，我想更进一步地了解它、用VB使用它，掌握常用的操作和算法。
VB实验报告一2024
VB实验报告一（二）引言概述：VB（VisualBasic）是一种面向对象的程序设计语言，广泛应用于Windows操作系统中的软件开发。
本实验报告旨在详细介绍VB实验一（二）的内容与实验结果，并对其进行分析和总结。
正文内容：一、实验目的1.1学习VB语言的基本语法和开发环境的使用；1.2熟悉VB的界面设计和事件处理；1.3掌握VB语言中的数据类型、循环结构和条件语句。
二、实验步骤2.1搭建VB开发环境2.1.1并安装VisualStudio；2.1.2配置VB开发环境。
2.2界面设计2.2.1创建一个新的WindowsForms应用程序；2.2.2在设计窗口中添加控件，如按钮、文本框等；2.2.3设置控件的属性和事件。
2.3事件处理2.3.1编写相应按钮的Click事件处理程序；2.3.2实现按钮的功能，如计算、跳转等。
2.4数据类型的应用2.4.1声明和初始化变量；2.4.2使用不同数据类型进行计算和赋值。
2.5循环结构和条件语句2.5.1使用For循环和While循环实现特定功能；2.5.2利用条件语句实现条件判断。
三、实验结果3.1搭建VB开发环境成功；3.2界面设计符合预期，控件添加和属性设置正确；3.3事件处理程序编写无误，按钮功能正常；3.4数据类型的应用正确，计算和赋值结果准确；3.5循环结构和条件语句的实现正确。
四、分析与讨论4.1在搭建VB开发环境的过程中，可能会遇到版本兼容性问题，需要根据实际情况进行相应的配置和调整；4.2界面设计的合理布局与控件的正确设置对用户体验起到重要作用；4.3事件处理程序的编写需要注意语法的正确性和逻辑的严谨性；4.4在应用不同数据类型进行计算和赋值时，要注意数据类型的转换和溢出的问题；4.5循环结构和条件语句的合理运用能够简化程序的逻辑结构，提高代码的可读性和可维护性。
五、总结通过本次VB实验一（二）的学习和实践，我对VB语言的基本语法和开发环境的使用有了更加深入的了解。
VB程序设计课程实验报告(样本参考一)
计算机与信息学院（VB程序设计课程）实验报告课程名称：VB程序设计教程姓名：系：计算机与信息学院专业：计算机应用技术年级：学号：指导教师：职称：200x 年xx 月xx 日实验项目列表序号实验项目名称成绩指导教师1 VB环境和程序设计初步2 顺序程序设计3 选择结构程序设计4 循环结构程序设计及数组的运用5 过程6 窗体和常用控件7 常用控件8 气泡法排序程序9 实验九10 菜单设计和多文档界面计算机与信息学院实验报告（一）Visual Basic环境和程序设计的初步一、实验目的1、了解Visual Basic系统对计算机软件、硬件的要求。
2、掌握启动与退出Visual Basic的方法。
3、熟悉Visual Basic的集成开发环境（IDE）。
4、掌握在窗体上添加控件的各种方法。
5、掌握建立、编辑、运行和保存一个简单的Visual Basic应用程序的全过程。
二、实验内容1、启动Visual Basic6.0,观察标题栏、菜单栏、工具栏与Microsoft其他应用程序的不同之处；熟悉各个控件以及窗体设计和工程管理器窗口、属性窗口、代码窗口的功能、组成以及它们各种不同的打开方法。
2、在窗体上画一文本框个一个命令按钮，在文本框中显示“VB程序设计”。
（1）编写适当事件过程，当单击命令按钮时，文本框内容消失。
（2）以解释方式运行程序。
（3）把程序保存。
然后关掉该工程。
装入上面建立的程序，并在窗体上增加一个命令按钮。
当单击该命令按钮，结束程序运行。
保存程序。
（4）把当前程序编译为可执行文件。
（5）生成当前工程并退出。
在windows环境下运行该工程。
3、创建一个“标准EXE”类型的应用程序。
要求：在屏幕上显示“欢迎您的到来！”，并请输入您的名字。
三、实验环境Microsoft Visual Basic 6.0 中文版四、算法描述及实验步骤1、熟悉vb的环境。
2、先创建一个文本框和命令按钮，并设置相应的代码如下：Private Sub Form_Load()Text1.Text = "VB程序设计"End SubPrivate Sub Command1_Click()Text1.Text = ""End Sub3、创建两个标签和一个文本框。
VB程序设计实验报告
VB程序设计实验报告实验三选择结构程序设计一、实验目的1. 掌握逻辑表达式的正确书写形式。
2. 掌握单分支与双分支条件语句的使用。
3. 掌握多分支条件语句的使用。
4. 掌握情况语句的使用及与多分支条件语句的区别。
二﹑实验内容4. 编制程序，计算某个学生奖学金的等级（假定只考虑一等奖），以三门功课成绩m1，m2，m3为评奖依据。
奖学金一等奖评定标准如下：(1) 平均分大于95分者。
(2) 有两门成绩是100分，且第三门功课成绩不低于80分者。
5. 编一模拟袖珍计算器的完整程序，界面如图2.3.1所示。
要求：输入两个操作数和一个操作符，根据操作符决定所做的运算。
6．输入一个数字（1～7），用英文显示对应的星期一～星期日。
提示：用Select语句来实现。
三﹑实验步骤4，打开VB后，建立一个命令按钮，输入"奖学金评定"，编辑代码如下:Private Sub command1_Click()Dim m1!, m2!, m3!m1 = InputBox("输入m1 的值")m2 = InputBox("输入m2 的值")m3 = InputBox("输入m3 的值")If (m1 + m2 + m3) / 3 > 95 Or _(m1 = 100 And m2 = 100 And m3 >= 85 Or _m1 = 100 And m3 = 100 And m2 >= 85 Or _m3 = 100 And m2 = 100 And m1 >= 85) ThenMsgBox "一等奖学金"ElseMsgBox "不是一等奖学金"End IfEnd Sub5，打开VB后，建立4个Lebel标签，4个Text文本框，2个Command按钮，如上图。
编辑代码如下：Private Sub Command1_Click()Select Case Trim(Text3)Case "+"Text4.Text = Val(Text1.Text) + Val(Text2.Text)Case "-"Text4.Text = Val(Text1.Text) - Val(Text2.Text)Case "*"Text4.Text = Val(Text1.Text) * Val(Text2.Text)Case "/"Text4.Text = Val(Text1.Text) / Val(Text2.Text)End SelectEnd SubPrivate Sub Command2_Click()EndEnd Sub6, 打开VB后，建立1个Text文本框，1个Command按钮。
VB程序设计实验1实验报告
《VB程序设计》实验报告一、实验目的及要求（见实验书，要求手填）：1.了解系统对计算机软件、硬件的要求。
2.掌握启动与退出的方法。
3.掌握建立、编辑和运行应用程序的全过程。
4.掌握常用控件的使用，如文本框、标签、命令按钮、图片框。
二、实验完成情况：三、界面设计与程序代码要求：给出界面设计示意图，在属性窗口修改过的对象属性需列出，列出方式如下：1、创建一个程序步骤：①在窗体上建立3个标签、一个命令按钮和一个文本框。
②在代码窗口中选择Button1对象Click事件，在Button1-Click事件模板内输入代码。
③单击启动调试按钮运行程序。
④单击工具栏的“全部保存”按钮。
①界面设计②程序代码Public Class Form1Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickLabel3.Text = TextBox1.TextEnd Sub ③运行结果2、左右移动文字步骤：①在窗体上建立1个标签、1个命令按钮、1个定时器。
②在代码窗口分别对3个控件编写代码，最后编写左右移动的单位。
③单击启动调试按钮运行程序。
④单击工具栏的“全部保存”按钮。
①界面设计②程序代码Public Class Form1Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickTimer1.Enabled = TrueEnd SubPrivate Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.ClickTimer1.Enabled = FalseCall mymove()End SubPrivate Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.TickCall mymove()End SubSub mymove()Label1.Left = Label1.Left + 50If Label1.Left > Me.Height Then Label1.Left = 0End SubEnd Class③运行结3、统计鼠标单击窗口的次数步骤：①在窗体上建立一个标签、一个文本框。
VB实验报告_VB简单程序设计
Visual Basic程序设计(A)实验报告题目：Visual Basic简单程序设计院（部）：专业：班级：姓名：学号：指导教师：实验目的：1、熟悉Visual Basic 6.0的集成环境及其基本操作。
2、掌握窗体、命令按钮、标签和文体框等基本控件的使用。
3、掌握一个Visual Basic应用程序的组成及创建方法。
4、理解面向对象编程的机制及编码过程。
5、掌握常量和变量的定义及使用方法。
6、掌握各种运算符的优先级及结合性，掌握内部函数的使用。
实验要求：1、上机完成“实验任务”中提供的题目，在操作过程中务必修改以下内容：(1) 窗体标题为设计界面中的内容加下划线加各自姓名，例如：实验任务1中设计界面中标题内容为：“计算底面积、侧面积、体积”，修改后为“计算底面积、侧面积、体积_张三”(2) 窗体的名称命名为form1加下划线加学号，例如：form1_20120212342、将实验中所修改过的控件的属性及属性值以如下列表的形式添加到实验报告中，如：实验任务1中用到的各控件的属性及属性值如下：3、将上机运行后的界面截图添加到实验报告中。
4、将实验中的详细事件过程（即代码窗口的代码）手写到实验报告中。
5、关于文档格式及内容说明：1）封皮；2）每个题目由实验要求中2-4项内容组成，并在前面加相应文字描述，其中2-3项整理完成后，打印，然后将第4项手写至反面或提前留空处。
实验任务：1、在窗体上画一个文本框Text1和两个命令按钮cmdHide、cmdShow，并把两个命令按钮的标题分别设置为“隐藏文本框”和“显示文本框”。
当单击cmdHide时，文本框消失；而当单击cmdShow时，文本框重新出现，并在文本框中显示“VB 程序设计”。
2、程序界面如下图1所示，要求当按“显示内容”时，文本框中出现“Hello,Visual Basic!”的文字，按“清屏”按钮时，文本框中文字消失，按“结束”按钮时，结束程序执行。
vb程序设计实验报告
vb程序设计实验报告VB程序设计实验报告一、引言在计算机科学与技术领域中，程序设计是一项至关重要的技能。
Visual Basic （VB）作为一种强大的编程语言，被广泛应用于软件开发领域。
本实验报告旨在总结和分析我在VB程序设计实验中的学习和实践经验。
二、实验目的本次实验的主要目的是通过设计和实现一个简单的VB程序，加深对VB语言的理解和掌握。
通过这个实验，我将学习如何使用VB语言进行界面设计、事件处理和数据处理。
三、实验过程1. 界面设计在实验开始时，我首先进行了界面设计。
通过VB的可视化设计环境，我选择了合适的控件，布局了用户界面。
我使用了文本框、标签、按钮等控件，使用户能够输入数据并进行相应的操作。
2. 事件处理在界面设计完成后，我开始编写事件处理程序。
我为按钮添加了点击事件，当用户点击按钮时，程序会执行相应的操作。
例如，当用户点击“计算”按钮时，程序会读取用户输入的数据，并进行计算操作。
通过编写事件处理程序，我学会了如何响应用户的操作，并进行相应的逻辑处理。
3. 数据处理在实验中，我还学习了如何进行数据处理。
我使用了VB的变量和运算符，对用户输入的数据进行计算和处理。
通过编写算法和逻辑，我实现了对用户输入数据的验证和处理，确保程序能够正确运行。
四、实验结果经过一段时间的设计和调试，我成功完成了VB程序的实现。
我的程序可以根据用户输入的数据进行相应的计算，并将结果显示在界面上。
通过这个实验，我不仅巩固了VB语言的基础知识，还提高了自己的编程能力。
五、实验总结通过这次VB程序设计实验，我收获了很多。
首先，我学会了如何使用VB语言进行界面设计，掌握了一些常用的控件和布局方法。
其次，我学习了如何编写事件处理程序，响应用户的操作，并进行相应的逻辑处理。
最后，我还学习了如何进行数据处理，使用变量和运算符对数据进行计算和处理。
在实验过程中，我遇到了一些问题和挑战。
例如，我曾经遇到过界面布局不合理导致用户体验不佳的情况，但通过不断的调整和改进，最终解决了这个问题。
VB程序设计实验报告
一、目的与要求1、目的：（1）要求达到熟练掌握VB语言的基本知识和技能；（2）基本掌握程序设计的基本思路和方法；（3）能够利用所学的基本知识和技能，解决简单程序设计问题。
2、基本要求：（1）要求利用函数调用的方法以及VB语言的编程思想来完成系统的设计；（2）要求在设计的过程中，建立清晰的层次结构；3、创新要求：在基本要求达到后，可进行创新设计。
4、写出设计说明书二、课程的主要内容（1）选题（2）进行系统分析（3）程序设计实现（4）系统测试（5）编写、上交课程设计报告四、设计方法和基本原理1.系统概述随着学校的规模不断扩大，学生数量急剧增加，有关学生的各种信息量也成倍增长。
面对庞大的信息量，需要有学生信息管理系统来提高学生管理工作的效率。
通过这样的系统，可以做到信息的规范管理、科学统计和快速的查询，从而减少管理方面的工作量。
2.功能要求要求完成以下功能：（1）系统有良好的安全性，需要用户登录和密码的保密等等。
（2）从屏幕上读出若干个学生的信息（包括姓名、学号、电话等等）。
（3）能够添加新信息源并记录在案。
（4）能将指定的个人信息删除。
（5）能按学号直接查询个人信息。
（6）系统过程间的衔接与提示要明确。
3.系统的窗体以及各模块的功能系统开发的总任务是实现学生信息关系的系统化、规范化和自动化。
系统主要由五部分组成：系统用户的管理、学生信息的管理、学生学籍信息的管理、信息的查询，其中还包括登录界面。
3.1各窗体如下：⏹Form1: 登录界面，需要有效的用户名和登录密码。
⏹Form2：信息管理，信息的浏览、信息的修改、信息的添加以及删除等主功能。
Form3：对学生信息进行全部浏览五、系统设计图1.总体结构设计2.数据库设计六、系统的实现现在已经完成了程序各个功能模块的创建，现在可以进行系统的实现了。
1.登录界面第一个界面，登录的实现。
需要存在的用户名和有效的密码，才能成功的进入学生信息管理系统。
通过以下代码来实现：Private Sub Command1_Click()Dim i As IntegerIf Text2.Text <> "182533" Theni = MsgBox("密码错误", 5 + vbExclamation, "警告")If i <> 6 ThenText2.Text = ""Text2.SetFocusEnd IfElseForm1.HideForm2.ShowEnd IfEnd SubPrivate Sub Form_Load()Text1.Text = ""Text1.MaxLength = 12Text2.Text = ""Text2.MaxLength = 6Text2.PasswordChar = "*"End SubPrivate Sub Text1_LostFocus()If Not IsNumeric(Text1.Text) ThenMsgBox "账号必须为数字", , "警告"Text1.Text = ""Text1.SetFocusEnd IfEnd Sub2.主管理窗口主管理窗口包含绝大多数的功能，来实现与操作整个学生信息管理系统。
vb程序设计实验报告
vb程序设计实验报告VB程序设计实验报告实验目的：通过VB程序设计，掌握基本的程序设计方法和技巧，提高编程能力。
实验内容：本次实验主要是通过VB程序设计，实现一个简单的学生成绩管理系统。
该系统可以实现学生信息的录入、查询、修改和删除功能，同时还能够计算学生的平均成绩并进行排名。
实验步骤：1. 设计界面：首先，我们需要设计一个简洁易用的界面，包括学生信息的录入、查询、修改和删除功能。
通过VB的窗体设计工具，我们可以轻松地实现界面的布局和美化。
2. 编写代码：接下来，我们需要编写VB程序代码，实现学生成绩管理系统的各项功能。
通过VB的编程语言，我们可以实现学生信息的录入、查询、修改和删除功能，以及成绩的计算和排名功能。
3. 调试程序：完成代码编写后，我们需要对程序进行调试，确保程序的各项功能能够正常运行。
通过调试，我们可以及时发现和解决程序中的bug，提高程序的稳定性和可靠性。
4. 测试程序：最后，我们需要对程序进行测试，验证程序的各项功能是否能够满足实际需求。
通过测试，我们可以发现程序中可能存在的问题，并及时进行修复和优化。
实验结果：经过一段时间的努力，我们成功地实现了一个简单的学生成绩管理系统。
该系统能够实现学生信息的录入、查询、修改和删除功能，同时还能够计算学生的平均成绩并进行排名。
通过本次实验，我们不仅掌握了基本的程序设计方法和技巧，还提高了自己的编程能力。
结论：通过本次实验，我们深刻认识到了程序设计的重要性，以及通过VB程序设计可以实现复杂功能的能力。
同时，我们也意识到了编程过程中需要细心和耐心，以及对程序进行不断地调试和测试，才能确保程序的质量和稳定性。
希望通过不断地实践和学习，我们能够不断提高自己的编程能力，为实现更多复杂功能的程序做好准备。
VB程序设计实验报告
中南财经政法大学实验报告
实验课名称：__ _VB程序设计 ___ 学生姓名：__ _ ____张琳___________ 专业班级：__ _信息0904班_____ 学号：__ __
开课时间：2010-2011学年第1学期
教务处制
《VB程序设计》实验报告
实验序号：1 实验项目名称：VB程序设计基础、三种基本结构、输入输出、常用控件和函数
《VB程序设计》实验报告实验序号：2 实验项目名称：用户交互、数组
《VB程序设计》实验报告
实验序号：3 实验项目名称：子过程和函数过程、字符串和日期时间
《VB程序设计》实验报告
实验序号：4 实验项目名称：处理图形、设计用户界面、文件系统、数据库、网络编程、多媒体。
程序设计语言(VB)实验报告
华北科技学院计算机学院综合性实验
实验报告
课程名称程序设计语言（VB）
实验学期 2011 至 2012 学年第 2 学期学生所在系部
年级专业班级
学生姓名学号
任课教师李芙玲
实验成绩
计算机学院制
实验报告须知
1、学生上交实验报告时，必须为打印稿（A4纸）。
页面空间不够，可以顺延。
2、学生应该填写的内容包括：封面相关栏目、实验地点、时间、目的、设备环境、
内容、结果及分析等。
3、教师应该填写的内容包括：实验成绩、教师评价等。
4、教师根据本课程的《综合性实验指导单》中实验内容的要求，评定学生的综合
性实验成绩；要求在该课程期末考试前将实验报告交给任课教师。
综合性实验中，所涉及的程序，文档等在交实验报告前，拷贝给任课教师。
任课教师统一刻录成光盘，与该课程的期末考试成绩一同上交到系里存档。
5、未尽事宜，请参考该课程的实验大纲和教学大纲。
《程序设计语言（VB）》课程综合性实验报告。
(完整版)《VB程序设计》实验报告
台州学院《VB程序设计》实验报告实验1.1设计一个程序，程序运行的初始界面如图1-1所示。
当单击“显示”按钮时，在文本框中显示“欢迎使用VB！”（图1-1）；当单击“清除”按钮时，清除文本框内的文本；当单击“退出”按钮时，结束程序运行。
Private Sub Command1_Click() Text1.Text = "欢迎使用VB！"End SubPrivate Sub Command2_Click() Text1.Text = ""End SubPrivate Sub Command3_Click() EndEnd Sub实验1.2 设计一个程序，程序运行的初始界面如图1-3所示，其中“显示”按钮为不可用。
同时要求：（1）当单击“改变文字”按钮时，在左边标签文字内容改为“你好，张三！”，同时“改变文字”按钮变为不可用（图1-4）；（2）当单击“隐藏”按钮时，将左边标签设为不可见，同时“隐藏”按钮变为不可用，“显示”按钮变为可用（图1-5）；（3）当单击“显示”按钮时，重新显示左边标签，同时“隐藏”按钮变为可用，“显示”Private Sub Command1_Click() Label1.Caption = "你好，张三！"Command1.Enabled = False End SubPrivate Sub Command2_Click()Label1.Visible = FalseCommand3.Enabled = TrueCommand2.Enabled = False End SubPrivate Sub Command3_Click() Label1.Visible = TrueCommand2.Enabled = TrueCommand3.Enabled = False End Sub实验2.1 设计一个程序，运行时界面如图2-1所示。
VB程序设计实验报告
1一个富翁试图与陌生人做一笔换钱生意;换钱规则为：陌生人每天给富翁10万元钱;直到满30天为止；而陌生人每天给富翁一分钱;第二天2分;第三天4分;............富翁每天给陌生人的钱是前一天的2倍;直到满一个月..分别显示富翁给陌生人的钱和陌生人给富翁的钱为多少
VB是一种可视化的程序语言..具有基于对象的可视化设计工具;事件驱动的编程机制；提供易于学习易用程序集成开发环境；结构化程序设计语言；强大的网络数据库多媒体功能；完备的联机帮助功能..
本次做的这个实验虽然中间遇到许多困难;但在我的坚持不懈中还是自己独立完成了本次试验;唯一不足的是没有办法把做的实验结果放到本次实验报告中..
2用计算机安排考试日程..期末某专业在周一到周六的六天时间内要考x;y;z三门课;考试顺序为;先考x;再考y;最后考z;规定一天只能考一门;且z课程只能安排在周五或周六考..编写程序安排考试日程;要求列出满足条件的所有方案
五、实验步骤
1private sub form-click
Dim x%; y%; z%; w%
2用计算机安排考试日程..期末某专业在周一到周六的六天时间内要考x;y;z三门课;考试顺序为;先考x;再考y;最后考z;规定一天只能考一门;且z课程只能安排在周五或周六考..编写程序安排考试日程;要求列出满足条件的所有方案..
二实验环境
在宿舍用自己的电脑做出的
三实验目的
1掌握for语句的使用..
2掌握do语句的形式使用..
- 1、下载文档前请自行甄别文档内容的完整性，平台不提供额外的编辑、内容补充、找答案等附加服务。
- 2、"仅部分预览"的文档,不可在线预览部分如存在完整性等问题,可反馈申请退款(可完整预览的文档不适用该条件!)。
- 3、如文档侵犯您的权益，请联系客服反馈,我们会尽快为您处理(人工客服工作时间：9:00-18:30)。
二、计算二元一次方程。
1、目的和要求
（1）熟练掌握控件的使用。
（2）复习巩固系统给用户提供算数函数的用法。
2、内容和步骤
（1）创建窗体
窗体form1由二个命令按钮command1、command2、四个标签label1、 label2、 label3、label4、三个文本框text1 、text2、 text3组成。
Dim x1 As Single, x2 As Single, x3 As Single, x4 As Single
a = Val(Text1.Text)
b = Val(Text2.Text)
c = Val(Text3.Text)
If a = 0 Then
If b = 0 Then
If c = 0 Then
Text3.Text = ""
Label4.Caption = ""
End Sub
（4）保存工程，运行程序
3、调试过程及运行结果
4、实验心得
（1）要把求解过程中遇到的情况考虑全面。
（2）要善于利用系统提供的计算函数。
（2）设计窗体界面及属性
属性设置：
对象名
控件名
属性名
属性值
功能
command
command1
Caption
计算
计算方程
Command2
Caption
清除
清除文本框内的内容
label
label1
Caption
二次项系数a
提示
Label2
Caption
一次项系数b
提示
Label3
Caption
常数项c
提示
If (d >= 0) Then
x1 = (-b + t) / (2 * a)
x2 = (-b - t) / (2 * a)
Label4.Caption = "方程有两个实数根： x1=" & x1 & " x2=" & x2
Else
x3 = (-b) / (2 * a)
x4 = t / (2 * a)
Label4.Caption = "方程有两个复数根： x1=" & x3 & "+" & x4 & "i" & " x2=" & x3 & "-" & x4 & "i"
End If
End If
End Subபைடு நூலகம்
Private Sub Command2_Click()
Text1.Text = ""
Text2.Text = ""
Label4.Caption = "方程有无穷多解"
Else
Label4.Caption = "方程无解"
End If
Else
x1 = (-c) / b
Label4.Caption = "方程有一个解：" & x1
End If
Else
d = b * b - 4 * a * c
t = Sqr(Abs(d))
text1
text1
Text
空
显示a
Text2
Text
空
显示b
Text3
Text
空
显示c
Text4
Text
空
显示求解结果
（3）编写代码
Private Sub Command1_Click()
Dim a As Long, b As Long, c As Long
Dim d As Long, t As Single