方法很多,
一是声明全局变量。这样只程序不退出,数据就不会丢失。
二是用输入输出功能。建立随机文件,用来保存和提取数据。
三是使用数据库。
哪个方法?那要你干什么用???
黑龙江省巴彦县兴隆镇 张志晨 奉献所学 造福于人
楼上的道友的方法中:
sSQL="update
table
set
field=20"
要改为:
sSQL="update
table
set
field1=20,,field2=20
where
id=3"
但是如果你的数据库中没有记录3就会出错。
还有一种方法,用recordset来处理:
dim
cn
as
new
adodbconnection
dim
rs
as
new
adodbrecordset
rsopen
"select
from
数据库
where
id=3",adOpenDynamic,
adLockOptimistic,
-1
if
not
rseof
then
rs("你要修改的字段1")="具体值1"
rs("你要修改的字段n")="具体值n"
rsupdate
end
if
rsclose
我在设计时一般都是这样,虽然麻烦些但基本不会出错,还有就是你在设计数据库时最好要加上一个ID,这样就可以保证数据的唯一性。
只要可以进行输入文本的都可以
改一下这样吧,你单击一次就提示输入一次,输完了自动保存
改后
Data1RecordsetAddNew
Data1RecordsetFields("username") = trim(inputbox("请输入名字"))
Data1Recordset("password") =val(trim(inputbox("请输入电话")))
Data1UpdateRecord
——————————————————————————————
Data1RecordsetAddNew
Data1RecordsetFields("username") = "张三|"
Data1Recordset("password") = "fsdfsd"
Data1UpdateRecord
Data1RecordsetAddNew
Data1RecordsetFields("username") = "李四|"
Data1Recordset("password") = "fsdf432d"
Data1UpdateRecord
Data1RecordsetAddNew
Data1RecordsetFields("username") = "王五|"
Data1Recordset("password") = "f42342d"
Data1UpdateRecord
MsgBox "adad"
string sql=" select count() from test where 日期='2014-1-21'"; 然后返回首行首列 object count = commandExecuteScale(); text1text=countToString(); //这是C#代码 但和VB的思路一致
第一:写SQL:"select count() as tcount from 表"
第一:使用recordset,connection查询
第三:text1text=recordsetfields("tcount")value
1一个简单的查询的例子:
'定义一个连接
Dim Conn As ADODBConnection
'定义一个记录集
Dim mrc As ADODBRecordset
'分别实例化
Set Conn = New ADODBConnection
set mrc =New ADODBRecordset
'定义一个连接字符串
dim ConnectString as string
ConnectString="provider=microsoftjetoledb40;data source=" & AppPath & "\data\数据库名mdb;jet oledb:database password=数据库密码"
'打开连接
Conn1Open ConnectString
'定义游标位置
Conn1CursorLocation = adUseClient
'查询记录集(从student表中找出名子为"张三"的记录)
mrcopen "select from student where name='张三'",Conn, adOpenKeyset, adLockOptimistic
'现在你已经得到了你想要查询的记录集了,那就是mrc
'你可以把此记录集与DataGrid榜定,用datagrid显示你查询的记录
set medatagriddatasource=mrc
以上就是关于VB记录数据全部的内容,包括:VB记录数据、VB怎么样修改数据库中记录的值、用vb如何通过文本框向数据库中添加多条记录等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!
欢迎分享,转载请注明来源:内存溢出
评论列表(0条)