vb結(jié)合sql開發(fā)網(wǎng)上書店管理系統(tǒng)-全文預(yù)覽
【正文】 b Command2_Click() select * from 圖書信息表 where 圖書編號 =39。, conn, adOpenDynamic, adLockPessimistic Set = rs End Sub Private Sub Form_Load() Provider=。, conn, adOpenKeyset, adLockOptimistic, adCmdText (購買者編號 ) = (購買時間 ) = (購買數(shù)量 ) = Set = rs End Sub Private Sub Command3_Click() select*from 購買信息表 where 圖書編號 =39。Persist Security Info=False。 Trim() amp。, conn, adOpenDynamic, adLockPessimistic Set = rs End Sub ⑤ 調(diào)試運行結(jié)果 購買者信息管理界面： 6 Dim conn As New Dim rs As New Private Sub Command1_Click() (購買者編號 ) = (購買者姓名 ) = If Len() 0 And Len() 0 Then Set = rs MsgBox 信息添加成功！ End If End Sub//添加信息語句 Private Sub Command2_Click() select * from 購買者信息表 where 購買者編號 =39。, conn, adOpenKeyset, adLockOptimistic, adCmdText (圖書名稱 ) = (單價 ) = Set = rs End Sub ④ 對查詢功能的實現(xiàn) 通過圖書編號查詢圖書的信息 Private Sub Command3_Click() select*from 圖書信息表 where 圖書編號 =39。Persist Security Info=False。 某某 學(xué)院 計算機科學(xué)與技術(shù) 系 課 程
醫(yī)療健康相關(guān)推薦
鄂ICP備17016276號-1