VB2008

2024-08-15

VB2008(精选3篇)

VB2008 篇1

摘要:随着计算机技术的高速发展, 越来越多的行业开始使用数据库管理系统取代人工管理, 极大的提高了企业数据的管理能力。本文通过目前比较流行的B/S模式开发, 探讨使用VB作为前台开发语言, 图形用户界面等为特点, 在设计管理系统方面有着独特的优越性[1]。SQL Server是运行在Windows平台下的数据库管理系统, 与SQL Server数据库管理系统的连接原理与连接方法, 让VB能够更加快速的友好的访问SQL Server数据库, 文主要是通过ADO对象的方式访问。

关键词:VB,SQL Server 2008,连接

随着信息技术的快速发展, 信息化管理系统越来越受到人们的重视。VB具有可视化集成开发环境, 以事件驱动、图形用户界面等为特点, 在设计管理系统方面有着独特的优越性[1]。SQL Server是运行在Windows平台下的数据库管理系统, 同时也是一款网络数据库服务器, 因其安全性能高, 实用性和可迁移性使其成为主流的数据库开发平台之一[2]。VB与SQL Server结合开发B/S模式的数据库管理系统是当前主流的项目开发技术之一。VB与SQL Server数据库的连接就成了访问SQL Server数据库的第一步。本文试图探讨VB与SQL Server数据库管理系统的连接, 使得VB更好地访问数据库管理系统。

1 VB与SQL Server 2008连接的原理

VB访问SQL Server 2008是通过VB中的内置部件ADO (Microsoft Active Data Objects) 来实现的。通过ADO部件使得VB访问SQL Sever数据库更加简单我们利用VB编写前台应用程序, 在前台开发出应用程序所需要的窗体界面, 然后利用ADO控件绑定OLEDB Provider的方式访问SQL Server数据库。用户可以通过VB的窗体界面在ODBC数据库的驱动程序的帮助下访问SQL Server数据库管理系统, SQL Server数据库管理系统将查询结果同样通过ODBC驱动程序返回给VB窗体。

2 VB与SQL Server 2008连接方法

目前VB连接到SQL server数据库的方法主要有两种, 一种是通过ODBC API编程的方式, 一种是通过ADO对象的方式, 本文主要是通过ADO对象的方式访问。

VB在访问SQL Server 2008之前, 必须将所需要的数据库附加到SQL Server 2008中, 我们可以通过SSMS界面进行查询和管理。

2.1 VB中的部件连接

VB访问SQL Server 2008在窗体界面上有两种表现形式, 第一种是通过VB中的ADO Data Control和ADO Data Grid Control部件来完成。连接的方法是首先将这两个控件在VB的部件选项栏拖到工具栏中并应用在窗体中, 然后设置其Connect String字符串, 在其驱动中选择Microsoft OLE DB Provider for SQL Server, 设定好服务器名和用户登录信息以及所对应的数据库名。连接即可成功。

2.2 VB中的ADO连接

在VB窗体的加载事件Load事件中, 输入下面代码:

3 基于VB与SQL Server2008的学生成绩管理系统应用举例

在SQL Server 2008数据库中有一个学生成绩管理系统 (CJGL) 的数据库, 里面有三张表, 分别为学生基本信息表 (Student) , 学生成绩表 (Grade) 和课程信息表 (Course) 。通过Windows身份认证的方式登录SQL Server中。VB中有三个窗体, 分别为学生信息查询窗体, 学生信息管理窗体, 学生成绩管理窗体。服务器名为GOS-01508111852。

3.1 控件绑定

3.2 页面绑定

在页面的的装载事件Load中输入

效果如图1所示。

4 结语

本文详细的介绍了利用VB中的ADO连接到SQL Server 2008数据库管理系统, 让应用程序和数据库连接变得简单实用。

参考文献

[1]王佩红, 刘慧婷.基于VB的学生成绩管理系统的设计与实现[J].计算机技术与发, 2007 (12) .

[2]张岩.基于ASP的SQL Server数据库连接[J].阜阳师范学院学报, 2007 (3) .

VB2008 篇2

也许你会问,我以前没学过任何一种语言,我能快速上手吗?别担心,没问题VB的语法的和QBASIB语言是基本相同的,也就是说它的语法是最容易被初学者所接受的。另外VB提供的是可视化的开发环境,我们可以象搭积木一样构建出程序的界面,而且VB提供了丰富的控件组,省去了我们自己写代码实现这些效果的麻烦,这样我们就能把更多的精力放在程序功能的实现上,所以VB学起来简单,用起来方便。

接着看看VB语言的前景,在目前各种编程语言共存的时代,VB会不会落伍呢?当然不会了,在我写这篇文章的同时,微软已经透露了VB7.0将完全面向对象的消息,可以肯定下一代VB的功能一定会强大很多,我们这些所谓的 VB 程序员总算可以放心了,VB不会落后于时代,毕竟它是使用人数最多的优秀的开发工具。

好了,侃了这么多关于VB的台前幕后,总之是为想学编程的你树立信心,编程一点都不难,只要你决定了开始,就让我们一起踏上愉快的编程之旅吧。

接下来谈谈怎样学习VB,先说说“看实例学VB6.0”系列教程,它是面向编程初学者的VB入门教程,这个教程的特点是抛开晦涩难懂的概念和语法,不做内容上的堆积和罗列,而是采用了每节一个生动有趣的小例子的形式,每个小例子中会涉及到一个或几个VB编程的知识点(可能是控件,也许会是某个函数或编程小技巧),使你快速入门,

希望你学完此教程后能达到下述的效果:

从对编程一窍不通或从未接触过编程的状态,通过学习能够对VB6.0的编程环境比较熟悉,掌握VB开发界面的使用方法;对VB语言的基本语法大致了解,知道常见的语句的意义;学习VB常用控件的使用方法,并能将它们灵活运用到应用程序中;能开发简单的VB程序。到那时你已经能够继续深入的学习VB编程,可以继续参与到程序设计栏目其他版块的学习中去,嘻嘻,目标就是这样啦。

然后谈谈学习编程的方法,万事开头难,刚刚开始,遇到些困难没关系,慢慢来。编程是一个不断学习,不断积累的过程,编程的乐趣也正是存在于学习的过程中。我们每学一点,就赶快把它用到实际的程序中去,自己多学多用多实践,水平才能不断提高,这就是“学以致用”。

另外,编程涉及到很多的知识,象操作系统的、软件工程的、硬件系统的以及编程思想等各个方面,这就需要我们多看看这方面的资料,扩充自己的知识面。

还有如果学习过程中遇到了什么问题,或者有什么好的心得,你可以到洪恩的“网上交流”的“编程技术”版去提问求助或是发表文章,那里有许多编程高手可以为你答疑,还有许多同样的初学者一起交流。

“求知无限”是网上学习的特点,如果你觉得自己能够更深的学习VB或是其他编程的知识时,“程序设计”栏目的其他版块将是理想的去处,希望我们能在这样的学习环境中不断进步。

教程分为三个大的部分,它们是由浅入深的一个系列,分别是:

一、熟悉一下VB6.0的编程环境

二、学习VB常用控件的使用方法

三、试着开发简单的VB应用程序

用VB实现多文档打印VB 篇3

用VB实现多文档打印

作者: 盛放

通常,一般情况下,我们打印文档都是直接从应用程序中打印,例如WORD,这个方法对于单个文件打印比较方便,但是对于文秘等经常需要打印大批量文件的工作人员,如果仍然用WORD一个一个进行打印就比较麻烦了。

应我公司文管中心的要求,我制作了一个多文档打印程序,方便了文秘人员,现介绍如下:

运行VB,新建一个应用程序工程,在Form中添加一个DriveListBox 控件、DirListBox 控件和FileListBox 控件,分别取名为:Drive1、Dir1和File1。设置File1的Pattern 属性为*.doc,设置FileListBox 控件中显示的文件名为DOC文档。

在Form_Load事件中添加一行代码:Drive1.Drive = “c:”,用来设置运行时所选择的驱动器。

在Drive1_Change()事件中添加一行代码:Dir1.Path = Drive1.Drive,这样当驱动器改变时,使目录路径随之改变。

同样在Dir1_Change()事件中添加一行代码:File1.Path = Dir1.Path,当目录改变时,使文件列表同时改变。

因为一般来说,文档都会保存在统一的目录下,所以没有使用CommonDialog 控件进行文件名选择,使操作更为简单方便。

在Form中添加一个CommandButton 控件取名为Print,用来进行打印操作。

在Command1_Click()中添加如下代码:

Dim i As Integer

Dim strfile As String

Dim word As Object

Set word = CreateObject(“word.Basic”)

word.appshow

For i = 0 To File1.ListCount - 1

If Right(Dir1.Path, 1) “” Then

strfile = Dir1.Path + “” + File1.List(i)

Else

strfile = Dir1.Path + File1.List(i)

End If

word.fileopen strfile

word.fileprint

word.fileclose

Next

word.appclose

Set word = Nothing

代码说明:

定义一个对象变量word

使用CreateObject创建一个WORD对象并赋值给word

以FileListBox 控件的列表部分项目的个数作为最大数进行循环打印

判断目录名的最后一个字母是否为“”,如果不是,则添加“”进行修正

通过目录名和文件名获得完整的文件名

使用word对象的fileopen方法打开文件

使用word对象的fileprint方法进行文件打印

使用word对象的fileclose方法关闭文件

最后调用word对象的appclose方法关闭word程序,以及释放对象资源Set word = Nothing,

这样,我们就很简单的实现了多文档的打印,希望对文秘人员有所帮助。

上一篇:娱乐文化下一篇:财务策划