ide设置 必须打开设置选项的”要求变量声明”，”对齐控件到网格”，”自动缩进”开关。 tab的宽度统一为4个空格，网格单位一律设为:width50height50。 命名 工程 activex控件和dll工程命名格式为(….lib)，exe工程直接命名，如果是通用组件工程，直接命名，如果是项目或产品工程，则使用项目或产品缩写作为前缀。如：xwy….lib。 工程命名不必缩写，为了表达意思和用途，可以尽可能地长，而且命名格式采用(名词)、(形容词+名词)或(名词+动作的名词形式)。如:xwystockoperationlib或xwystocklib。 (注意：在任何时候，不要使用中文命名，包括文件夹，文件名，函数名，变量名。除非文件需要和用户交互！) 变量 变量命名不推荐采用匈牙利命名法，除非命名会和关键字产生冲突的时候，才采用类型缩写+变量实名的匈牙利命名法。一般情况下，变量...
本文向大家展示了listview控件在report视图下任何列头的双向排序技巧，源代码如下 option explicit private sub form_load() dim i as integer dim itemx as listitem listview1.view = lvwreport with listview1.columnheaders .add , , "编号", 600, lvwcolumnleft for i = 1 to 2 .add , , "内容项" & i, 1000, lvwcolumnright next end with with listview1.listitems for i = 1 to 10 set itemx = .add itemx.subitems(1) = i itemx.subitems(2) = chr(64 ...
'新建一个activex dll工程工程名为dbtoexcel '工程-->引用,引用microsoft activex data objects 2.6 library 'microsoft excel 9.0 objects library option explicit private mcnnquery as adodb.connection '定义ado连接对象 private mrsquery as adodb.recordset '定义ado记录对象 dim objexcel as excel.application '定义excel对象 dim objworkbook as excel.workbook '定义工作薄 dim objsheet as excel.worksheet '定义工作表 dim objrange as...
最近在写一个mdi窗体的程序，每调用一个子窗体时都要对其做一些操作。于是我就用一个sub 来做显示子窗体的操作 private sub showfrm(byref tfrm as form) {代码} tfrm.show end sub 假设有两个子窗体 frmproduct产品列表，和frmuser用户列表，那么要在显示这两个窗体的地方就用 call showfrm(frmproduct) call showfrm(frmuser) frmproduct 是系统自动生成的form类的对象（实体）。 当然系统中还有一个frmproduct类。他们两个只是名字一样。 这样在显示子窗体的时候调用的所有相关操作都放在showfrm中，在{代码。。}中可以对tfrm的图标啊，前景色，大小啊什么的做想要的操作，以后修改起来也方便。我始终相信把实现相同功能的代码放不同的地方，或...
程序说明: 这个程序比较简单,大家自己看吧 计算机名就是你打开 控制面板-系统-网络标识-完整的计算机名称 程序代码: form1 private declare function getcomputername lib "kernel32" alias "getcomputernamea" (byval lpbuffer as string, nsize as long) as long private sub command1_click() dim name as string, length as long length = 225 name = string(length, chr(0)) getcomputername name, length name = left(name, length) label1.caption = name end sub...
1、隐藏文本框中的光标(不是鼠标哟！) 使用windows api中的hidecaret，一般在控件的gotfocus事件中调用： private declare function hidecaret lib "user32.dll" (byval hwnd as long) as boolean private sub text1_gotfocus() hidecaret text1.hwnd end sub 2、为文本框创建快捷键 为了简化聚焦操作，在vb中可为任何有caption属性的控件创建快捷键，只需把caption属性设置为＆加上想作为快捷键的字母。但这就出现一个问题，类似文本框这样的控件没有caption属性，怎么办？这时可将标签与文本框同时使用。在lable的caption属性中设置快捷键，label的tabindex属性设置比文本框小1，因为label不能获得...
在vb下实现超级链接，好多人都会想到用vb提供的dhtm应用程序，因它是一个交互的、基于浏览器的应用程序，是使用一种动态html和已编译的vb代码的组合，使用它，可以编写出一般的网页来。 可是，如果您只想在标准的vb程序中实现超级链接呢？比如，在窗体里有一标签，上是某e--mail 地址，单击它，就能启动系统的电子邮件发信程序，您能做得到吗？小弟我为了解决这个问题，曾苦苦追寻了数个月，终于在数日前找到了答案。想到还有许多编程初哥如我者也许也有此难题，于是厚着脸皮，在此把我的实现方法与各位探讨一下。 所谓超级链接，就是指点击某按纽或文字、符号等预先设定的位置时，就能使程序页面转到新一个网页上来，或者转到邮件收发程序上来。有上网经验者就最有体会了。下面，我们就以vb6为例，介绍一下在vb中如何实现超级链接这个功能。 在vb6下实现超级链接，可以有两种方法，一是使用api函数，另一个就是使用o...
编程人员从大量的程序开发中积累了许多非常实用的经验与技巧，它们就象一盘盘的快餐，看似简单但营养绝对丰富！用“餐”之后，您的vb程序将立即超频。还犹豫什么，快来品尝品尝吧 ... vb超频快餐，让我一次用个够！（一）1.用mid$命令超速字符串添加操作 2.从头开始删除集合项目 3.用instr函数实现代码减肥 4.精用boolean表达式，让代码再减肥 5.函数名巧做局部变量 vb超频快餐，让我一次用个够！（二）6.火眼识破隐藏的variant变量 7.gosub在编译程序中速度变慢 8.减少doevents语句的数量 9.and、or和xor：让我们来优化表达式 10.静态变量慢于动态变量 vb超频快餐，让我一次用个够！（三）11.善用"assume no aliasing"编译选项 12.为常量定义合适的类型 13.你真正理解"allow unrounded floating...
用mid$命令超速字符串添加操作大家都知道，&操作符的执行速度是相当慢的，特别是处理长字符串时。当必须重复地在同一变量上附加字符时，有一个基于mid$命令的技巧可以使用。基本思路就是：预留一个足够长的空间存放操作的结果。下面是应用这个技术的一个例子。 假设要建立一个字符串，它要附加从1开始的10000个整数："1 2 3 4 5 6 7 ... 9999 10000"。下面是最简单的实现代码： res = "" for i = 1 to 10000: res = res & str(i): nextface=宋体>代码虽然简单，但问题也很明显：res变量将被重分配10000次。下面的代码实现同样的目的，但效果明显好转： dim res as string dim i as long dim index as long ’预留足够长的缓冲空间res = space(90000...
火眼识破隐藏的variant变量 如果没有用as语句声明变量，默认类型就是variants，比如： dim name ’ this is a variant 或者，当前模块下没有声明option explicit语句时，任何变量都是variants类型。 许多开发者，特别是那些先前是c程序员的人，都会深信下面的语句将声明2个interger类型变量： dim x, y as integer 而实际上，x被声明为了variant类型。由于variant类型变量要比integer类型慢很多，所以要特别注意这种情况。正确的一行声明方法是： dim x as integer, y as integer gosub在编译程序中速度变慢 编译为本地代码的vb应用程序中，如果使用 gosubs 命令，就会比通常的 subs 或者 function 调用慢5-6倍；相反，如果是p-code模式，就会相当快...
Java Asp PHP .Net XML C/C++ CGI VB Jsp J2ee J2se J2me EJB Servlet Tomcat Resin Struts Weblogic Eclipse ANT GUI JMS Web servise IDEA Webphere Hibernate Spring Jboss Applet Swing Socket Javamail Perl Ajax P2P 安全 模式 框架 测试 开源 游戏
Windows XP Windows 2000 Windows 2003 Windows Me Windows 9.x Linux UNIX 注册表 操作系统 服务器 应用服务器
