标题:新手,特别新。请多指教。
只看楼主
peacock
Rank: 1
等 级:新手上路
帖 子:51
专家分:0
注 册:2004-4-21
 问题点数:0 回复次数:5 
新手,特别新。请多指教。
请帮忙看看

这是我写的代码 Private Sub cmdok_Click() Dim username, password As String Data1.RecordsetType = 0 username = Text1.Text password = Text2.Text Data1.Recordset.Index = "用户名" Data1.Recordset.Seek "=", username If Data1.Recordset.EOF = True Then MsgBox "无此用户" Exit Sub End If If Data1.Recordset.Fields("密码") = password Then usefrm.Show Unload Me Else MsgBox "密码错误" End If End Sub 数据库用的Access,Data控见的属性我也设好了的,表的索引建的是“用户名”,可一调试就出错。他说不是有效的索引,让我用tabledef弄,我才开始用VB都不懂的,郁闷。 顺便请教一下各位我想对VB的高级应用(比如数据库,或则ActiveX控件等)有所了解应看些什么书??

搜索更多相关主题的帖子: eqn prod sum 
2004-04-23 14:34
xingehappy
Rank: 1
等 级:新手上路
帖 子:46
专家分:0
注 册:2004-4-14
得分:0 
你把代码和数据库传来我帮你调试吧!

我又回頭去飛,去追.就算我追到最后只剩冰雪.天都為我傷悲.冷的愛快枯萎.任漫天風雪覆蓋我的心碎........
2004-04-24 15:46
peacock
Rank: 1
等 级:新手上路
帖 子:51
专家分:0
注 册:2004-4-21
得分:0 

先谢了。我再发个贴。

主题是:

xingehappy


学海无崖,但不是苦做舟,编程是一件多么有乐趣的事,怎会苦呢??? 让我们一起在这个世界里尽情的玩吧!!!
2004-04-26 13:58
peacock
Rank: 1
等 级:新手上路
帖 子:51
专家分:0
注 册:2004-4-21
得分:0 
我上传不了。他说格式不对。

学海无崖,但不是苦做舟,编程是一件多么有乐趣的事,怎会苦呢??? 让我们一起在这个世界里尽情的玩吧!!!
2004-04-26 14:00
peacock
Rank: 1
等 级:新手上路
帖 子:51
专家分:0
注 册:2004-4-21
得分:0 
传上来了。

学海无崖,但不是苦做舟,编程是一件多么有乐趣的事,怎会苦呢??? 让我们一起在这个世界里尽情的玩吧!!!
2004-04-26 14:03
tvrc200379
Rank: 1
等 级:新手上路
帖 子:351
专家分:0
注 册:2004-3-30
得分:0 

我是灌水天堂的新版主,请新老用户来报道啊 (欢迎来灌水。。。) 哈哈哈。。。。 http://websx.home./bbs/list.asp?boardid=35
2004-04-26 16:26



参与讨论请移步原网站贴子:https://bbs.bccn.net/thread-812-1-1.html




关于我们 | 广告合作 | 编程中国 | 清除Cookies | TOP | 手机版

编程中国 版权所有,并保留所有权利。
Powered by Discuz, Processed in 0.052735 second(s), 7 queries.
Copyright©2004-2024, BCCN.NET, All Rights Reserved