`
文章列表

用VB制作TopMost类型窗口

TopMost这个词也许你很陌生，但具有TopMost窗口的软件你应该早就接触过，如Office97、网络吸血鬼、IE等。所谓TopMost窗口是指哪些始终出现在桌面的最前方且不会被其它窗口覆盖的窗口，如网络吸血鬼中的下载图标。 一般憎况下， ...

关于Excel中的属性 超经典

(一) 使用动态创建的方法首先创建 Excel 对象，使用ComObj: var ExcelApp: Variant; ExcelApp := CreateOleObject( 'Excel.Application' );1) 显示当前窗口： ExcelApp.Visible := True;2) 更改 Excel 标题栏： ExcelApp.Caption := '应用程序调用 Microsoft Excel';3) 添加新工作簿： ExcelApp.WorkBooks.Add;4) 打开已存在的工作簿： ExcelApp.WorkBooks.Open( 'C:/Excel/Dem ...

实现VB与EXCEL的无缝连接

excelvbobject
一、 VB读写EXCEL表：　　VB本身提自动化功能可以读写EXCEL表，其方法如下：　　1、在工程中引用Microsoft Excel类型库：　　从"工程"菜单中选择"引用"栏；选择Microsoft Excel 9.0 Object Library（EXCEL2000），然后选择"确定"。表示在工程中要引用EXCEL类型库。　　2、在通用对象的声明过程中定义EXCEL对象： Dim xlApp As Excel.ApplicationDim xlBook As Excel.WorkBookDim xlSheet As Excel ...

ZOrder的使用

ZOrder的使用 ZOrder 拆开以后就是 Z 及 Order，其意义说明如下：Z：这里是指三度空间中的 Z 座标轴 (注一)，而不是指英文字母的第 26 个字母。Order：排列顺序。所以 ZOrder 就是指在 Z 座标轴上的排列顺序！ ZOrder 语法如下： object.Z ...

SQL SERVER 与ACCESS、EXCEL的数据转换

熟悉SQLSERVER2000的数据库管理员都知道，其DTS可以进行数据的导入导出，其实，我们也可以使用Transact-SQL语句进行导入导出操作。在Transact-SQL语句中，我们主要使用OpenDataSource函数、OPENROWSET函数，关于函数的详细说明，请参考SQL联机帮助。利用下述方法，可以十分容易地实现SQLSERVER、ACCESS、EXCEL数据转换，详细说明如下：一、SQLSERVER和ACCESS的数据导入导出常规的数据导入导出：使用DTS向导迁移你的Access数据到SQLServer，你可以使用这些步骤:　　○1在SQLSERVER企业管理器中的Tools（ ...

至理名言

1. 择善人而交, 择善书而读, 择善言而听, 择善行而从。　　　　2. 一个人的快乐，不是因为他拥有的多，而是因为他计较的少。　　　　3. 生气，就是拿别人的过错来惩罚自己。原谅别人，就是善待自己。　　　　4. 未必钱多乐便多，财多累己招烦恼。清贫乐道真自在，无牵无挂乐逍遥。　　　　5. 静坐常思己过，闲谈莫论人非，能受苦乃为志士，肯吃亏不是痴人，敬君子方显有德，怕小人不算无能，退一步天高地阔，让三分心平气和，欲进步需思退步，若着手先虑放手，如得意不宜重往，凡做事应有余步。持黄金为珍贵，知安乐方值千金，事临头三思为妙，怒上心忍让最高。切勿贪意外之财，知足者人心常乐。若能以此去处事，一生安乐任逍 ...

Ado打开数据库

SQL ConnectString = "Provider=SQLOLEDB.1;User ID=sa;Password=;Initial Catalog=Insect_DB;Data Source=127.0.0.1" cnn.open ConnectString If InStr("INSERT,DELETE,UPDATE,CREATE,ALTER,DROP,EXEC", UCase$(sTokens(0))) Then cnn.Execute sql MsgString = sTokens(0) & " query success ...

操作必须使用一个可更新的查询

对于数据库文件，如果涉及到写操作，就要去掉该文件或文件夹的只读属性。此外，如果安装时采用了NTFS文件系统，还需要将该文件或文件夹设置为EveryOne（任何人）可以完全控制。 对于数据库 mrc.CursorType = adOpenKeyset mrc.CursorLocation = adUseClient mrc.LockType = adLockOptimistic

ADO连接excel表格，怎样访问数据？

VB是常用的应用软件开发工具之一，由于VB的报表功能有限，而且一但报表格式发生变化，就得相应修改程序，给应用软件的维护工作带来极大的不便。因此有很多程序员现在已经充分利用EXECL的强大报表功来实现报表功能。但由于VB与EXCEL由于分别属于不同的应用系统，如何把它们有机地结合在一起，是一个值得我们研究的课题。　　一、VB读写EXCEL表：　　VB本身提自动化功能可以读写EXCEL表，其方法如下：　　1、在工程中引用MicrosoftExcel类型库：　　从"工程"菜单中选择"引用"栏；选择MicrosoftExcel9.0ObjectLibrary（EX ...

关于“所有记录中均未找到搜索关键字”的错误

这个错误是数据库损坏造成的。可以打开数据库选择工具菜单--数据库实用工具-压缩和修复数据库，就可以进行修复。目前nblog没有在后台自带压缩数据库功能，在access里同样提供了这个功能。我打算在nBlog v1.1 Release里加入压缩数据库以及备份功能。

如何删除垃圾文件

windows
1.删除系统产生的临时文件　　Windows在安装和使用过程中产生的垃圾包括临时文件（如*.tmp、*._mp等）、临时备份文件（如*.bak、*.old、*.syd等）、临时帮助文件（*.gid）、磁盘检查数据文件（*.chk）以及*.dir、*.dmp、*.nch等其他临时文件。你可以通过系统的“查找”功能，将这些“垃圾”从硬盘中找出来删除掉，方法：将这些文件全选后击鼠标右键，选择删除即可，如图5。“C：/Temp”和“C：/WINDOWS/Temp”这两个临时文件夹也是“垃圾”滋生地，里面存放的都是临时文件，可放心地全部删除。此主题相关图片如下： 2.删除不常用的文件　　在“控制面板”中 ...

VB中不规则图形热点的实现

vb
所谓图形热点就是指定图形或图像上的某部分区域，当鼠标在这部分区域上单击或双击时，就像命令按钮一样会引发相应事件。笔者在VB 5中用Windows提供的三个API函数轻松实现了任何形状的图形热点，在此具体介绍这一技术的实现步骤。　　首先在VB5中新建一"标准EXE工程"，设置窗体Form1的ScaleMode属性为3。在窗体代码的声明部分定义如下三个API函数：　　Private Type POINTAPI　　　　x As Long　　　　y As Long　　End Type　　Private Declare Function CreatePolygonRgn Lib &qu ...

在VB6中实现Kodak控件编程

vbkodakimgkodak
一、Kodak控件介绍 　　映像KODAKIMG.EXE是Windows 95/ 98/NT 和 Windows 2000中用于图像扫描、浏览和编辑的附件程序（在WINDOWS安装过程中是可选的），分为自由版和专业版（需另外购买）。在Windows的安装过程中，4个OCX　Kodak控件（Kodak图 ...

垂直的算法

VB
工程中先引用控件 Line1，Line2 Dim ux As IntegerDim uy As Integer Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)ux = Xuy = YLine1.X1 = XLine1.X2 = XLine1.Y1 = Y - 300Line1.Y2 = Y + 300End Sub Private Sub Form_MouseMove(Button As Integer, Shift As Integer, X As Sing ...

VB远程访问数据库

首先，安装SQL，虽然网上有人说Access也可以弄成网络数据库，不过本人不是很熟，本人只对SQL知道比较多一点，安装好以后，最好打补丁SP3，如果不打，我试过，有时不知道什么原因拒绝访问，安装好了，后主要设置如图所示： 然后是权限，找到SQLSERVER——（Local）windowsNT下的安全性，一般是sa，你可以添加用户或者添加密码，但是后面VB调用时记得对应一致就好了其次是vb的代码，如下： 这样就可以放心大胆的用了，哦，记得vb中引用那个ActiveXdataObjects2.6....哦
Global site tag (gtag.js) - Google Analytics