VB编程实现范文

VB编程实现范文（精选9篇）

VB编程实现 第1篇

关键词：VB,DIR函数,SetAttr函数,文件夹属性

通常用杀毒软件查杀U盘后,U盘中的一些文件夹会被隐藏掉,文件夹的属性被设成了系统属性,导致一些用户认为U盘中的数据已丢失,即使知道有数据,也不知道如何看到数据以及如何将隐藏数据显示出来。

解决问题的方法,利用VB编写了一个程序,采用可视化易操作的特点来制作一个去掉文件夹的系统、隐藏和只读属性的工具。

1 问题的实现方法

现在很多参考程序采用驱动器列表框(DriveListBox)、目录列表框(DirListBox)和文件列表框(FileListBox)三个控件组合而成的自定义对话框来显示隐藏文件[1],但在目录列表框中却无法显示隐藏文件夹。

查看隐藏文件或文件夹采用的方法是使用VB的DIR()函数与ListBox控件相结合的方式来查找,将找到的文件夹显示在ListBox中。

1.1 Dir()函数的使用

Dir()函数返回一个String,用以表示一个文件名、目录名或文件夹名称,其必须与指定的模式或文件属性、或磁盘卷标相匹配。语法如下:

Dir[(pathname[,attributes])]

其中pathname为可选参数,用来指定文件名的字符串表达式,可能包含目录或文件夹以及驱动器。如果没有找到pathname,则返回零长度字符串(″″)。

attributes可选参数、常数或数值表达式,其总和用来指定文件属性。如果省略,则返回匹配pathname但不包含属性的文件。Attributes值如表1所示。

这些值可以综合运用,当一个文件隐藏且又是系统属性时,则属性设置vbHidden+vbSystem。

1.2 设置文件夹属性

VB中文件或文件夹属性的设置采用SetAttr函数[3]来进行。

Public Sub SetAttr(ByVal PathName As String,ByVal Attributes As FileAttribute)

其中PathName是必需的,指定文件名的String表达式,PathName可以包含目录(或文件夹)和驱动器。Attributes是必需的,可以是常数或数值表达式,其和用来指定文件属性。

2 具体实现

打开VB,新建一窗体Form1,在Form1中加入一个text、一个ListBox和一个command控件,其名称分别为text1、list1和command1。

(1)text1中用于输入要操作的驱动器根目录,例如:c:,在command1中输入以下代码:

当运行程序单击command1按钮时,ListBox控件中就显示出其根目录的所有文件和文件夹。

(2)单击ListBox控件中所列出的文件夹,将其目录存入text1中,利用SetAttr就可以设置文件夹属性,代码如下:

3 结束语

在VB编程中实现显示隐藏文件夹和去除文件夹的隐藏与系统属性的方法,通过程序设计的工具能很方便地解决由于U盘病毒造成的文件夹隐藏的问题。

参考文献

[1]求是科技.Visual Basic6.0程序设计与开发技术大全[M].北京:人民邮电出版社,2004.

[2]求是科技,刘韬,骆娟.visual Basic实效编程百例[M].第二版.北京:人民邮电出版社,2004.

VB编程：＂&＂替换＂+＂ 第2篇

“&”替换“+”

在很多人的编程语言中，用“+”来连接字符串，这样容易导致歧义，良好的习惯是用“&”来连接字符串.

不正确：

Dim sMessage As String

sMessage = “1” + “2”

正确：

Dim sMessage As String

sMessage = “1” & “2”

注意：“&”的.后面有个空格

在简单的选择条件情况下,使用IIf函数

繁琐的代码：

If nNum = 0 Then

sName = “sancy”

Else

sName = “Xu”

End If

简单的代码：

基于VB编程实现Flash播放器 第3篇

关键词：ActiveX,Shockwave flash,VB,通用对话框

1 引言

Visual Basic包括三类控件即标准控件、ActiveX控件和可插入对象,而其中的ActiveX控件则是Microsoft公司推出的一项网络扩展技术ActiveX技术的重要组成部分之一。它可以嵌入到宿主应用程序中,因此ActiveX部件是与平台无关的,即用一种语言编写的ActiveX部件无需任何修改就可应用于另一种编程语言,从而实现资源共享,提高编程效率。下面利用VB中的ActiveX控件编写一个实现Flash播放器功能的小程序。

2 设计思路

2.1 建立用户界面、设置对象属性

在VB的集成开发环境中,工具箱中默认所显示的是标准控件,而用VB编程实现Flash播放器的功能需要AcitiveX控件,因此首先要在工具箱中添加相关的ActiveX控件,方法如下:

第一步,打开VB6.0,新建一个工程,在工程菜单中选择部件,在弹出的窗口部件列表中选中Shockwave flash、Microsoft Common Dialog Control 6.0部件,单击确定,则Flash控件和对话框控件就被添加到了工具箱。

第二步,建立界面和设置对象属性。建立两个窗体,分别为主界面、Flash播放器界面。名称分为Frmian、FrFlash,窗体Caption属性分别为主窗体和Flash播放器。

(1)设计主窗体。在Frmain上添加两个按钮,名称分别为Command1和Command2,标题分别为打开和退出;再添加一个通用对话框,名称为CD1。

(2)设计Flash播放器窗体。在FrFlash窗体上添加6个按钮,名称默认,标题分别为Play、Pause、Forword、Back、Replay、Return。再添加一个Flash控件,名称为SF1。

2.2 主要代码

(1)主窗口中相应事件

1)打开命令按纽:通过通用对话框弹出打开文件对话框,并在打开文件类型一栏设置swf格式的flash文件。

代码如下:

2)退出命令按纽:单击退出按纽,则结束程序。

代码如下:

(2)FrFlash播放器窗口相应事件

1)窗体的Load事件

加载FrFlash窗体后,设置需要播放的Flash文件以及播放的状态,最初不播放。

代码如下:

2)其他6个按钮代码

3 运行效果

程序运行及效果如图1-4所示。

4 结语

以上只介绍了Flash播放器的功能实现,通过VB的ActiveX控件可以很容易地实现其它媒体文件的播放功能,例如播放WAV格式、AVI格式以及MP3格式等等。通过不断的研究和实践,可以设计出属于自己的功能强大的多媒体播放器。

参考文献

VB编程题(循环部分总结题目 第4篇

1.求自然数1～100之间奇数之和。

2.求自然数1～100之间偶数之和。

3.编程计算从200到1000之间的所有4的倍数之和。

4.编程计算从300到1000之间的所有7的倍数之和。

5.编写程序在窗体上显示出：5/6+4/5+3/4+2/3+1/2

6.编写程序，通过InputBox函数从键盘上输入4个数,计算并在窗体上显示这4个数的和及平均值。

7.在窗体的单击事件过程中，编写程序计算1！+2！+3！+ „ +20!

8.有一个窗体，窗体中有一个文本框，名称为Text1，有一个按钮，试编写按钮的单击事件，实现计算1！+2！+3！+„+10!,将结果显示在文本框Text1中。(或参照 7 用教材:P86 [例4-21] 方法)

9.编写程序计算：s=1+1/2!+1/3!+„+1/n!,说明：在窗体中有一个文本框控件：Text1,用来接收n的值，有一个标签控件：Label1，用来显示S的值，试编写窗体的单击事件，实现计算与显示功能，只要求写出事件的主要代码，事件过程的起始语句和结束语句可略去。(或 参照7 用教材:P87 [例4-22] 方法)

10.编写程序，在窗体上输出由1、2、3、4、5这五个数字组成的所有可能的两位数，并统计它们的个数。

说明: 程序中红色标示的部分 控制 每行输出5个数

11.求s=a+aa+aaa+„+aaa„aaa(n个a),其中a和n的值由用户自己输入。例如，当a=3,n=4时，S=3+33+333+3333。

12.在窗体上输出下三角的九九乘法表。

13.编写程序，将26个字母逆序输出。

14.编写程序，将字符串“山高人为峰”按逆序“峰为人高山”输出。

15.设纸的厚度为0.5毫米，将纸对折，再对折„，求至少对折多少次，纸张的厚度能达到珠穆朗玛峰的高度8848米。

16.编写程序，求s的值，s=1×2×3+2×3×4+„+n×(n+1)×(n+2)的值。n由程序输入。

17.编写一个程序，用户连续输入N个值，直到输入非数值数据为止。最后输出其中最大的一个数。

VB编程实现 第5篇

1. 教学目标

通过欣赏一段视频引入,让学生亲身编写一个“看图猜成语”的游戏程 序来感受计算机程序解决问题的过程, 初步掌握用高级语言解决实际问题的能力,尤其是需要掌握IF语句的应用, 感受计算机程序设计的初步过程,了解计算机程序设计的基本步骤,激发学生学习编程的兴趣和爱好,促使他们主动地去学习和思考。希望通过本节课的学习,激发学生学好程序,用好成语,继承和发扬传统文化的精华部分。

2. 内容分析

本节课的内容结构是: 首先请同学们一起体验一下“看图猜成语”的游 戏过程,然后请同学们先完成任务一“用户界面 的设置”,再完成任 务二“对应代码的输入”,通过解剖程序让学生了解程序设计的基本思想和流程。在学生练习中,让学生编写运行程序, 亲身感受计算机程序解决问题的过程。

3. 学情分析

我们曾经对学生做过信息技术摸底调查,大多数学生已经初步对计算机有了基本的了解,但都停留在操作的层面,而且对以前学过的知识掌握较差。因此,在教学设计中使用游戏来学习和加强VB的应用,就是从学生的认知特点和学生已有的知识经验及能力水平出发,自然地引导进入计算机编程解决问题的方法和流程,这样更符合学生的认知特点,引入课题更加自然,说明问题更加清楚。

4. 设计思路

( 1) 教学方法设计。在教学中选用了“看图猜成语”为例子,通过学生玩游戏的方法和步骤,体验VB应用程序设计的基本过程,先界面后代码。教学中采用了“启发式”“活动式” “探究式”“任务驱动式”等教学模式。

( 2) 关于教学流程和教学活动的设计。观看一段视频引入开题; 学生体验“看图猜成语”的游戏; 思考如何用VB实现这个小游戏; 学生完成任务一,即程序界面的设置; 归纳问题并引入程序代码的编写; 学生完成任务二,即程序代码的编写; 评论并交流学生的作品, 强调多样性; 课堂总结,凝练本节课的知识点; 最后总结升华,鼓励大家学好程序,多用成语,继承传统精华。

二、教学过程描述

1. 教与学的过程描述

引入课题 ( 2分钟) ,教师播放视频,引入“看图猜成语”游戏; 提出问题 ( 2分钟) ,教师提出在VB中如何编写这个程序,学生讨论,教师听学生讨论,引导学生得出VB应用程序设计的基本过程 ( 界面、代码) ; 引入任务一 ( 2分钟) ,教师得出结论,先设计用户的使用界面,学生讨论需要哪些控件,教师听学生讨论,引导学生分析,得出结论; 上机练习 ( 10分钟) , 教师辅导学生上机练习,安排能力好的同学帮助有困难的同学,学生设计用户界面,添加控件,设置属性,教师辅导学生上机练习,观察学生谁做出了好的作品,解决学生的疑难点; 引入任务二 ( 8分钟) ,教师先点评任务一,启发学生完成任务二“程序代码的编写”,学生认真听老师讲解,教师引导学生思考如何给每一个对象添加相应的代码; 上机练习 ( 15分钟) ,辅导学生上机练习,安排能力好的同学帮助有困难的同学,教师观察学生能否合作完成代码的编写和完善; 教师进行最后的总结提高和感悟提升,凝练本课知识点,提倡大家学习编程,发扬传统文化。

2. 关键环节提炼

( 1) 引入: 以“汉字听 写大会”“中国成语大会”为背景,引导学生思考如何用VB编程实现“看图猜成语”的游戏,能唤起学生求知欲望,产生学习兴趣。

( 2) 剖析: 学生玩游戏的方法、步骤体现的数学思维是计算机程序设计的基础,笔者利用对比的方法,从人机对话的角度,让学生了解游戏结构组成和具体作用,懂得计算机程序设计的基本思想。

( 3) 体验: 教学中安排了“编程实现”一个小节,让学生经历和体验程序设计的过程,设计包括“界面设计”“代码编写”“调试运行” 三个环节。结合学生的实际情况,组织学生实施上述三个环节。要求学生先完成任务一, 再完成任务二,层层推进,举一反三, 自己动手编写所有的程序,亲身感受计算机程序解决问题的过程。

( 4) 评价和交流: 在这节课的课堂教学过程中,要重视老师和学生、学生和学生之间的互相交流。比如在课堂剖析程序时,要求学生与玩游戏时解决同类问题比较,在“编程实现”过程中教师进行有目的的分层指导,让完成“任务”的学生通过“广播教学”给其他同学做示范,并介绍经验、体会,教师及时进行有效点评,其他同学提出补充或修改意见。通过师生、生生交流互动,实现知识“共享”,共同提高。

VB编程实现 第6篇

机关部门根据公文处理工作规定和机关公文格式的要求, 公文排版要严格执行模板设计, 而Word中很多格式调整步骤繁琐, 而文秘工作者的计算机应用能力有限[1], 公文编排工作量较大。考虑到这种现状, 开展了基于Word编程的公文处理系统的开发与研究。通过设计公文收发等模版, 利用VB结合宏编程开发出符合公文处理规则的软件, 提高工作效率。

二、软件功能分析

机关部门公文主要有来文、发文两类, 收文办理指上级外文的登记、拟办、转发等过程;发文办理指向其他部门或上级的发文的拟稿、审核、签发、印发等过程。

针对军工企业, 机关公文中常见的内容有缓急程度、密级、拟稿单位、拟稿日期、签发人、主送单位、正文、打印份数、附件名称、主题词、会议时间等等。

机关部门均有专用的打印稿纸, 主要有上级下发的决定、通知、通报、报告、批复、意见类公文、向上级请示类公文、党委请示类公文、部门下发的公文、团委下发的公文、工会下发的公文、纪委下发的公文、党委会议纪要、专题办公会议纪要、信函式公文等几种类型。通过系统自动排版将所输入的内容添加到稿纸中所对应的位置, 将稿纸放入打印机中, 这样软件打印出来就是一篇完整的排版正确的公文。

系统应设计有良好的人机交互界面, 具有密码登录功能和可视化的数据库管理功能。

三、软件设计

机关公文管理系统设计的核心是公文管理设计。公文管理全过程包含了数据的输入、整理、储存和收集、查询利用, 是管理信息系统的一种形式[2]。

1、功能设计

根据功能分析, 提出软件的主要功能的框图如图1所示:

2、UI设计

(1) 主界面设计

选择使用Visual Basic 6.0 设计程序UI。设计主界面分为菜单栏、工具栏、操作区和状态栏等部分, 如图2 所示。

在主界面设计点击鼠标右键弹出“公文录入”、“公文查询”、“类目管理”三项快捷操作, 可以完成公文的录入、查询以及类目的修改等操作。

(2) 用户登录与管理

不同等级的用户拥有对软件功能和公文内容操作的不同权限。通过工具栏和菜单栏都可以实现管理员的添加、修改、查看等操作。如果管理员权限为guest, 则不能修改密码、不能添加、修改、删除公文;System权限则拥有全部功能。

(3) 公文管理

(1) 发文管理

发文管理通过菜单栏和工具栏都可实现。其中公文的输入、修改、删除、打印等操作均可在“公文录入”、“公文修改”子菜单中实现, 设计界面如图4 所示。

在发文管理界面, 可输入新的公文记录, 或编辑数据区的任何一条数据完成修改公文内容。凡是在需要输入日期时间的文本框中, 双击即可自动填入当前时间。

按下“打印”按钮, 新的公文记录会自动保存在数据库中, 且自动生成word文档在“word”文件夹中, 文件名为用户输入的文档的标题名。若以后另需打印此文档, 也可直接查找到此word文件, 修改其内容, 或者打印。

(2) 收文管理

收文管理为简单的将信息存储下来的快捷公文处理方式, 其包含的项目较少, 方便查阅存档, 工程实例如图5 所示。

(3) 公文查询

通过选择“查询方式”来实现公文查询操作, 点击“浏览”按钮即可调用OFFICE EXCEL程序打开工作表, 设计界面如图6 所示。

(4) 数据库管理

为了数据安全, 用户可定期备份数据库;当数据读取故障时, 可选择从已备份的数据中恢复。

3、数据库设计

数据库是信息系统的核心组成部分。机关公文管理系统软件包含公文信息、收文操作员、发文操作员等数据模型, 主要数据有收文日期、来文单位、文件编号、文件题名、文件日期、附件、主题词、提要、份数、页数等等。数据库使用Access设计, 便于修改与功能扩充。

4、关键代码

VB对word文档的处理, 是软件编程中的核心部分之一。将输入的公文信息直接添加到word文档中的实现方式为:

四、总结

作为一种高效的公文处理应用, 机关公文管理系统软件适用于各单位的机关办公室或者经常需要存储大量电子公文文件的部门, 可以很方便的查询档案的存档情况, 并调用WORD的打印功能来实现办公自动化。此应用对行政公文处理的作用和影响都是非常显著的, 但仍需从制度上加强保障和创新, 并结合现代网络技术从技术上加以改进。

参考文献

[1]卢台生.基于免编程的公文处理系统的开发与研究[J].办公自动化, 2013.6 (256) :37.

VB编程实现 第7篇

1 即时通讯技术概述

即时通讯, 简称IM, 是一种基于互联网的即时交流信息的业务, 其主要业务对象包括个人、商务、企业、行业、网页等, 可以允许两人或者多人通过网络实现即时的数据信息传输、语音视频的交流等, 其主要优势在于信息传递的高效性、即时性和便利性, 可以快速实现与他人之间的信息交流, 目前市场上比较常见的即时通讯软件主要有:腾讯QQ、YY语音、微信等。

2 VB编程对于快速实现局域网通信的重要性

在社会经济不断发展的背景下, 人们的生活水平得到了很大提高, 工作和生活节奏也在不断加快, 对于网络通信技术的依赖性越来越强, 要求通信的高效性、实时性和便利性, 使得即时通讯软件得到了发展。但是, 这些即时通讯软件一般只能在广域网的环境中使用, 难以满足局域网的内部需求。在技术条件的限制下, 当前的局域网背景下, 只有极少数软件才可以快速实现局域网的通信要求, 严重影响了局域网功能的发挥和使用人员的正常工作。为了解决这个问题, 就必须结合实际情况, 对局域网通讯的应用程序进行编制。由于软件的编程是一个十分复杂的工作, 专业性极强, 对于编程人员的要求较高, 而软件人才的缺乏, 使得局域网即时通讯软件的编程工作一度陷入困境。

直到VB编程的出现和应用, 才使得这个难题得到解决。VB中的WINSOCK控件, 可以针对编程中的技术性内容, 进行全面覆盖, 从而可以便捷地使用UDP和TCP, 只需要编程人员对空间的属性进行调整和设定, 对使用方法进行熟悉, 就可以顺利实现局域网的数据连接和双向通信, 极大地简化了编程过程, 对于技术人员的要求也较低, 推动了局域网快速通信的实现和发展。

3 基于快速实现局域网通信的VB编程应用

3.1 在TCP协议下的应用

在局域网通信过程中, 可以利用TCP协议, 对局域网内部的计算机远程连接进行创建和维护。实现局域网计算机的数据连接, 只需要建立相应的服务器程序和用户程序即可。因此, VB编程中的相关控件, 可以在TCP协议的基础上, 对服务器和用户的相关程序进行合理编制, 从而快速实现局域网通信。

3.1.1 对服务器程序的编制

在应用VB编程中的WINSOCK控件对服务器程序进行编制时, 必须严格遵循相应的操作流程, 不能盲目进行, 以确保程序的准确性和有效性。服务器程序编程的基本流程包括:

(1) 设置一个合理的侦听端口, 将程序的相关数据信息输入WINSOCK控件的LOCALPORT属性上, 确保其得以存储和记忆, 同时, 要对数据的完整性和准确性进行检查;

(2) 通过WINSOCK控件中的Listen方法, 对用户计算机的CONNECT请求进行实时监听;

(3) 针对监听到的用户计算机的CONNECT请求, 对其所引发的Connection Request事件进行准确捕获;

(4) 调用Connection Request事件中的ACCEPT方法, 实现用户计算机的连接, 确保数据的双向传输;

(5) 在发送数据时, 应用Send Data方法, 在接收数据时, 应用Get Data方法。

3.1.2 对用户程序的编制

对于用户程序的编制工作, 同样是利用WINSOCK控件来实现的, 自然也需要遵循相应的操作流程。

(1) 运用WINSOCK控件中的Remote host属性, 在其中输入并存储服务器的IP地址, 以及本机名称;

(2) 将服务器侦听端口接入控件的remote port属性中, 并进行存储;

(3) 使用空间connect方法, 实现以上两个方面的有效连接。

3.2 在UDP协议下的应用

假定局域网由于各种因素的制约, 不允许服务器的搭建, 则可以应用UDP协议实现局域网通信。相比于TCP协议, UDP协议是不连接的, 因此相对编程难度较小, 不需要进行服务器和用户程序的编制, 只需要按照以下流程进行处理即可, 假定两台计算机分别以A和B表示:

(1) 结合相应标准, 对A、B的local port控件属性进行设置;

(2) 分别运用A、B中的Remote Host属性, 对对方的IP地址进行设置;

(3) 分别运用A、B中的local port属性, 设置对方的Remote Host属性;

(4) 两者均采用Send Date对数据进行发送, 采用Get Data对数据进行接收。

4 结语

总而言之, 在信息化时代的背景下, 局域网对于通信的要求越来越高, 需要对传统通信技术进行改进和创新。使用VB编程, 可以在局域网背景下, 实现快速通信, 确保信息传输的即时性和有效性, 需要引起相关技术人员和管理人员的重视, 推动局域网通信的快速实现。

摘要：在当前的信息化时代, 计算机互联网技术得到了飞速发展, 局域网在人们工作和生活中的重要性也越来越大, 在企事业单位的内部得到了广泛应用。本文结合VB编程在局域网通信中的重要性, 对基于快速实现局域网通信的VB编程应用进行了分析。

关键词：局域网通信,快速实现,VB编程

参考文献

[1]马宁.基于快速实现局域网通信的VB编程应用分析[J].吉林广播电视大学学报, 2013, (9) :156-157.

[2]韩菊.基于快速实现局域网通信的VB编程实践研究[J].消费电子, 2013, (18) :112.

VB数据库控件的编程方法 第8篇

利用VB编程实现对数据库的操作有许多不同的控件,每种控件又有不同的连接和读写的方法,就算同一种控件连接不同的数据库,在使用中也稍有不同,这些问题给初学者带来很多困扰,本文以Access数据库结合Data控件为例讲述数据库编程的一些具体方法和步骤,对初学者有一定的参考和借鉴意义。

2 VB操作数据库的主要控件或方法

VB操作数据库的主要控件大体有以下几种:

1)Data控件及其相关的数据感知控(如:DBGrid、DBList、DBCombo、MsFlexGrid等等)。

Data是VB的标准控件,其优点是使用方便、操作简单、方法和属性多,技术也比较成熟,缺点是仅能连接操作本地数据库,且该控件比较古老,能够连接的数据库库种类不多,不能识别Access2000及以上的版本,使用前必须利用菜单功能转换成Access97以下低版本才能连接和使用。因此一般用于初学者打基础就可以了。

2)Adodc控件及其相关的数据感知控(如:DataGrid、DataList、DataCombo、MsHFlexGrid等等)。

ADO即ActiveX数据对象,是目前最新的数据访问接口,又称为OLE自动化接口,是访问由Microsoft推出的最新、功能最强的应用程序接口。ADO是为OLE DB而设计的。(OLE DB是微软的战略性的通向不同的数据源的低级应用程序接口,OLE DB不仅包括微软资助的标准数据接口开放数据库连通性的结构化问题语言(SQL)能力,还具有面向其他非SQL数据类型的通路),因此,ADO Data控件能访问各种类型的数据库,这是Data控件无法实现的。

3)纯编程实现数据连接操作的ADO和RDO方法。

VB用纯编程的方法实现数据的连接操作具有通用性好,操作灵活方便,安装时不受文件目录及位置影响,无需手式设置和人工干预。适合比较大型的专业程序开发设计。

3 VB操作数据库的过程和步骤

不论采用哪种方法进行数据库编程,大体上都要从下面几方面入手进行设计:

1)确定立所用控件,建立VB与数据库的连接(可以是手工或使用连接字进行连接,因控件的不同而异),一般用ConnectString或DataBaseName属性。

2)建立记录源,指定需要操作的表,一般用RecordSource属性。

3)设置显示控件与数据库记录集控件的关联属性。

4 Data控件的使用方法

4.1 主要连接属性

Connect:数据库连接的种类(VB默认为Access数据库)。

Databasename:被连接的数据全名(含路径)。

RecordSource:被连数据库的表或查询。

RecordsetType:指出读/写表记录的方法(是只读还是可写等)

*Table---可以浏览、查询、修改和更新。(单表)

*Dynaset---可以对多表操作,但不自动更新。(可以是多表查询)*Snapshot---对记录只能读不能写。

4.2 文本型控件Text与Data控件的梆定

DataSource=Data1(可以一次性统一指派)

DataField=相关字段

具体见下图1,图2所示。

小结:以上是用设计方法进行连接设置,更换机器或目录均不能运行,可移植性较差。

图3是运行效果图。

4.3 通过代码进行连接设置

图4是通过代码进行连接设置的。

注意:Text控件的DataSource属性不能通过代码设计,必须手工设置。

见图5所示。

相关代码如下:

'Data1.Connect="Access"此句可以省略

'Text1.DataSource=Data1此句错误,不能用代码,要在设计时指定。

'Text2.DataSource=Data1此句错误,不能用代码,要在设计时指定。

Data1.DatabaseName = App.Path + "xsdn.mdb"

Data1.RecordSource = "xsdn"

Text1.DataField = "学号"

Text2.DataField = "姓名"

Text3.DataField="家庭地址"'此处注意与表字段名保持同名

End Sub

如图6所示。

小结:代码设计的优点是:移植性稍好,但要保证数据放在应用程序同一个目录或文件夹之中才行。

5 Data控件的其他方法

AddNew-----向相关表添加一条新记录。如Data1.Recordset.Addnew

Delete-----向删除相关表当前的一条记录,指针自动向下移动。

Edit-----用于对可更新的当前记录进行编辑修改。

Move----记录移动组群,含MoveFirst、MoveLast、MoveNext、MovePrevious。

Find----查找方法的组群,含FindFirst、FindLast、FindNext、FindPrevious方法。

Refresh---更新数据控件的集合内容。

Seek-----通过索引的方法查找表记录。

Update----将修改的记录内容保存到数据库表中去。

RecodCount----返回记录集中符合条件的记录总数。

UpdateControls----用于恢复修改记录之前的记录内容。(没有Recordset字)

例如,设计一个通过文本框输入姓名进行记录查找的界面。相关代码如下:

Private Sub Command1_Click()

Data1.Recordset.FindFirst"姓名='"&Text4&"'"

If Data1.Recordset.NoMatch Then

MsgBox"查无此人"

End If

End Sub

如图7所示。

6 结束语

VB数据库编程是企业实现自动化数据管理的最基本应用,通过VB界面操作数据库可以使用信息更安全,比如你可以建立用户登录,根据用户的不同进行不同操作的界面,也可以使不同的用户分担不同的工作。在学习数据库编程时应先从简单的控件入手,掌握其基础方法、属性,再过渡到复杂的数据控件这样学习起来就得心应手。

参考文献

[1]郑阿奇.Visual Basic实用教程[M].北京:电子工业出版社,2005.

VB编程应用与教学的实践与思考 第9篇

随着国家不断加大对中职教育的投入, 中职学校的教学条件得以极大地改善, 许多课程的教学可以选择在多媒体电脑室进行, 使得教师的教学组织更具有灵活性和机动性, 师生之间的教学互动也更加多元和有效。但是在实际的教学中, 不少教师发现现有的软件并不适合课程要求, 或不能完全满足教学需要, 因此迫切需要一些针对性强的小型软件 (程序) 来补充, 以提高教学质量和效率。本人就曾应财经类的老师要求编写过一些应用程序, 其中一个用VB编写的程序协助其在全国的说课比赛中获得说课三等奖和教学组织一等奖。

VB是一种可视化的面向对象的编程语言工具, 它的语法简单易学, 功能强大, 具有代码提示、出错提示和调试功能, 代码编写方便;同时它的可视化布局功能强大, 能实时观察程序运行结果, 因此对于中小型应用程序的设计, VB是一个不错的选择。

然而, VB课程教学的现状却不容乐观, 主要体现在:由于学生数学、英语的基础较差, 对代码的理解能力差, 学习过程中普遍感到吃力, 造成兴趣降低, 产生畏难心理, 从而丧失信心和学习的动力。如何提高学生的学习兴趣, 提高教学效率, 改善教学效果, 是亟待解决的问题。本文通过一个具体案例, 对VB教学及教辅软件的应用进行了一些尝试、摸索和探讨。

2. 案例分析

客户需求是把课堂练习 (图片型) 通过多媒体教学系统发个学生, 学生完成后再传回教师机。其中, 文件的收发可以交给现有的系统完成, 编程不需要解决这个功能。

2.1 程序要实现的功能

(1) 打开文档。

(2) 做作业。

(3) 用橡皮擦修改。

(4) 图片可能需要旋转。

(5) 保存作业。

(6) 考虑到程序对不同操作系统环境的兼容性要求, 需要对程序进行打包。

2.2 流程图

3. 程序设计

3.1 审单界面

commondialog (通用对话框) 用来打开文件 (课堂练习) , 审单按钮用来进入下一个功能模块。本模块用来打开课堂作业, 如成功则进入下一个模块并显示作业, 否则提示“导入错误”, 并停留继续等待。

3.2 代码编写

'设定标志k, 防止打开图片后鼠标的微小移动造成的划线

3.3 主窗体

接收单按钮和通用对话框按钮用来保存图片作业, 旋转按钮和两个图片框 (picture1和picture2, 其中picture2不可见, 其属性visible=false) 用来显示和旋转图片, 退出按钮功能是退出整个程序。

(1) 窗体加载代码

(2) 旋转

由于无法直接编程旋转图片框, 因此这里要借助API函数。API称为应用程序接口, 是留给应用程序的一个调用接口, 是一套用来控制的各个部件的外观和行为的预先定义的Windows函数组成。本例使用的API函数是Plg Blt, 该函数的功能是复制一幅位图, 同时将其转换成一个平行四边形。利用它可对位图进行旋转处理。

Ⅰ:旋转的流程

Ⅱ:Plg Blt函数旋转效果图示 (0, 1, 2为图片旋转的3个控制顶点)

Ⅲ:Plg Blt函数介绍

(3) 做作业

(4) 修改作业

3.4 打包

由于本案VB6.0编写的程序需要在win7运行, 而win7不包含一些必要的程序组件, 即win7环境不支持VB6.0版的程序, 因此需要将程序打包后在win7中安装才能突破win7限制。VB6.0支持程序打包。

(1) 打开“打包和扩展向导”

(2) 选择打包命令 (按提示操作即可, 不再赘述)

(3) 安装程序

打开打包后新形成文件夹“包”, 找到setup.exe程序, 双击运行安装。安装后可以在开始菜单看到安装后的程序, 单击“工程1”即可运行程序。

从本案的实施过程我们可以看到, VB作为可视化编程工具本身功能是十分强大的, API函数的嵌入又使其功能得到丰富和完善, 为解决一些复杂问题提供了更多的方法。

4. 总结和思考

对于计算机专业的中职学生来说, 掌握一种编程语言是必需的, 意义不言而喻。而VB作为功能强大、门槛较低、容易上手的编程语言, 非常适合中职水平的计算机专业的学生, 但是实际上, 中职学生的英语水平、逻辑思维能力普遍欠缺, 严重影响学生的学习兴趣及教师的教学效果, 因此中职计算机专业的学生的编程能力普遍不强。从教师的角度来说, 如何提高VB教学的效率, 因材施教, 改善教学质量, 是一个亟待解决的课题。

从本案例可以看出, VB编程需要扎实的基础和一定的知识面, 通过本案例的实践, 本人认为, 在对学生知识面和综合能力的培养上, 必须坚持“宽基础”的教学方针;在VB的专业教学过程中, 教师应多联系实际, 从实际案例入手, 从提高学生的学习兴趣入手, 以真实的案例 (“活模块”) 为背景开展教学过程, 而不应仅仅拘泥于对枯燥的代码本身的理解。同时注重针对性、实用性, 才能取得事半功倍的教学效果。

中职课程教学中, 教辅软件对于很多课程是必要的。但是购买教辅软件, 需要不菲的费用, 而且某些教辅软件往往注重“大而全”, 却并没有为课程“量身订做”, 针对性不强, 有的课程只需要用到软件的少部分功能。因此, 如果能够结合VB编程课程制作一些简短的教辅软件作为实际案例, 既能够提高VB编程的针对性、实用性, 提高学生的学习兴趣, 又能为其它课程的教学提供辅助, 实现教学和实践相结合, 从而提高学生学习的兴趣和主观能动性, 提高VB课程教学的效率, 丰富教学的手段, 改善教学效果。

摘要：近年来, 由于生源素质不断滑坡等各种不利因素的影响, 中职学校的计算机专业的发展受到严重阻碍, 学生普遍存在基础差和厌学心理, 作为专业课VB教学首当其冲地陷入困难中, 如何改变这一状况, 本文从VB的一个具体案例入手, 阐述了学习VB的重要性, 对如何提高教学质量进行了思考。