2005年10月9日

如何实现VB与EXCEL的无缝连接

摘要: 如何实现VB与EXCEL的无缝连接 2003-02-17· ·吴刚··yesky VB是常用的应用软件开发工具之一,由于VB的报表功能有限,而且一但报表格式发生变化,就得相应修改程序,给应用软件的维护工作带来极大的不便。因此有很多程序员现在已经充分利用EXECL的强大报表功来实现报表功能。但由于VB与EXCEL由于分别属于不同的应用系统,如何把它们有机地结合在一起,是一个值得我们... 阅读全文

posted @ 2005-10-09 17:29 奇远 阅读(374) 评论(0) 推荐(0) 编辑

求得机器名

摘要: '*************************'求得机器名gComputerName'去掉字符 NONAME = !%^*+-^()&?/|\~> 0 Then strTmp1 = "_" End If gTempName = gTempName & strTmp1 Next lok End Sub 阅读全文

posted @ 2005-10-09 14:04 奇远 阅读(182) 评论(0) 推荐(0) 编辑

由出生日期返回年龄

摘要: Public Function BirthdayToAge(ByVal BirthDate As String) As String'函数功能:由出生日期返回年龄'入口参数:出生日期'函数返回:出错或非正常返回为 vbnullstring,否则为年龄的字符串' Year(CurDate) Then BirthdayToAge = vbNullString ... 阅读全文

posted @ 2005-10-09 14:01 奇远 阅读(737) 评论(0) 推荐(0) 编辑

PcAdodb

摘要: '保持属性值的局部变量Private m_Qcn As ADODB.ConnectionPrivate m_Scn As ADODB.ConnectionPrivate m_RS As ADODB.RecordsetPrivate m_Cmd As ADODB.Command'要引发该事件,请遵循下列语法使用 RaiseEvent:'RaiseEvent ErrCN[(arg1, arg2, ..... 阅读全文

posted @ 2005-10-09 13:45 奇远 阅读(224) 评论(0) 推荐(0) 编辑

导航