将这一句:strsql = "select*from 借还书表 where 读者号=" '&rid&'"and 书号="'&bid&'""改为:strsql = "select * from 借还书表 where 读者号='" & rid & "' and 书号='" & bid & "'"