摘要:
我决定从遇到许多问题的内容入手:如何在执行 SQL INSERT 后检索 IDENTITY 值。通常,问题不在于如何编写检索值的查询,而在于在哪里以及何时进行检索。在 SQL Server 中,下面的语句可用于检索由最新在活动数据库连接上运行的 SQL 语句所创建的 IDENTITY 值: SELECT @@IDENTITY 这个 SQL 语句并不复杂,但需要记住的一点是:如果这个最新的 SQL ... 阅读全文
摘要:
Function mfH00R0_GetExcelCol(intCols As Integer) As String Dim strOut As String Dim intI As Integer If intCols > 0 And intCols 26 Then strOut = strOut & Chr(Asc("A") - 1 + IIf(int... 阅读全文
摘要:
Public Function mfH00R0_Get_RomanNumerals(intNum As Long) As String Dim intArabic(12) As Integer Dim strRoman(12) As String Dim intI As Integer Dim strOut As String intArabic(0) = ... 阅读全文
摘要:
其实第一种是不用odbc联系数据库,第二种是使用odbc连接数据库 VB使用ADO数据库可以分为有源数据库和无源数据库,即是否使用了DSN数据源,如下例:1、在连接数据库前首先要在VB菜单中“工程”-“引用”从中选择 microsoft activeX Data objects 2.6 library和 microsoft activeX Data objects recordset 2.6两... 阅读全文
摘要:
一般的数据进制包括十进制,二进制,十六进制.十进制就是我们日常生活用到的数据进制,因此也是我们最熟悉和清楚的;二进制是计算机的基础进制,主要是因为便于用物理器件实现二进制;八进制和十六进制因为和二进制的天然的亲密关系,并且表示比二进制更方便,因而也成为计算机的常用表示方法. VB中涉及到的数据进制之间的转换函数主要有如下几个: Hex 函数: 返回代表十六进制数值的 St... 阅读全文
摘要:
VB中的字符串函数比较多,也比较方便,就不一一介绍了.本文主要对字符串相关的转换函数做一些小结.字符串转换的函数主要有: Str()和Val()用于字符串和数字的相互转换; Chr()和Asc()用于字符串和AscII码的相互转换; Chrw()和Ascw()用于Unicode码和中文的相互转换; Format()函数用途十分广泛的一个函数,功能十分强大. ... 阅读全文
摘要:
'原作者:Snowcloud2002'插入节点'函数名称: NodeInsert(Pos As Integer, Num As Integer, TableName As Variant) As Boolean'参数: Pos As Integer要插入节点的位置,Num As Integer要插入的数值,TableName As Variant线性表名称'返回值: Boole... 阅读全文
摘要:
笔者在学习VB中发现利用集合可以进行排序,优化后比冒泡法快得多。下面是完整的函数代码,演示了如何进行数组的升序或降序排列。 Option ExplicitDim X(100) As DoubleDim y(100) As StringPrivate Sub Command1_Click() '演示数字排序Dim a(100) As Double, z(100) As String, i ... 阅读全文
摘要:
程序说明: 这个程序比较简单,大家自己看吧 计算机名就是你打开 控制面板-系统-网络标识-完整的计算机名称 程序代码: Form1 Private Declare Function GetComputerName Lib "kernel32" Alias "GetComputerNameA" (ByVal lpBuffer As String, nSize As Long) As ... 阅读全文
摘要:
最近因为在使用VB的过程中,发现要使用一些数据结构,虽然不像C里面那样方便,但总结一下,还是可以做的,虽然不是很习惯。以飨各位。 为便于理解数组的作用,我们引入数据项和指针项的概念,在数据项中存放数组中各元素的值,指针项中存放该值在数组中的位置,两者一一对应。指针的上限指向数组第一个元素的位置,下限指向最末一个元素的位置。数组中的元素在内存中是连续的线性的节点序列,这种线性的数据结构是... 阅读全文
摘要:
简介 ActiveX Data Objects (ADO) 是微软最新的数据访问技术。它被设计用来同新的数据访问层OLE DB Provider一起协同工作,以提供通用数据访问(Universal Data Access)。OLE DB是一个低层的数据访问接口,用它可以访问各种数据源,包括传统的关系型数据库,以及电子邮件系统及自定义的商业对象。 ADO向我们提供了一个熟悉的,高层的对OLE D... 阅读全文
摘要:
Visual Basic 3.x For Windows是一门开发Windows应用程序很好的一种语言,使用它能够开发出大型的应用系统。它具有访问各种数据库的功能。下面将谈谈用VB访问数据库应注意的几个问题。 一、如何来访问数据库。VB访问数据库提供二种方法,其一是用数据控制,其二是使用对象来访问数据库。在这两种方法中,都涉及到数据库的属性:connect,databasename,exclusi... 阅读全文
摘要:
Option ExplicitDim dbado As New ADODB.ConnectionDim cmdado As New ADODB.CommandDim sqlstr As StringDim howdo As StringDim filename As String Private Sub command1_click() filename = App.Path & "\"... 阅读全文