- 博客(21)
- 资源 (1)
- 收藏
- 关注
原创 msgbox是 Visual Basic 和 VBS 中的函数,可实现弹出窗口.
msgbox Visual Basic 和 VBS 中的函数,可实现弹出窗口. 作用:在对话框中显示消息,等待用户单击按钮,并返回一个 Integer 告诉用户单击哪一个按钮。 语法: MsgBox(prompt[, buttons] [, title] [, helpfile, context]) 参数说明: MsgBox 函数的语法具有以下几个命名参数: Prompt
2010-01-02 13:52:00 8551 1
原创 打开记录集语法
语法格式: recordset.Open Source, ActiveConnection, CursorType, LockType, Options 参数说明: 1、Source 可选。Variant,计算有效的 Command 对象、SQL 语句、表名、存储过程调用、URL 或包含持久存储的 Recordset 的文件或 Stream 对象的名称。 2、ActiveConnection 可选
2010-01-02 12:24:00 1138
原创 用vb怎么样能获取一个access 表里面的记录总数,并赋值给一个变量
用vb怎么样能获取一个access 表里面的记录总数,并赋值给一个变量 先用记录集打开此表然后用记录集的recordcount属性获取记录条数Recordcount只对客户端游标(adUseClient)有效 dim s as longset rs=new adodb.recordsetrs.cursorLocation=adUseClientrs.open "selec
2010-01-02 12:15:00 5932
原创 VB数据库编程怎样将一个表里面的一个字段的记录赋值给一个字符串
VB数据库编程怎样将一个表里面的一个字段的记录赋值给一个数据库用ACCESS做的,请高手指点在VB中怎样将一个表里面的一个字段的记录赋值给一个变量呢??例如:一个叫"姓名"的字段里有一个记录"张三",怎样将"张三"赋值给一个字符串变量呢? Dim str as StringDim rst as ADODB.RecordSetset rst=new ADODB.Record
2010-01-02 12:06:00 4896
原创 树形结构在开发中的应用
http://www.microsoft.com/china/community/Column/21.mspx树形结构在开发中的应用http://www.waywellstudio.cn/article.asp?id=51[VB6]递归-把节点添加到TREEVIEW上
2010-01-02 01:39:00 571
原创 TREEVIEW递归调用逻辑
(一)创建根节点,即唯一的一级子节点。 (二)添加并展开第一个2级子节点。1、选择KEY值满足条件的记录集2、把记录集添加到2级节点 (三)根据第一个2级子节点的KEY添加并展开其所属的所有3级子节点。1、确定2级子节点的KEY2、在定位的2级子节点下添加3级节点 (四)递归
2010-01-01 21:29:00 528
原创 用RS.OPEN加一条记录
我要加一条记录,程序如下: Private Sub Command1_Click() Dim AdoCN As New ADODB.Connection 建立连接 Dim rs As New ADODB.Recordset 记录集 connstr = "Provider=Microsoft.Jet.OLED
2010-01-01 14:35:00 580
原创 rs.open 与conn.execute的资源消耗
rs.open表示已经建立一个实例对象,用实例对象打开SQL,CONN,并且指定游标,如:rs.open sql,conn,1,1conn.execute表示直接用数据库打开SQL,执行数据库命令操作~用实例对象有它的好处,但是一定要记得销毁,不然耗费服务器资源,关闭方法rs.closeset rs=nothing
2010-01-01 14:28:00 525
原创 asp中的rs.open于conn.execute的区别
asp中的rs.open于conn.execute的区别 rs.open sql,conn:如果sql是delete,update,insert则会返回一个关闭的记录集,在使用过程中不要来个rs.close在文件最后再写rs.close 中间可以来多个记录集rs1.open sql1,conn,最后一块关闭记录集:rs.close rs1.close conn.execute(s
2010-01-01 14:25:00 646
原创 rs.open sql,conn 与conn.execute(sql)的区别
rs.open sql,conn 与conn.execute(sql)的区别 收藏 引用“srnld(天涯)”的话: 什么时候用什么? 那就凭个人经验积累的感觉了: 如果只需要一笔带过的碰碰数据库,用execute 如果要对数据库作比较庞杂的操作!则最好用 rs.open -----------------------------------------
2010-01-01 14:23:00 2778
原创 rs.open sql,conn 与conn.execute(sql)的区别
rs.open sql,conn 与conn.execute(sql)的区别 rs.open sql,conn 与conn.execute(sql)的区别 rs.open sql,conn:如果sql是delete,update,insert则会返回一个关闭的记录集,在使用过程中不要来个rs.close在文件最后再写r
2010-01-01 14:15:00 3289
原创 Conn.Execute(SqlStr)(n)的作用
Conn.Execute(SqlStr)(n)的作用 Conn.Execute(SqlStr)(n)的作用Dim TempStrTempStr = Conn.Execute(SqlStr)(n)说明:是取得记录集第n列的记录( 0Set Rs = Conn.Execute(SqlStr) TempStr = Rs(n)如下面的SQL语句,News表共有3个字段:ID、Title和Content
2010-01-01 14:07:00 5032
原创 TREE递归调用逻辑
(一)创建根节点,即唯一的一级子节点。 (二)添加并展开2级子节点。1、选择KEY值满足条件的记录集2、把记录集添加到2级节点 (三)添加并展开3级子节点。1、确定2级子节点2、在定位的2级子节点下添加3级节点
2010-01-01 13:09:00 589
原创 VB6 Treeview的添加节点子节点、Treeview打开、Treeview关闭
===================VB6 Treeview的添加节点子节点、Treeview打开、Treeview关闭在窗体上方一个Treeview,四个command Option Explicit Private Sub Command1_Click() Static i As Integer TreeVie
2010-01-01 12:48:00 9340 2
原创 treeview 显示ACCESS数据库中的字段
Option ExplicitPrivate Sub Form_Load()工程->引用->选中Microsoft ActiveX Data Objects 2.8 LibraryDim ShuJuKuLianJie As New ADODB.ConnectionDim JiLuJi As New ADODB.Recordset连接数据库的代码段ShuJuKuLianJie.Ope
2010-01-01 02:34:00 3002
原创 treeview展开所有子节点和孙节点
有两种方法:1、 nodX.EnsureVisible 2、tvTreeView.Nodes(1).Expanded = True
2010-01-01 01:59:00 1463
原创 treeview创建根节点和子节点孙节点
Private Sub Command1_Click()Dim nodX As NodeDim i As IntegerDim j As IntegerTreeView1.LineStyle = tvwRootLinesFor i = 1990 To 2009Set nodX = TreeView1.Nodes.Add(, , , i & "年")NextFor i = 1 To 12Set no
2010-01-01 01:29:00 1820
原创 treeview创建四个根节点
Dim jiediandongtai As Node 声明对象变量。 Dim I As Integer 声明计数器变量。 For I = 1 To 4 Set jiediandongtai = tvTreeView.Nodes.Add(, , , "Node " & CStr(I)) Next I
2010-01-01 01:03:00 812
原创 treeview创建根节点
Dim jiediandongtai As Node Set jiediandongtai = tvTreeView.Nodes.Add(, , , "任务")
2010-01-01 00:59:00 1618
原创 treeview 的add方法
Add 方法(Nodes 集合) 在 Treeview 控件的 Nodes 集合中添加一个 Node 对象。 语法 object.Add(relative, relationship, key, text, image, selectedimage)
2010-01-01 00:40:00 3080
空空如也
TA创建的收藏夹 TA关注的收藏夹
TA关注的人