当前位置:首页 > 实用技巧 >

怎么做vb程序设计成绩表(vb制作学生成绩录入程序)

来源:原点资讯(www.yd166.com)时间:2023-11-03 12:25:34作者:YD166手机阅读>>

大家可以看一下这些代码,都表示什么意思呢?

我们来看定义的内容:

Dim xlApp As Excel.Application Dim xlBook As Excel.Workbook Dim xlSheet As Excel.Worksheet Dim xlSheet1 As Excel.Worksheet

这几个定义都是固定的模式,我们使用VB程序对Excel表格数据进行读取时,都要对Excel进行定义,这样VB程序才能够识别出所要读取的文件。

Set xlApp = CreateObject("Excel.Application")

是建立Excel文件用的,它表示建立一个Excel对象,对象建立完了之后,我们就可以打开指定的文件了,就是下面这个:

Set xlBook = xlApp.Workbooks.Open("F:\报表运行表.xls") xlApp.Visible = True//表示让对象可见,就是在读取的时候,我们能看到文件的打开, Set xlSheet1 = xlBook.Worksheets("表1")//表示要读取文件中的哪个表,这里面是读取"表1" xlSheet1.Activate//表示激活要读取的表,只有激活了,才能保证操作在当前表进行

以上都是固定的模式,大家可以复制即可,不用敲代码。

紧接着,For i = 4 To 89....Next i就是我们读取数据和处理数据的过程了,具体要根据实现什么样的功能,来编写程序。

再往下还是固定的模式,就是读取完文件内容后,要把文件关闭掉,要不它会始终占据内存的:

xlBook.Close xlApp.Quit Set xlApp = Nothing

上面就是关闭文件,释放对象的过程。

MsgBox "good job"

就是程序运行完之后会弹出小的对话框,对话框显示的文字就是“good job”,当然也可以显示“程序已经运行完毕”,比较灵活。

代码写完之后,我们来运行程序,就是点击这个小三角号:

怎么做vb程序设计成绩表,vb制作学生成绩录入程序(13)

运行之后,会弹出:

怎么做vb程序设计成绩表,vb制作学生成绩录入程序(14)

可以看到,这窗体上面只有一个按钮,我们要想运行我们刚刚写的代码,只需要点击上面这个按钮就可以啦,就是点击“Command1”。

VB程序读取Access数据库数据

下面再来看看VB如何操作Access数据库,其实VB操作Access数据库的代码理简单,看看下面这个就知道啦:

怎么做vb程序设计成绩表,vb制作学生成绩录入程序(15)

可以看到,前三行是定义:

Dim conn As New ADODB.Connection Dim strConn As String Dim sql As String

是固定的模式,直接复制进去即可。

strConn = "Provider=microsoft.ace.oledb.12.0;Data Source=D:\0基础资料\data.accdb"

这条语句是读取路径,找到文件的位置,也是固定的模式,只要把文件名改了即可。

再往下是一条查询语句:

sql2 = " select b.* into yj1 from (select jh,min(rqx) as rqx1 from yjs07 group by jh) a left join yjs07 b on (a.jh=b.jh and a.rqx1=b.rqx) "

这条查询语句就是我们要实现的复杂操作,当然我们在程序里面可以上百条的查询语句,只要遇到同样的工作,我们可以直接运行程序即可。

再往下:

conn.Open strConn conn.Execute (sql1)

这两条语句就是执行我们前面写的的查询语句啦,也是固定的,只要把查询语句的名称改了就好。

Set conn = Nothing//这是释放文件,用完了要关掉。

再往下就是MsgBox "good job",就是和上面操作Excel表格一样,程序运行完了之后会弹出一个对话框:

怎么做vb程序设计成绩表,vb制作学生成绩录入程序(16)

栏目热文

vb中怎么输入并计算平均分(vb编程怎么计算学生的平均分)

vb中怎么输入并计算平均分(vb编程怎么计算学生的平均分)

通过键盘输入学生的人数n,输入n个学生的成绩,找出n个同学的最高分、最低分、计算平均分代码:#include<st...

2023-11-03 12:29:41查看全文 >>

vb中计算综合成绩的代码怎么写(vb程序怎么筛选及格人数)

vb中计算综合成绩的代码怎么写(vb程序怎么筛选及格人数)

今天学习了刘金玉老师VB编程教程的第26期,学习的主要内容是选择结构(select case)。1.select cas...

2023-11-03 12:24:10查看全文 >>

vb判断成绩是否及格的流程图(用vb软件如何判断成绩优良)

vb判断成绩是否及格的流程图(用vb软件如何判断成绩优良)

【实验目的】 1)掌握VB编程的使用【实验原理】 创建VB应用程序有三个主要步骤: 1、创建应用程序界面 2、设置属性 ...

2023-11-03 12:20:13查看全文 >>

练习投篮必须是标准篮筐吗(投篮应该瞄准篮筐哪个位置)

练习投篮必须是标准篮筐吗(投篮应该瞄准篮筐哪个位置)

作为观众,快节奏、酣畅淋漓是我们对3x3篮球最直观的感受。那么从技术层面分析,3x3的进攻、防守与传统篮球有什么不一样呢...

2023-11-03 13:01:48查看全文 >>

投篮是斜对篮筐吗(投篮脚正对篮筐还是侧对篮筐)

投篮是斜对篮筐吗(投篮脚正对篮筐还是侧对篮筐)

大家好,我是科技馆的浩楠,又和大家见面了,今天老师先给大家带来一个非常有趣的小实验,“消灭病毒”。老师提前准备好了一张手...

2023-11-03 12:36:21查看全文 >>

vb中统计成绩代码(vb编程按学号查询成绩)

vb中统计成绩代码(vb编程按学号查询成绩)

前面一节,我们学习了如何用宏功能实现点击按钮跳转到指定的工作表,返回按钮的操作也是一样的,有同学还提到了要隐藏工作表的问...

2023-11-03 12:42:37查看全文 >>

vb中怎样计算平均分(怎么用vb计算平均值)

vb中怎样计算平均分(怎么用vb计算平均值)

在这篇文章中,我们将探讨如何使用VBA(Visual Basic for Applications)编写一个用于计算和显...

2023-11-03 12:59:23查看全文 >>

vb求平均成绩代码(vb打印计算结果)

vb求平均成绩代码(vb打印计算结果)

VB6一行代码计算数组的平均值LongArray_Average长整型数组求平均值。引用Public Declare F...

2023-11-03 12:50:17查看全文 >>

vb求平均分的程序(vb程序做分数段代码)

vb求平均分的程序(vb程序做分数段代码)

今天学习的内容是代码编写的规范,学习编程有一段时间了,一直写代码都是很随意,只要能运行基本上就没有注意代码的规范性,所以...

2023-11-03 12:27:21查看全文 >>

vb中如何求每个同学的平均值(vb中怎么求数的个数)

vb中如何求每个同学的平均值(vb中怎么求数的个数)

在VB编程里,模块和子过程是非常重要的概念,把他俩用好了可以让VB\VBA代码变得井井有条、易于管理、易于复制。本教程用...

2023-11-03 12:24:22查看全文 >>

文档排行