VB
文章平均质量分 55
lanman
总是有无数的领域想要去涉猎,可是总是什么也没有做...
展开
-
spread删除行时绑定与不绑定数据时表现不同
一般来说,用 With Spd1 rr = .ActiveRow .DeleteRows rr, 1 .SetSelection 1, rr, 2, rr .MaxRows = .DataRowCntEnd With可以删除该行,但带有数据源绑定与不带有绑定表现不一不带数据源绑定时,deleterows命令正常删除该行,并在下面自动增加一空白行。帮助如是原创 2007-06-30 16:11:00 · 1796 阅读 · 0 评论 -
如何实现那种流行的平面按钮
如何实现那种流行的平面按钮编号:QA000029建立日期: 1998年10月1日 最后修改日期:2000年10月15日 所属类别: Visual Basic - 第三方控制Visual Basic - Windows 9x控件Visual Basic - 标准控件 张立斌: 时下流行的那种按钮(平时是平面,鼠标移上去后突起,按下去是凹陷状,移开后又成为平面)在VB5转载 2007-08-28 11:36:00 · 2636 阅读 · 0 评论 -
操作模式不正确使得spread列中不能显示按钮
今天在spread列中显示按钮,结果怎么也不显示,找了很久的原因,终于发现,问题出在OperationMode 属性上。如果OperationMode 设为OperationModeRow,则所有表格中的列全部不显示,只有改成OperationModeNormal才会显示成按钮。与按钮有关的属性主要有两个要注意: .OperationMode = OperationModeNorma原创 2007-09-17 17:37:00 · 1548 阅读 · 0 评论 -
缇 Twips的换算
缇每逻辑英寸为 1440 缇每逻辑厘米为 567 个缇这两个数值应该是固定的,使用时直接换算就可,不用改变ScaleMode 值。一般情况下屏幕的 TwipsPerPixelX=15,而且改变分辨率对此值没有影响,不知道什么时候每像素的缇数不是15。原创 2007-11-19 14:37:00 · 1108 阅读 · 0 评论 -
关于Spread打印的一些属性用法__页眉页脚的使用
页眉页脚的使用 使用属性p_SpreadPrint.PrintHeader = headerstringp_SpreadPrint.PrintFooter = headerstring其中HeaderString是一个字符串,有一些预定义格式,如/fn"MS Sans Serif"/fz"8.25"/fb0/fi0/fu0/fk0/c中/fn"MS Sans Serif"/fz"8.2原创 2007-11-19 14:01:00 · 1817 阅读 · 0 评论 -
Spread的虚拟模式Virtual Mode
虚拟模式也就相当于自动分页,将大量数据分次读取,不用一次性全部装入表格,如果数据量大的话,速度可以得到明显的提升,尤其是spread本身装数据就比datagrid等慢。在设计器中直接打开比较方便,一般情况下,我将Virtual Max,Max Virtual Rows,Rows Per Read三个参数分别设1000000,100,20。设置完成后,记的一定不用再使用spread.data原创 2007-11-21 21:23:00 · 2126 阅读 · 0 评论 -
vb如何读写ini文件
VB中有没有读取INI文件的函数,同样功能的API函数是什么? 回答: VB没有直接读写INI文件的语句,必须借助Windows API来操作INI文件。相应的Windows API函数有两类:一类是GetProfileInt、GetProfileString、WriteProfileInt和WriteProfileString,它们是读写Win.ini中的设置;另一类是GetPr原创 2007-11-28 08:24:00 · 3723 阅读 · 0 评论 -
on error resume next 的作用范围
一直对这个不太清楚,帮助里似乎也没有说,于是今天作了个测试1、On Error 可作用到被调用的子函数中在调用过程前使用on error ,发现对过程内的执行起作用。代码注:数据库中没有 abcd 此表,所以正常情况下应该会报错。sub mainon error resume nextConn.Execute ("select * from abcd") 忽原创 2007-12-07 10:47:00 · 7066 阅读 · 0 评论 -
无法为更新定位行。一些值可能已在最后一次读取后已更改 错误提示的处理办法(vb)
这种情况的出现,一般是上一次进行update后,有的字段可能的默认值或被其它用户更改,却没有进行同步,在下一次进行update时,就会出现这种错误。解决办法:在每次update后,或改变数据前,使用rs.Resync adAffectCurrent语句即可。示例: aa = "sdfgsgsgsdf9866234" Do Until ttrs.EOF原创 2008-03-13 01:05:00 · 4876 阅读 · 0 评论 -
SQL Server端口更改后的数据库连接方式
SQL Server默认端口为1433,我们可以通过"服务器端网络试用工具"和"客户端实用工具"来设定,设定方法是:分别使用"服务器端网络试用工具"和"客户端实用工具"设置"常规选项"->"启用的协议"->"Tcp/Ip"->"属性"中的默认端口,假设为1455然后测试你的端口是否起效,可以使用telnet sql服务器地址 1455看看能不能telnet通,如果可以,那就可转载 2007-12-18 17:44:00 · 1114 阅读 · 0 评论 -
用vb来Ping的源代码
Option Explicit Public Const IP_STATUS_BASE = 11000Public Const IP_SUCCESS = 0Public Const IP_BUF_TOO_SMALL = (11000 + 1)Public Const IP_DEST_NET_UNREACHABLE = (11000 + 2)Public Const IP_DEST_HOST_UN原创 2008-01-02 08:36:00 · 1824 阅读 · 0 评论 -
使用vb调用vba在word中插入图片的代码
过程名:wdout作用:使用定义好的模板,自动将其中的形如{????}的字符以字段中的内容替换,并将{照片}替换成照片。如果没有照片,则删除相应的替换字符。参数:photofile——照片文件的路径字符串,为完整绝对路径。不判断文件是否存在,如果不存在将出错。插入图片其实只有一句wdApp.Selection.InlineShapes.AddPicture FileName:= _原创 2008-04-09 01:03:00 · 16576 阅读 · 2 评论 -
简单方法获取数据连接的字符串(UDL文件)
编程序时,那长长的数据连接字符串相信一般人是记不住的,大部分人都是在网上查到现成的后COPY过来用,但毕竟还是很麻烦,有时候一时半刻还找不到合适的,今天无意中在网上发现了一个非常好的办法,真的是太太太方便了!! 首先,在桌面上建一个名为conn的txt文本文件,然后将后缀名改为udl ,然后双击它,打开相应对话框。 其次,我们选择要设置的连接,这里选择的是sql server原创 2009-01-21 10:12:00 · 2386 阅读 · 0 评论 -
十万行代码!!!
前些天,看到网上雷军写的一篇好象是叫给程序员的几个建议,说到程序员必须要写够十万行代码才能成为高手,不要心存侥幸。于是我回来计算了一下我的程序,不算不知道,一算吓一跳,居然有超过9万行的代码。如果不算表单属性等,也有45000多行纯代码,这还不算很多我已经删除的。当然,这当中还是有很大是没有用的,是以前留下来的无用代码暂时还没有删除,但至少,这些代码全是我一行行写出来的。 我的这个程序说起原创 2008-12-11 21:46:00 · 14003 阅读 · 4 评论 -
软件工程的铁律:可能出错的地方一定会出错
雷军:一定要牢记软件工程的铁律:可能出错的地方一定会出错。每个变量都做初始化,引用每个参数都会做有效性检查,在可能出错的每个地方都会做边界条件检查,这样开发出来的程序一定会稳固很多,就是出错也会很容易修改。野路子出来的高手,一般开发速度很快,但做完后bug很多,经常需要很长时间修改。而真正的高手,追求的境界是bugfree code(零缺陷代码)。原创 2008-12-11 22:25:00 · 1773 阅读 · 0 评论 -
找到一个TWAIN扫描控件:Dynamic TWAIN ActiveX 3.0
最新好象是4.0吧,但一般使用这个应该够了。http://download.csdn.net/source/221195Dynamic TWAIN ActiveX控件 能使你从兼容TWAIN的任何设备中获取图象,设计细致的接口。内建有范例模式,使得Dynamic Twain非常容易使用,你能在服务流程的代码里做到典型的TWAIN编程,同时它的功能也非常强大,集成TIFF和JPEG的编码器和原创 2007-08-03 10:02:00 · 10681 阅读 · 11 评论 -
在打开有模式窗体后还能"显示"无模式窗体
原来写的一个显示等待窗口的过程,现在用不成了,因为我几乎所有的窗口 都改成了有模式的,即用 .show 1来调用,结果以前的过程用不成了,因为调用等待窗口不能用模式的,否则就真一直等下去了。在google查了好久,也发贴问了,都没有很好的答案,结果我想了又想终于让我想出一个好办法来:那就是,即然显示了 模式 窗口后就不能再显示无模式窗口,那么,我先显示那个无模式窗口不就结了!!于是开始原创 2007-08-01 15:35:00 · 4728 阅读 · 1 评论 -
spread editmode进入编辑状态
Spd1.SetFocusSpd1.EditMode = True将当前的活动单元格设置为可编辑状态——即出现光标的编辑状态。第一句必不可少!原创 2007-06-30 16:20:00 · 3262 阅读 · 0 评论 -
将声音图片等加入自定义资源,并可释放出来
资源文件你可以用vb自带那个资源文件编辑器编辑在 外接程序 - 外接程序管理器那里 调出或者你可以用vc++的资源编辑来编辑也可以然后是怎样 将自定义资源中的文件释放出来***************************************************************************模 块 名:GetResFile**说 明:将自定原创 2007-07-04 11:24:00 · 1579 阅读 · 0 评论 -
VB的SUBCLASS控件
Midnight Subclassing Control For vb 2.0现在用 Subclass 技术的朋友越来越多。大家有一个共同目标——成为 Hardcore 程序员。但是在 Subclass 技术给我们带来无限想象空间的同时,一个严酷的事实摆在面前——在 VB 的 IDE 中,一旦使用 Subclass 技术的程序出错,其后果很可能就是 Crash!这简直是一个噩梦!纵然你转载 2007-07-04 11:12:00 · 1566 阅读 · 0 评论 -
SQL SERVER重置自动编号列(标识列)
两种方法:一种是用TruncateTRUNCATE TABLE name可以删除表内所有值并重置标识值 二是用DBCC CHECKIDENTDBCC CHECKIDENT (table_name, RESEED, new_reseed_value)如dbcc checkident ("bc_pos",reseed,1)即可,但如果表内有数据,则重设的原创 2007-07-04 10:42:00 · 9829 阅读 · 0 评论 -
确定一个Excel表格的最大行数和最大列数
怎么确定一个Excel表格的最大行数和最大列数?基于第一个问题,如果中间有跨行列的单元格,那么就有空值,不能简单通过循环确定最大行列数。 Dim xlWorkSheet As Excel.WorkSheet = xlApp.ActiveWorkbook.ActiveWorkSheet Dim intRows As Integer转载 2007-07-10 08:27:00 · 9858 阅读 · 0 评论 -
通用方法:用建立Excel对象的方法来导出数据
下面介绍一个用VB如何快速导出数据库为EXCEL文档。 在网上的导出为 EXCEL文档的方法大概是这样的 Dim i As Integer, j As Integer Dim myexcel As New Excel.Application Dim mybook As New Excel.Workbook Dim mysheet As New Excel.Worksheet转载 2007-07-09 09:43:00 · 1027 阅读 · 0 评论 -
Ado下事务的操作方法
BeginTrans、CommitTrans 和 RollbackTrans 方法 这些事务方法按如下方式管理 Connection 对象中的事务进程: BeginTrans - 开始新事务。 CommitTrans - 保存任何更改并结束当前事务。它也可能启动新事务。 R原创 2007-07-16 14:16:00 · 4469 阅读 · 0 评论 -
spread中datafill事件为什么不起作用?
spread帮助中如是说:Occurs for each cell in the fpSpread control before it receives data from the database and before it writes data to the database, if the DataFillEvent property is set to True for the ce原创 2007-07-21 11:41:00 · 2097 阅读 · 0 评论 -
在哪里可以找到office的对象模型文档?
在哪里可以找到对象模型文档?loadTOCNode(3, moreinformation);Office 应用程序的对象模型记录在 Office 两个版本的语言参考中:Microsoft Office 97 Visual Basic for Applications 语言参考ISBN 1-57231-339-0Microsoft Office 2000 Visual Basic for A转载 2007-07-24 23:54:00 · 2856 阅读 · 0 评论 -
在VB中,快速为表的一列生成序号
其实很简单SQL = "declare @a1 int set @a1=0" & vbCrLfSQL = SQL & "update test set @a1=@a1+1, vv=@a1"Conn.Execute SQL将多行用vbcrlf分隔开就可以了。同理,如果想运行一个多行的命令,将语句后的 go 去掉用 vbcrlf 连起来运行就ok了,这样就不用动用存储过程。说原创 2007-07-24 17:16:00 · 1405 阅读 · 0 评论 -
spread 打印示例代码
范例C:/Program Files/FarPoint Technologies/Spread70/samples/ActiveX/VB6/OwnerPrint/Project1.vbpfpSpread1.PrintUseDataMax = FalsePrinter.Print "British Open 2001 Best Ball Results"fpSpread1.PrintHead原创 2007-07-26 23:26:00 · 3662 阅读 · 0 评论 -
MDI窗口中实现自动缩放的背景图
本来想用mdiform.picture.render方法,但最后一下参数怎么也搞不清,于是想了个变通办法,发现这样实现其实更加方便,很多其它没办法实现的东西也可以实现了。原理是创建一个新的专门用来作背景的窗体,将其caption 清空,controlbox设为false,mdichild设为true。然后在代码 窗口中写入:Option ExplicitDim ppPrivate Su原创 2007-07-30 14:05:00 · 1563 阅读 · 0 评论 -
窗体中,me对象可以省略不写
今天程序中无意中写了 tag=???,本来是要写 .tag的,结果发现程序居然没有报错,再实验一下,才发现在窗口中写代码时,所有本窗口的属性全部可以直接使用,不用加 me. 进行限定。所以程序中使用变量时,可能还是要注意一下,小心不要和窗口属性同名,不然可能用了都不知道问题出在哪里!原创 2007-07-30 15:54:00 · 929 阅读 · 0 评论 -
c#中format函数功能之一的VB实现——参数替换rFormat()
前几天参加C#培训,发现其中的FORMAT参数替换功能实在是实用,尤其是在写SQL语句的时候,比如一个SQL 语句insert into (f1,f2,f3) values (v1,v2,v3)如果要用VB来写,要加一串的 "" 和 & 连字符,实在是难写又难看。基本上只要参数一多,几乎100%要写错。如果用C#来写,就是这样str sql="insert into (f1,f2,f3原创 2008-12-11 23:53:00 · 1985 阅读 · 1 评论