在英文操作系统下提示:Run Time error'-2147467259(80004005) '的一种解决办法

我用的是access数据库。 在中文环境下运行毫无问题,但是等到了给老外装上去后,显示Run Time error-2147467259(80004005) .后来我试着将数据库全部改成英文的,仍然有这个问题,后来我在工具------>选项------->常规中将新建数据库排序次序改为...

2007-12-21 14:09:00

阅读数 6564

评论数 1

IT人士群聚喝酒的讲究----------摘自02级计算机本科

大家喝的是啤酒,这时你入座了…… 你给自己倒了杯可乐,这叫低配置。 你给自已倒了杯啤酒,这叫标准配置。 你给自己倒了杯茶水,这茶的颜色还跟啤酒一样,这叫木马。 你给自己倒了杯可乐,还滴了几滴醋,不仅颜色跟啤酒一样,而且不冒热气还有泡泡,这叫超级木马。 你的同事给你倒了杯白酒,这叫推荐配置。 人到齐...

2007-12-12 10:59:00

阅读数 557

评论数 0

如何设置excel中重复的单元格颜色

当在excel中输入相同的数据时,用不同的底色显示。比如说输入L2006A2008这个图号的时候,如果此前曾经有过这样的一个图号存在的话,就用红色的底色显示。设置如下:选中L2006A2008单元格A1,菜单-----》条件格式-----》公式,输入这样的公式=countif($A$1:$A1,$...

2007-12-11 09:13:00

阅读数 4978

评论数 0

教你如何做控件*.ocx--------------------摘自丹心软件设计

  一个控件有很多事件如:Click、MouseDown、MouseUp、MouseMove等。要触发这些事件都需要你加入代码。在控件的声明处加入Public Event Click()就表明该控件有一“Click”事件。自己编...

2007-11-19 17:26:00

阅读数 610

评论数 0

绿软必备:ActiveXDLL免注册调用的方法 ----------------摘自丹心软件设计

阿国哥的代码(找到链接后再补上),我稍微改良了一下,做绿色软件的朋友肯定用的到。IDE下可以引用那个dll使用。编译后可以在未注册dll的计算机上正常工作了。使用方法:Dim pDll As Long 记录Dll,用来最后完美释放Dim Update As Update.Handle 要实例化的对...

2007-11-19 17:16:00

阅读数 561

评论数 0

必须掌握的八个DOS命令!-----摘自天涯恨客的博客

一,ping      它是用来检查网络是否通畅或者网络连接速度的命令。作为一个生活在网络上的管理员或者黑客来说,ping命令是第一个必须掌握的DOS命令,它所利用的原理是这样的:网络上的机器都有唯一确定的IP地址,我们给目标IP地址发送一个数据包,对方就要返回一个同样大小的数据包,根据返回的数据...

2007-09-29 11:24:00

阅读数 474

评论数 0

关于对汉字长度的计算。用len 函数是错误的,应该用asc函数

由于中文是双字节字符,也就是说一个汉字占两个ASC码的位置,而VB显然是为英语国家设计的用Len函数无法返回汉字字节,也就是说一个汉字和和一个ASC字符在Len函数中得到的值是一样的,这就需要特殊处理。用Asc()函数,在括号内放入一个ASC字符或字符串,它会把第一个ASC码转化为0-255的数值...

2007-08-30 13:42:00

阅读数 1532

评论数 0

setup factory使用的一些技巧

1.创建快捷方式如果想将用setup factory 打包的文件在桌面上创建快捷方式的话,只要在打包前双击.exe文件,在弹出的窗口中进行有一个快捷方式,勾选桌面,ok了 2.安装后运行时出现错误错误提示:运行时错误76,找不到路径。解决办法:看看安装路径的时候是不是有空格,如果没有的话,试着把文...

2007-07-27 09:05:00

阅读数 1243

评论数 0

回车键时命令执行

希望当点击回车键时是某一个命令按钮执行该命令,比如用户登录窗体,当输入密码后,希望点击回车键使确定命令按钮执行,只要在如下命令加入:Private Sub txtPassword_KeyPress(KeyAscii As Integer)If KeyAscii = 13 Then    SendK...

2007-07-26 16:11:00

阅读数 1063

评论数 0

VB编程之提速攻略

  ● 判断空字符串   判断空字符串的常用方法是使用下面的语句:If my_string = "" Then... ,但是请采用另外一种方法,就是判断字符串的长度是否为0,这要比前者运行快,代码是: If Len(my_string) = 0 Then ... 。   ● ...

2007-07-24 09:57:00

阅读数 603

评论数 0

判断是否相等用is而不是"="以及null的使用注意事项

Dim ADim B As StringDim C As IntegerDim D As Object    A 等于 Empty, 因为尚未初始化的「不定型变量」都等于 Empty。但如果检测 A = "" 或 A = 0, 也都可以得到 True 值。    B 等于 &q...

2007-07-24 08:57:00

阅读数 488

评论数 0

VB中感叹号“!”与圆点“.”的用法差异

河北 马昱    在Visual Basic中,惊叹号“!”与圆点“.”都用于给对象命名,但两者语法上却存在很大的区别,这点在编程时尤其需要注意。    圆点操作符“.”用来表示对象的属性和方法,在引用时,需要用到对象的Name、圆点和需要的属性或方法。例如要引用文本框Textl中的文本属性时可用...

2007-07-24 08:55:00

阅读数 985

评论数 0

格式化输入。MASKED EDIT控件

    在数据输入过程中,有些数据要求一定的格式,比如限制输入的只能为数字或英文字符,这可用VB的格式输入文本框来实现。它与文本框(TEXT BOX)功能基本相似,但多了一个MASK属性,MASK属性常用的设定如下:       #—限定仅能输入数字0~9;       A— 限定输入为英文字符及...

2007-07-24 08:43:00

阅读数 915

评论数 0

防止程序自身多次运行。

    由于WINDOWS的多任务处理功能, 有些程序可能打开后忘记了,下次用时还可能再打开,这样做会占用系统资源降低系统效率。为了防止自身被多次运行,可利用VB应用对象提供的PrevInstance属性来检测内存中是否已有一个自身的副本,若有则给出提示后结束。一般将检测代码放在FORM_LOAD...

2007-07-24 08:27:00

阅读数 396

评论数 0

创建外部链接表示例

CreateLinkedTable()    Dim cat As ADOX.Catalog    Dim tbl As ADOX.Table    Dim aLocalLinkedTables() As String    Dim i As Integer    Dim cSourceDATA ...

2007-07-11 08:53:00

阅读数 513

评论数 0

记录集填充msflexgrid表格

以下程序用于用记录集填充msflexgrid表格,参数一为表格控件名,参数二为ado记录集名.Public Function datatogrid(pGrid As MSHFlexGrid, rs As ADODB.Recordset) As Boolean    本函数特别要求,对于含的小数点的...

2007-07-11 08:45:00

阅读数 674

评论数 0

两个字符串处理函数

个字符串处理函数:1、ParameterValue()2、ParameterCount() 用法示例:dim TheString as StringTheString="欢迎,光临,枕善居,源代码"msgbox ParameterCount(",",TheS...

2007-07-10 17:31:00

阅读数 366

评论数 0

判断数据类型函数

断数据类型的函数,不同于VarType() 函数,VarType() 函数返回的是 integer型值,这个函数返回的是字符串。Public Function getDataType(v As Variant) As String    Select Case VarType(v)        ...

2007-07-10 17:30:00

阅读数 516

评论数 0

各种Excel VBA的命令

为设置密码窗口 (1) If Application.InputBox("请输入密码:") = 1234 Then [A1] = 1 密码正确时执行 Else: MsgBox "密码错误,即将退出!" 此行与第2行共同设置密码 End If 本示例为设置密码...

2007-07-10 17:01:00

阅读数 988

评论数 0

科学家藏猫猫-------摘自马大哈的博客

一群伟大的科学家死后在天堂里玩藏猫猫,轮到爱因斯坦抓人,他数到100睁开眼睛,看到所有人都藏起来了,只有牛顿还站在那里。  爱因斯坦走过去说:“牛顿,我抓住你了。” 牛顿:“不,你没有抓到牛顿。”   爱因斯坦:“你不是牛顿你是谁?”   牛顿:“你看我脚下是什么?”   爱因斯坦低头看到牛顿站在...

2007-07-05 09:50:00

阅读数 810

评论数 1

提示
确定要删除当前文章?
取消 删除
关闭
关闭