●建立D2T巨集，并把快速键设为Shift Ctrl T。 ●写入程式码： Sub D2T() Dim MyStr As String MyStr = ActiveCell.Text If IsNumeric(MyStr) = True Then ActiveCell.Value = "" Select Case Len(MyStr) Case 1 OneDG (MyStr) Case 2 TwoDG (MyStr) Case 3 ThreeDG (My...

2008-02-23 06:54:25

二、数据处理 数据连接建立后，可以用openrecordset方法打开一个记录集，并可用dbgrid控件和data控件方便地浏览整个记录集。如果使用表类型（table-type）记录对象，则对应的是一个实际存在的数据库表，在多用户环境下，其它用户对数据的修改会立即反映到表中；如果使用...

2008-02-23 06:54:26

在VB中，用microsoft jet数据库引擎和数据访问对象DAO（data Access object）可以创建功能强大的客户/服务器应用程序。对远程数据库的访问是开发这类应用程序的关键环节，本文将介绍在VB中用DAO通过miscrosoft jet数据库引擎访问远程数据库的方法。 用DAO访问远程数据库...

2008-02-23 06:54:23

数据报表（DataReport）是VB6新增功能之一。用过它的朋友对这个设计器可以说是既爱且恨。尽管它功能强大，但却有个非常致命的缺点：无法在设计环境中改变纸张大小及走向。即使你在程序中使用Printer对象改变纸张大小及打印走向，也解决不了问题。对于非A4纸的报表或是横...

2008-02-23 06:54:24

一、 数据库的设计 数据库可以采用微软的Access97或者SQL Server来进行，首先新建一张表，取名为Table，添加三个字段，分别是：姓名 Char型（SQL Server中）文本型（Access中）；编号Char型（SQL Server中）文本型（Access中）；照片image型（SQL Server中）OLE对象（A...

2008-02-23 06:54:23

你是否已厌倦机上的屏幕保护程序，而又苦于难找到令自己满意的。不急，“自己动手，丰衣足食”，你自己就可以制作精美的屏幕保护程序，只要你稍有VB编程知识。下面我们就用VB来编写一个介绍自己家人的屏幕保护程序。 1、 获取屏保图片： 从你家人的相片中，挑出你选定...

2008-02-23 06:54:21

用户退出程序时若能告诉用户程序当次用了多长时间、时间过长的话则提醒用户注意休息，我想这样的创意应是对用户的一种体贴，会使我们的软件更具亲和性，也给我们的软件添色不少。VB中可利用Now函数或者Timer控件完成此设想。 用Now函数能保证时间统计的准确性。思路是这...

2008-02-23 06:54:21

TextBox控件没有象RichTextBox控件那样集成有查找即Find功能，为此要在TextBox中查找和继续查找字符串得花点儿心思。我们可以用VB的InStr函数来实现。 InStr函数提供了在一个字符串中查找另一个字符串的功能。我们可以把TextBox中的文本看作是一个字符串，这样，查找就...

2008-02-23 06:54:19

比如说，我们在表单上设置了一个计时器控件，这个定时器的任务就是在表单上显示当前的时间，同时设置当程序运行时启动定时器。程序运行后，当前的时间将在表单上实时地显示出来。但如果我们同时设置一个command按钮，并设计它的click事件为调用msgbox显示一个随意的信息...

2008-02-23 06:54:19

这一次写的是如何用VB来写网路程式的方法，你可不要以为这是什么深奥的程式，其实只要一个Winsock 控制项就可以了，现在就来介绍一下Winsock 的用法： 步骤一：首先要先把控制项给叫出来，你只要按下Ctrl T後选取Winsock Control 5.0若是用VB6 的就选Winsock Control 6....

2008-02-23 06:54:17