随笔分类 - VB
摘要：目前在做产线软件的维护，远程连接方式由winsock协议转变成ODBC方式，数据库由ACCESS升级为SQL2005这里遇到一个问题，就是本机与远程服务器同步，经过多次尝试，以下代码可行：Dim Conn As New ADODB.ConnectionDim Rs As New ADODB.Reco...
阅读全文
摘要：Visual Studio 2012 没有为 Visual Basic 6.0 应用程序和项目提供升级工具。如果要在 Visual Studio 中将项目从 Visual Basic 6.0 升级到 Visual Basic，可以使用随 Visual Studio 早期版本提供的升级工具，然后在 V...
阅读全文
摘要：1、共用 Visual Basic 6 和 Visual Basic .NET 的最佳实践 http://www.microsoft.com/china/msdn/library/langtool/vbnet/ms364069.mspx?mfr=true 2、同时使用 Visual Basic 6 ...
阅读全文
摘要：转自（http://www.cnblogs.com/IDqq/archive/2006/04/04/366459.html）VB.NET里的Array类提供了很多对数组进行拷贝、裁剪等操作的方法。在VB6里如何在保证效率的前提下实现这些功能？本文给出一个用于裁剪数组的函数实现。1 API声明Priv...
阅读全文
摘要：转自（http://www.cnblogs.com/IDqq/archive/2006/04/04/366688.html）1 冒泡排序冒泡排序虽然性能不高，但好歹是一种稳定的排序。在要求排序结果稳定，或者性能问题不很突出（比如给只含少量元素的小数组排序）的时候，用起来还是比较方便。下面给出一个较为...
阅读全文
摘要：转自（http://www.cnblogs.com/IDqq/archive/2006/04/05/367412.html）这个题目有点变态，不过有时确实会有这种需求，起码我就碰到过。同样变态的需求还有“如何用VB6在日文系统下把Unicode编码的中文字符转成GB2312编码”。这种需求有个比较时...
阅读全文
摘要：转自（http://blog.csdn.net/babyt/article/details/4610131）问：這是VB6.0在Module裡定義的,Declare Function rf_halt Lib "mwrf32.dll" (ByVal Icdev As Long) As IntegerD...
阅读全文
摘要：原文地址（http://www.cnblogs.com/kingangWang/archive/2012/06/01/2530421.html）VB6.0与VB.NET函数对照表VB6.0VB.NETAddItem Object名.AddItemObject名.Items.AddListBox1.I...
阅读全文
摘要：原文地址（http://www.cnblogs.com/kingangWang/archive/2012/06/07/2540982.html）Visual Basic相信是很多程序员接触的第一个开发环境，当然多年后想迁移到Visual Basic.NET还是需要一定的处理工作的。本文将为大家介绍迁...
阅读全文
摘要：来源不详。总览： 本文推荐给那些准备将自己的应用移植到Visual Basic.NET中的Visual Basic开发者。文章中包括Visual Basic.NET升级工具的信息的介绍以及将Visual Basic 6结构平滑升级到Visual Basic.NET 的指导 在打开Visual Bas...
阅读全文
摘要：Private Sub Form_Click() Dim c() As String c = Split("A,B,C,D,E", ",") For i = 0 To UBound(c) Print c(i) Next iEnd Sub运行效果：ABCDEPri...
阅读全文
摘要：最近收到反馈说基线测距软件时常有死机的情况出现，经过调查发现当程序非正常退出时会出现软件死机，且进程被占用的情况，分析代码后猜想是不是doevents用的不对，于是上网查了下别人的资料：下面一篇是我觉得讲的比较通俗的文章，连接转自：http://blog.sina.com.cn/s/blog_4f0...
阅读全文
摘要：最近接到一个任务——迁移数据库 要迁移的数据库是SQL2005数据库，有两个应用软件是与此数据库进行数据通信。由于客户端应用程序的连接数据库方式直接以绝对方式写入程序，所以此次迁移需要同时修改客户端应用程序，考虑到不久后公司地址要变动，到时还要重新配置服务器，肯定还要修客户端代码，于是我打算采用模板...
阅读全文
摘要：在属性窗口将Text1的Multiline（多行显示）设为True，根据需要设置ScrollBars（滚动条），这俩属性都是只读的，只能在设计时在属性窗体指定，不能在程序中用代码来变更。
阅读全文
摘要：这是设置程序窗体状态栏信息的一条语句： 其中： StatusBar1是状态栏控件的名称； Panels(3).Text表示状态栏上第3个空格所显示的文本内容，Panels（3）代表状态栏控件的第三个窗格； Format(Date, "\yyyy年mm月dd日\")这是调用格式函数Format，设置文...
阅读全文
摘要：这是一篇老文了，整理下发出来，希望能对大家有些帮助一般我们在程序中操作Excel时，逐单元格填充时，速度非常之慢。其实Excel的Range可以直接绑定数组，速度极快。在下面的VB6示例中，填充一个1000*10的区块，逐单元格方式要20~25秒，而数组方式瞬间内即可完成。Private Sub Command2_Click() Dim a(1000, 10) As Integer Dim i As Integer Dim j As Integer Dim z As Integer Dim oXLSAPP As New Excel.Application D...
阅读全文
摘要：'从VB将数据导出到EXCEL,网上可能有很多这样的代码,但是前提都要安装EXCEL,今天我分享给大家的就是没有安装EXCEL的一样也可以导出.'Rem 作者:谢炎锦 创建时间:2002-12-20 Mail:XieYanJin@163.Com'Rem 内容如下:'Rem 引用方式: Export(Ado.Recordset) 或 Export(Rds.RecordSet)'Rem 支持 Rds 与 Ado 的记录导出'Rem 得到所有数据类型,有些数据类型EXCEL不支持,已经替换掉Public Function FieldType(intTy
阅读全文
摘要：''=============================================''名称: FindPath''作用: 查找指定文件夹下面的所有文件和其子目录下的文件''参数：strPath 要查找的目录，'' strFiles 用于存查找结果的缓冲区，String 类型的动态数组，调用时事先初始化， 如Redim strFiles(0)'' FileCount 用于返回文件个数''============================================
阅读全文
摘要：Option ExplicitDeclare Function SetWindowsHookEx Lib "user32" Alias _"SetWindowsHookExA" (ByVal idHook As Long, ByVal lpfn As Long, _ByVal hmod As Long, ByVal dwThreadId As Long) As LongDeclare Function UnhookWindowsHookEx Lib "user32" _(ByVal hHook As Long) As LongDecl
阅读全文
摘要：在网上看到一段程序,没有使用vba编程将sql数据倒入excel表格,速度极快,贴出于大家共赏.其主要思想是：将EXCEL作为一个数据库使用，它的名字就是数据库的名字，工作表就是一张数据库中的表。建立一个工程,引用dao,添加command1,粘贴一下代码'声明API函数Private Declare Function FindWindow Lib "user32" Alias "FindWindowA" (ByVal lpClassName As String, ByVal lpWindowName As String) As Long'
阅读全文
浙公网安备 33010602011771号