您的位置：程序门 -> vb -> 资源

如何在vb中使用二维数组调用access中的内容

[收藏此页] [打印本页]选择字色：背景色：字体：[大][中][小]

如何在vb中使用二维数组调用access中的内容

发表于：2007-05-15 09:49:48 楼主

如何在vb中使用二维数组调用access中的内容!!!

dim a（1 to 7, 1 to 30) as variant
dim i as integer, j as integer, count as integer
count = 0
dim conn as new adodb.connection '标记连接对象
dim connectionstring as string
connectionstring = "provider=microsoft.jet.oledb.4.0; " & _
"data source=毕业生信息.mdb "

conn.open connectionstring
dim sql as string
dim db as new adodb.recordset
sql = "select * from 信息表 "
db.open sql, conn, adopenkeyset, adlockpessimistic

for i = 1 to 7
for j = 1 to 30
a（i, j) = sql
next j
next i
上面代码sql中的值为何是 "select * from 信息表 "而不是数据库中的值

发表于：2007-05-15 10:15:361楼得分:0

'for i = 1 to 7
'for j = 1 to 30
a = sql.getrows（)
'next j
'next i

发表于：2007-05-15 10:15:592楼得分:0

sql是查询数据库的sql语句，只有经过后面的db.open操作之后，才能返回数据库中的值。数据库中的记录在db中（为了增强可读性，一般用rs作变量名，表示记录集）。楼主可找一些用ado操作数据库方面的资料看一下。

发表于：2007-05-15 10:18:343楼得分:0

更正：
a = db.getrows（)

发表于：2007-05-15 17:14:384楼得分:0

你把sql定义为string型当然要返回这个啦！

发表于：2007-05-15 17:28:255楼得分:0

a = db.getrows（)
这样运行不对,提示不能给数组赋值
a（i,j)=db.getrows（)
也不对.提示说bof或 eof有一个是真,或者当前的记录已被删除,所需的操作要求一个当前的记录
各位大虾到底应该怎样赋呢

发表于：2007-05-15 17:32:196楼得分:0

我还想请问一下vb中如何使用对数函数比如log2x以2为底的对数函数

发表于：2007-05-16 09:46:287楼得分:0

vb中只有自然对数函数log，转一下吧。如果我没有全忘光的的话，log2x在vb中应该是log（x)/log（2)。

发表于：2007-05-16 13:05:428楼得分:0

小弟要用vb做一个软件，就是要实现文件的压缩打包，当然也要能解压自己要所压缩的文件，而且两个功能要分开实现，压缩解压的算法用现成的都行，比如zip.哪位有源码啊？
急盼中！！！万分感谢！！！

发表于：2007-05-16 15:34:159楼得分:0

log2x在vb中应该是log（x)/log（2)
还要定义函数吗？应如何写，不能直接写成log（x)/log（2)啊

下一篇：急求！！！求相应注册码的注册程序
上一篇：自己图案如何变成可用的*.cur鼠标图、和程序图标.cio?

其他资讯