vb里的问题
添加的时候老是出现“书号不能为空”的提示，不管书号空不空；代码如下：
Dim Conn As ADODB.Connection
Dim rs As ADODB.Recordset
Dim cmd As New ADODB.Command
Public connstring As String
Private Sub cmdadd_Click()
Dim rsvalid As ADODB.Recordset
'Dim strsql$, strreaderID$, strName$, strsex$, strad$, strtel$
Dim bookmk
str书号 = Replace(Trim(txt书号.Text), "'", "")
str书名 = Replace(Trim(txt书名.Text), "'", "")
str作者 = Replace(Trim(Txt作者.Text), "'", "")
str出版社 = Replace(Trim(txt出版社.Text), "'", "")
str类别 = Replace(Trim(Txt类别.Text), "'", "")
str借出否 = Replace(Trim(txt借出否.Text), "'", "")
str单价 = Replace(Trim(txt单价.Text), "'", "")
If strbookID = "" Then
MsgBox "书号不能为空", , "输入错误"
txt书号.SetFocus
Exit Sub
ElseIf str书名 = "" Then
MsgBox "书名不能为空", , "输入错误"
txt书名.SetFocus
Exit Sub
End If
Set rsvalid = New ADODB.Recordset
strsql = "select * from 图书 where bookid='" & strbookID & "';"
rsvalid.Open strsql, Conn, 1, 1
If Not rsvalid.EOF Th
相关问答：
初学，大胆提问，请高手不吝赐教
1、滚动条点击与绘图板（屏幕,Piceure1）的移动问题已经解决。
Picture1.Top = -VScroll1.Value + bcW '垂直移动
Picture1.Left = -HScroll1.Value + bcW ' ......
vb是不是很牛啊 怎么那么多的病毒都是vb做的啊 c#行不行？
c#在XP运行不了，除非让别人先装上.net.
VB相对于C,C++,ASM等等，局限性大多了。
别再说什么语言不如什么语言的话了，只有你不会用或用着不顺手的� ......
本人使用的是VB6.0版本
假设有一个对象A，A内有类型为B的对象属性。现在的问题是，需要添加若干个B对象作为A对象的属性。如，
A.B1,A.B2,...
但具体添加多少个B对象作为A对象的属性则视具体情况不同而不同 ......
Private Sub Form_Load()
recs = Adodc1.Recordset.RecordCount '求当前记录数
If recs > 0 Then '已有考生
Adodc1.Recordset.MoveLast '移到最后一条记录
num = V ......
数据库貌似已经连接上了vb，，可是为什么数据库上的数据不能显示在框表中捏？？？
具体的代码？
无码无真相！
你把篮球抱在怀里，就能远投得3分？
麻烦各位大虾了啊。。。
Private Sub Comm1_Click()
& ......
