![](https://img-blog.csdnimg.cn/20201014180756780.png?x-oss-process=image/resize,m_fixed,h_64,w_64)
VB6.0
Huahua,Zhu
点点滴滴积累,点点滴滴进步
展开
-
Win7数据源(ODBC)配置只有SQLSever的驱动???
今天在调试红皮书例2代码的时候,要创建ODBC数据源而再打开创建数据源窗体之后发现只有SQLSever的数据源驱动,而没有Access数据源那么该如何办??? 为何出现 这种情况: 是因为 :win7的64位系统默认运行的是C:\Windows\System32\odbcad32.exe打开“ODBC数据源管理器”窗口,是没有access的数据源 该如何原创 2013-06-13 21:43:24 · 4633 阅读 · 7 评论 -
解析VB编程关键字New(一)
在编代码时我们经常见到Dim MyObject As New ObjectDim MyObject As Object Set MyObject =New ObjectSet MyObject = Object究竟加这几句话有什么区别,我们平常写的代码究竟对不对哪?? Dim语句用来声明变量并分配存储空间。可以使用 Dim 语句在模块级或过程级中声明变量的原创 2013-12-06 10:52:03 · 3414 阅读 · 16 评论 -
VB6.0中没有ADO控件该如何办???
今天我敲例3时,在控件中没有找到 Microsoft ADO data control 6.0 (OLEDB) 控件,经过查资料解决了这个问题。现与大家分享。 首先需要下载一个文件MSADODC.ocx 有的资料说还要同时下载MSDATGRD.ocx 其实不用,这个是另外一个控件Microsoft DatGrid control 6.0 (OLEDB)。 第一步:下载原创 2013-06-08 21:36:01 · 8618 阅读 · 9 评论 -
解析VB编程关键字New(二)
语法Set objectvar= {[New]objectexpression | Nothing}Set 语句的语法包含下面部分:New可选的。通常在声明时使用 New,以便可以隐式创建对象。如果New 与 Set 一起使用,则将创建该类的一个新实例。如果objectvar 包含了一个对象引用,则在赋新值时释放该引用。不能使用 New 关键原创 2013-12-06 11:01:08 · 2453 阅读 · 17 评论 -
数据库的访问(三)
任何数据库的访问都是建立在链接的接触上。根据我目前的理解,暂时用到的连接方式有三种:如图(思维导图)第一种、使用ADO之间连接数据库 在连接的字符串中必须指定正确的数据提供者(Provider)、数据库、数据库服务器、访问数据库身份验证方式以及用户名、口令等信息。Connection连接对象,用于创建数据源的链接。在使用其他对象和访问数据源之前必须先建立数据源的链原创 2014-02-10 20:13:29 · 1483 阅读 · 22 评论 -
数据库连接(二)
这篇博客简绍ADO对象:ADO对象在VB中使用ADO对象访问数据库必须建立对ADO对象的应用ADO三个独立对象有Connection Command Recordset和四个非独立对象Field、parameter、property、error非独立对象以来与独立对象使用。ConnectionString属性指定链接数据源的基本信息。 R原创 2014-02-10 20:07:41 · 1195 阅读 · 14 评论 -
为什么程序要打包
打包,是将你用VB程序写的软件包装成一个在别的机子上直接安装运行的应用软件。 打包是打包的环境。为了在没装VB的机子上运行,因为vb程序运行是需要vb运行持的,如果那台机子上没装VB而你的vb程序又没有打包这个运行库的话。你写的vb程序在那台机子上是运行不了的。 如果你得机子上运用了第三方控件该怎么办?? 也就是在你没有考虑这个问题的情况下,程序异地发布后出现了这原创 2014-02-10 20:53:13 · 5215 阅读 · 21 评论 -
数据库连接(一)
我的机房收费系统一直不可以异地发布,为了解决这个问题,又从新看了一下关于数据库链接一部分的知识,现在做一下总结。 先简绍几个概念: ADO (ActiveX Data Objects,ActiveX数据对象)是Microsoft提出的应用程序接口(API)用以实现访问关系或非关系数据库中的数据。 OLEDB(Object Linking andEmbeddi原创 2014-02-10 20:01:57 · 1203 阅读 · 12 评论 -
异地发布
我的机房收费系统在异地发布时真是几经波折啊。现在说一下我对异地发布的认识吧。所有认识及操作是在环境为局域网的前提下。 异地发布 是把你的数据库和你的打包好的软件分别放到两台机子上,看软件是否可以访问另一台机子上的数据库,正常运行。而放有数据库的机子相当于服务器了,让另一台机子来访问。而数据库可以被访问的前提就是,两台机子可以互相访问,传输数据。 而这个可以通过用WIN加原创 2014-02-10 20:28:18 · 1457 阅读 · 26 评论 -
机房结账(一)
今天把机房收费系统的最后一块整完了.也就是日结账,和周结账这块,现在总结一下。先理一下大概思路。1、首先你要把数据库中的表数据整理好 你要做的是在结账窗体时把汇总做好,然后把数据总结到日结账表中。 在汇总时我用到了两个比较麻烦的问题问题1、查询数据库中一个字段数据的总和,这里我给出代码 Select Sum(l列名) as原创 2014-01-01 22:02:21 · 1412 阅读 · 11 评论 -
机房结账(二)
通过上篇博客我们知道了该如何做,下面写一下我的认识 首先,是报表什么,简单的说:报表就是数据的呈现。在没有计算机以前,人们利用纸和笔来记录数据,比如:民间常常说的豆腐帐,就是卖豆腐每天将自己的卖出的豆腐记在一个本子上,然后每月都要汇总算算。这种情况下,报表数据和报表格式是在一起的,他们都在一个本子上。此时的数据只能有一种表现形式,且这种形式难于修改和传递。当计算机出现之原创 2014-01-01 22:07:52 · 1270 阅读 · 18 评论 -
学生信息管理系统的功能块问题
今天敲学生信息管理系统修改班级信息窗体时,当敲到删除记录的代码时,突然对“功能块”这一概念理解的非常深。下面拿这段代码来解释一下:If str2$ = vbOKThen mrc.MoveNext '找到删除后要显示的下一条,显示出来 If mrc.EOF Then mrc.MoveFirst原创 2013-08-18 19:33:20 · 1316 阅读 · 8 评论 -
编程要注意的问题
今天师父验收完毕,现在要整理一下自己存在的问题。 首先是界面的问题,界面字体太小,界面控件不整齐,确定按钮要用汉语,不可用OK等英语。我们编程是给大家看的,而别人看我们程序的第一眼是界面。就像我们自己看别人的界面一样,如果太不整齐,不正式,不舒服,我们也不愿意看的。 Combobox控件选择与输入的问题。无论什么控件,如果可以输入,一定要限制输入字符的长度和类型,不要让他什么原创 2013-08-24 21:30:07 · 1114 阅读 · 10 评论 -
标记和标志
一、关于bookmark 用 Bookmark 属性保存当前记录的位置并随时返回到该记录。只有在支持书签功能的Recordset 对象中,书签才可用。 打开 Recordset 对象时,它的每个记录都有一个唯一的书签。若要保存当前记录的书签,请将Bookmark 属性的值分配给一个变量。也就是:mybookmark=mrc.bookmark 若要原创 2013-08-24 21:11:03 · 1180 阅读 · 8 评论 -
代码注释
这篇博客是关于一些代码小细节的问题:一、 If Not testtxt(txtResult.Text) Then MsgBox "请输入分数", vbOKOnly + vbExclamation, "警告" txtResult.SetFocus Exit Sub End If解释:ExitSub '出错后,跳出过程,改正后,重新执原创 2013-08-24 21:01:48 · 1004 阅读 · 8 评论 -
代码注释
这篇博客是关于一些代码小细节的问题:一、 If Not testtxt(txtResult.Text) Then MsgBox "请输入分数", vbOKOnly + vbExclamation, "警告" txtResult.SetFocus Exit Sub End If解释:ExitSub '出错后,跳出过程,改正后,重新执行该过称原创 2013-08-24 21:01:06 · 1026 阅读 · 4 评论 -
体验学生信息管理系统
这篇博客是关于我敲学生信息管理系统的感受。 说实话,当我开始要敲系统的时候,我真的不知道,该怎么做,该怎么开始,应该改怎么敲。一看到那么多的窗体,我就开始从心理上抵触。所以,这时候,我就把我的九期师傅给喊来了。师傅告诉应该如何开始,如何一个一个的敲窗体,应该就着一条线走。把握它的主线,敲通一条在开始另外一条。经师傅一说,突然发现自己好傻呀,这么简单的问题,就不知道,还把师傅喊下来。原创 2013-08-24 20:05:09 · 1076 阅读 · 3 评论 -
代码之上机时间的计算
当时敲上机时间计算那个窗体时,真的感觉非常难,问别人吧,但是大家都是计算的一天之内的上网时间,也就是上网时间在24之外,计算的结果就不正确了.下面这段代码就解决上网时间超过24小时的问题‘窗体级别定义,整个窗体调用Dim onboard As DateDim offboard As Date Private Sub CmdOn_Click()'记录上机时间 TxtOnD原创 2013-12-15 22:09:26 · 1612 阅读 · 16 评论