- 博客(16)
- 资源 (1)
- 收藏
- 关注
原创 下载文件函数
函数名 :DownFile 函数功能:下载文件 传入参数:URL网络文件地址,FileName:文件路径,Prog:进度条对象 返回值 :无 制作人 :zzz 制作日期:2007-04-10 说 明 : Public Sub DownFile()Sub DownFile(ByVal URL As String, By
2008-03-11 11:46:00
485
原创 验证传入的身份证号是否有效
函数名 :CheckCIDInfo 函数功能:验证传入的身份证号是否有效(18位) 传入参数:18位的身份证号码 返回值 :所属地区,出生年月,男女 制作人 :zzz 制作日期:2007-04-10 说 明 :无 ===================================================================
2007-06-26 10:22:00
1187
原创 时间的相加和相减
过程名称:TimeAndTimeSum 功能描述:两个时间的相加 接收参数:时间字串 返回参数:相加后的时间字串 创建人员及日期:zzz@2007-06-20 注意事项:字符串的格式需要为##:## ===================================================================================
2007-06-26 10:19:00
3747
1
转载 以VB操作EXCEL(转贴)
在用VB做程序的时候,它本身的报表并不太好使用,因此应用Excel输出数据,是一个好方法,以下是一组操纵Excel的函数据.Excel VBA控制函数检测文件Function CheckFile()Function CheckFile(ByVal strFile As String) As BooleanDim FileXls As ObjectSet FileXls = CreateO
2007-06-05 08:19:00
1299
原创 对Ini文件进行操作的类
Module IniWorkModule IniWork Friend Class clsIniFileClass clsIniFile 模块名称 clsIniFile 功能描述 提供对Ini文件的一些操作 创建日期 20031026 开发机构 石家庄天海科技有限公司 声明API函数 Priva
2007-05-22 10:10:00
1147
原创 自己写的数据库基类(VB.NET_WinForm)
过程名称: clsDataBase功能描述:数据库的相关操作创建人员及日期:zzz2006-11说 明: 在实例化本类后,切记要记住释放Public Class clsDataBaseClass clsDataBase 数据库类型定义 Public Enum eDBTypeEnum eDBType DB_OLEDB = 0 DB_SQL
2007-05-21 15:48:00
1066
原创 将传入的文件设置为自启动程序
函数名 :OptionRun 函数功能:将传入的文件设置为自启动程序 传入参数:要设置的可执行文件 返回值 :True:设置成功,False:设置失败 制作人 :zzz 制作日期:2007-04-10 说 明 :此函数需要有Microsoft.Win32的引用 Public Function OptionRun()F
2007-05-21 11:28:00
715
原创 将汉字转换为大写的拼音首字母
函数名 :GetSpellCode 函数功能:将汉字转换为大写的拼音首字母 传入参数:Cnstr:待转换的汉字字符串 返回值 :拼音字符串 制作人 :zzz 制作日期:2007-02-10 说 明 :对于U、V无法转换 Public Function GetSpellCode()Function GetSpellCo
2007-05-21 11:27:00
4425
原创 将传入的DateTimePicker对象转成"####-##-##"格式的日期字串
函数名 :GetDTPDataValue 函数功能:将传入的DateTimePicker对象转成"####-##-##"格式的日期字串 传入参数:需要转换的DateTimePicker对象 返回值 :"####-##-##"字串 制作人 :zzz 制作日期:2007-04-10 说 明 : Public Functi
2007-05-21 11:27:00
1255
原创 将数据对象加载到下拉列表中
函数名 :DataAddToCombobox 函数功能:将传入的对象添加至下拉列表中 传入参数:objInfo:数据对象,CmbObj:下拉列表框对象,AddColName:要添加的列名,IsAll:是否添加"全部"字段 返回值 : 制作人 :zzz 制作日期:2007-04-10 说 明 : Public Sub
2007-05-21 11:25:00
806
原创 使远程计算机重新启动
函数名 :ResetComputer 函数功能:使远程的机算机重新启动 传入参数:sUserName:登录用户名,sPassWord:登录密码,sURL:要重启的机算机IP 返回值 :Ture:成功,False:失败 制作人 :zzz 制作日期:2007-01-08 说 明 :此函数需要有System.Management
2007-05-21 11:24:00
888
原创 打开TXT文件
函数名 :ReadFileInfo 函数功能:打开TXT文件 传入参数:sFilePath带有文件路径的文件名 返回值 :文件的内容 制作人 :zzz 制作日期:2006-11-15 说 明 :此函数需要有System.IO的引用 Private Function ReadFileInfo()Function Rea
2007-05-21 11:23:00
821
原创 备份和还原SQL数据库
过程名称:BackUpDataBase 功能描述:备份数据库 接收参数:需要备份的路径及文件名 返回参数:Ture,False 是否成功 创建人员及日期:zzz@2006-11-15 Public Function BackUpDataBase()Function BackUpDataBase(ByVal sDBName As String) A
2007-05-21 11:22:00
913
原创 调用Excel中的宏
过程名称:ExcelFl 功能描述:调用EXCEL表的宏 接收参数:sExcelPath:Excel文件的路径,MacroName:调用宏的名称 返回参数:Ture:执行成功,False:执行失败 创建人员及日期:zzz@2007-01-15 注意事项:暂无 Public Function ExcelFl()Function ExcelF
2007-05-21 11:21:00
966
原创 得到文件的版本号
过程名称:GetFileVersions 功能描述:得到传入文件的版本号 接收参数:sFilePathName:带有路径的文件名 返回参数:文件的版本号字符串 创建人员及日期:zzz@2006-03-08 注意事项:传入的文件名需要为*.exe,*.dll,*.ocx Public Function GetFileVersions()Fu
2007-05-21 11:20:00
584
原创 DataTable导为Excel
过程名称:ExportToExcel 功能描述:将传入的表格导出为Excel表 接收参数:p_InfoTable 要导出的表格 返回参数: 创建人员及日期:zzz@2006-11-02 注意事项:使用此函数需要引用Microsoft Excel 11.0 Object Library 并且附加上frmWaiting窗体
2007-05-21 11:18:00
1470
2
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人