网络编程 | 站长之家 | 网页制作 | 图形图象 | 操作系统 | 冲浪宝典 | 软件教学 | 网络办公 | 邮件系统 | 网络安全 | 认证考试 | 系统进程
Firefox | IE | Maxthon | 迅雷 | 电驴 | BitComet | FlashGet | QQ | QQ空间 | Vista | 输入法 | Ghost | Word | Excel | wps | Powerpoint
asp | .net | php | jsp | Sql | c# | Ajax | xml | Dreamweaver | FrontPages | Javascript | css | photoshop | fireworks | Flash | Cad | Discuz!
当前位置 > 网站建设学院 > 网络编程 > Visual Basic
Tag:注入,存储过程,分页,安全,优化,xmlhttp,fso,jmail,application,session,防盗链,stream,无组件,组件,md5,乱码,缓存,加密,验证码,算法,cookies,ubb,正则表达式,水印,索引,日志,压缩,base64,url重写,上传,控件,Web.config,JDBC,函数,内存,PDF,迁移,结构,破解,编译,配置,进程,分词,IIS,Apache,Tomcat,phpmyadmin,Gzip,触发器,socket
网络编程：ASP教程,ASP.NET教程,PHP教程,JSP教程,C#教程,数据库,XML教程,Ajax,Java,Perl,Shell,VB教程,Delphi,C/C++教程,软件工程,J2EE/J2ME,移动开发
本月文章推荐
.如何在Windows操作系统中改变文件.
.VB入门教程之二.
.在VB应用程序中调用Excel2000.
.另辟蹊径处理字符串中的字符：字.
.文件系统控件的使用.
.Whois示例程序.
.数据库的结构---VB数据库入门之（.
.用VB学做“黑客”程序.
.使用ADO來压缩或修复MicrosoftAc.
.取得某个目录底下所有文件大小总.
.用VB编写入侵监听程序(上).
.用VisualBasic设计个性化文件夹图.
.使用ADD-IN技术加强VisualBasic开.
.创建不规则窗口.
.打开文本文件各种方法.
.建立、改变及重构Access数据库.
.MDB文件的导出-使用DAO.
.递归过程在VB中的应用实例.
.用VB测定可移动驱动器是否准备好.
.VisualBasicCommonDialog控件的使.

在抓取资料库之资料前先计算资料总笔数

发表日期：2006-2-27

SubForm1_Load()
DimdbAsDatabase
DimdsAsSnapshot
DimiNumAsInteger'总笔数
DimwsqlAsString'SQL字串

wsql="SelectCount(*)fromAuthorsWhereAU_ID>10"
Setdb=OpenDatabase("c:\vb\biblio.mdb")
Setds=db.CreateSnapshot(wsql)
iNum=ds(0)
MsgBox"总笔数为" Str$(iNum)
EndSub

怎么样，是不是一样呢，只差在一个是ADO，一个是DAO而已！->
上一篇：VisualBasic制作透明的表单(Form) 人气:4283
下一篇：VisualBasic程序启动时，自动判断Access资料库是否损毁并自动修复 人气:4511
浏览全部Visual Basic的内容 Dreamweaver插件下载 网页广告代码 祝你圣诞节快乐 2009年新年快乐