从网上下载了一个字符包,解压以后查看,发现文件名是这种形式:0120_XXXXXX_GBK.ttf,看上去很不雅观.我想改成 XXXXXX简体.ttf 这种形式,但字体有300多个,手动修改太浪费时间,所以编写了一个批量修改程序,一键搞定.主要用到的函数和语句:Mid语句.Name语句.InStr函数.InStrRev函数.Replace函数 下面是我测试时用的程序.虽然每次只能改一个,但只要把程序稍微修改一下,就可以变成按照你的设定批量修改程序名的改名程序. '****************…

VB6.0中,日期.时间控件不允许为空时,采用文本框与日期.时间控件相互替换赋值,或许是一个不错的选择. 实现效果如下图: 文本框txtStopTime1 时间框DTStopTime1(DTPicker控件) 右键-属性-选择格式3 - dtpCustom  HH:mm:ss若没有DTPicker控件,在部件中添加 工具-部件-控件-“Microsoft Windows Common Controls-2.6.0”-应用-确定 代码如下: Private Sub Form_Load()     …

VB6.0和VB.Net的对照表 VB6.0 VB.NET AddItem Object名.AddItem Object名.Items.Add ListBox1.Items.Add ComboBox1.Items.Add Abs 函数 System.Math.Abs 方法 API 函数关系 MicrosoftWin32和Microsoft .NET Framework API的对应 App.Path 等 1. System.Reflection.Assembly.GetExecutingAsse…

往事不堪回首,折腾了个把月的老系统,心中郁结,不吐不快.系统架构是ASP +VBS +VB6.0 + SQL Server2000, 第一个版本开发完成大概是在2000年.基本是处于交接无力,看代码就如同走迷宫的节奏.不过我觉得第一批开发人员应该可以自傲了,它们做的系统这么多年过去了居然还活着. 为了对得起这几天死掉的脑细胞,就权且在这里留下它们阵亡的痕迹. 变量的声明 VB6.0: Dim x as integer VBS: Dim x 同样的功能,由于代码太过Dirty,有部分模块写在了AS…

最近有在做一个需求,需要在VB6.0中调用存储过程,整理了一下,供大家参考, 范例: Function callStoredProcedure(sEmployeeID As String, Optional sNotes As String = "") As String On Error GoTo errHand Dim conn As ADODB.Connection Set conn = "driver={SQL Server};server=(local);uid=s…

VB6.0和VB.Net的对照表 VB6.0 VB.NET AddItem Object名.AddItem Object名.Items.Add ListBox1.Items.Add ComboBox1.Items.Add Abs 函数 System.Math.Abs 方法 API 函数关系 MicrosoftWin32和Microsoft .NET Framework API的对应 App.Path 等 1. System.Reflection.Assembly.GetExecutingAsse…

VB6.0应用程序安装包的生成,利用其自带的打包工具生成的安装程序很简陋,一点不美观:如果想让自己的应用程序安装的时候显得高大上一点,本教程提供使用Setup Factory 9.0制作安装包的方法. 工具/原料 Setup Factory 9.0 VB6.0 方法/步骤  首先调试好的程序,需要加入ico图标会更美观(默认状态下应用程序的快捷方式带有VB标示,比较难看). 附:(具体加入方法)把你的程序中某个窗体加上图标 Form的ICON 属性加图标 :点工程菜单--工程属性 打开生成选项卡…

如何制作vb安装程序,是在学习Vb6.0过程中比较常见的一个入门问题. 在此笔者介绍一个最简单的安装方法,就是用VB自带的打包程序进行打包,虽然比较普通,不过内部却有不少窍门,相信这一点知道的人可能不多吧!!(请大家一定看到最后,好戏在后头)好了,不废话了,开始进入正题. ①运行打包向导,如下图所示: ②点击“浏览”按钮,选择要打包的工程.然后单击“打包”按钮(在此只介绍打包,其他的功能不做介绍).进入下一个页面,如下图所示: ③选择要打包的类型,普通的EXE工程选择“标准安装包”就可以了,控件…

1. 安装包来自 http://msdn.itellyou.cn/ 下载的文件为: sc_vb6_ent_cd1.iso sc_vb6_ent_cd2.iso 2.安装时,"请输入产品的 ID 号(I):" 全部输入 数字1 3.Win7下VB6.0安装,第二张安装盘干嘛用的啊? http://zhidao.baidu.com/link?url=xrGZ7uAnzXcPXWjGE_x9S_nvDVYmIvvFCmIUXbHo7fdo03JyUBCKllfOAHyIAJoO5aFlfVp…

目录 第1章 VB6.0调用DLL    1 1 VC++编写DLL    1 1.1 使用__stdcall    1 1.2 使用 .DEF 文件    1 2 简单数据类型    2 2.1 传值(ByVal)    2 2.2 传址(ByRef)    3 2.3 传址(VarPtr)    4 2.4 转换为Variant    4 3 String    6 3.1 BSTR内存布局    6 3.2 StrPtr.VarPtr    7 3.3 示例代码    7 3.4 转换为V…