前沿拓展:
vb數(shù)據(jù)庫
重新連接數(shù)據(jù)庫 或者如2樓所說 一般是做重新連接,按這樣的情況,你應(yīng)該在編寫之前就建立個(gè)揮湖沉據(jù)照絕怕專門用來刷新的函懷商海根地活數(shù),到時(shí)調(diào)用一下就很方便了。
視頻加載中…
今天學(xué)習(xí)了劉金玉老師零基礎(chǔ)VB教程的第84期,學(xué)習(xí)的主要內(nèi)容是mshflexgrid聯(lián)動數(shù)據(jù)庫刪除。
一、思路
今天學(xué)習(xí)的內(nèi)容,主要在昨天數(shù)據(jù)錄**動的基礎(chǔ)上,增加刪除聯(lián)動的功能,思路都差一樣,主要是如何確定需要?jiǎng)h除的行,在確定后使用"delete from [users] where [id]=" & MSHFlexGrid1.TextMatrix(Row, 0)刪除所在行的數(shù)據(jù),MSHFlexGrid1.TextMatrix(Row, 0)表示當(dāng)前選中的行第一列的值。(補(bǔ)充知識:MSHFlexGrid1.row表示選中的行號)。
二、兩步聯(lián)動刪除數(shù)據(jù)
1.第一步:刪除數(shù)據(jù)庫的數(shù)據(jù)
Private Sub Command3_Click()
If conn.State = 0 Then
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:作業(yè)成果學(xué)習(xí)VB編程第67天Database1.mdb;Persist Security Info=False"
conn.Open
End If
Set rs = New ADODB.Recordset
sql = "delete from [users] where [id]=" & MSHFlexGrid1.TextMatrix(Row, 0)
MsgBox sql
rs.Open sql, conn, adOpenKeyset, adLockBatchOptimistic
End Sub
2.第二步:刪除mshflexgrid表格對應(yīng)的數(shù)據(jù)
方法一:通過調(diào)用重新查詢方式更新mshflexgrid表格,達(dá)到聯(lián)動刪除數(shù)據(jù)的效果。此方法存在浪費(fèi)運(yùn)行資源,效率不高的弊端,不推薦使用。
方法二:直接在mshflexgrid表格上刪除對應(yīng)的行, 使用MSHFlexGrid1.RemoveItem MSHFlexGrid1.Row可以刪除選中指定的行。
三、運(yùn)行效果詳見視頻
拓展知識:
前沿拓展:
vb數(shù)據(jù)庫
重新連接數(shù)據(jù)庫 或者如2樓所說 一般是做重新連接,按這樣的情況,你應(yīng)該在編寫之前就建立個(gè)揮湖沉據(jù)照絕怕專門用來刷新的函懷商海根地活數(shù),到時(shí)調(diào)用一下就很方便了。
視頻加載中…
今天學(xué)習(xí)了劉金玉老師零基礎(chǔ)VB教程的第84期,學(xué)習(xí)的主要內(nèi)容是mshflexgrid聯(lián)動數(shù)據(jù)庫刪除。
一、思路
今天學(xué)習(xí)的內(nèi)容,主要在昨天數(shù)據(jù)錄**動的基礎(chǔ)上,增加刪除聯(lián)動的功能,思路都差一樣,主要是如何確定需要?jiǎng)h除的行,在確定后使用"delete from [users] where [id]=" & MSHFlexGrid1.TextMatrix(Row, 0)刪除所在行的數(shù)據(jù),MSHFlexGrid1.TextMatrix(Row, 0)表示當(dāng)前選中的行第一列的值。(補(bǔ)充知識:MSHFlexGrid1.row表示選中的行號)。
二、兩步聯(lián)動刪除數(shù)據(jù)
1.第一步:刪除數(shù)據(jù)庫的數(shù)據(jù)
Private Sub Command3_Click()
If conn.State = 0 Then
conn.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=D:作業(yè)成果學(xué)習(xí)VB編程第67天Database1.mdb;Persist Security Info=False"
conn.Open
End If
Set rs = New ADODB.Recordset
sql = "delete from [users] where [id]=" & MSHFlexGrid1.TextMatrix(Row, 0)
MsgBox sql
rs.Open sql, conn, adOpenKeyset, adLockBatchOptimistic
End Sub
2.第二步:刪除mshflexgrid表格對應(yīng)的數(shù)據(jù)
方法一:通過調(diào)用重新查詢方式更新mshflexgrid表格,達(dá)到聯(lián)動刪除數(shù)據(jù)的效果。此方法存在浪費(fèi)運(yùn)行資源,效率不高的弊端,不推薦使用。
方法二:直接在mshflexgrid表格上刪除對應(yīng)的行, 使用MSHFlexGrid1.RemoveItem MSHFlexGrid1.Row可以刪除選中指定的行。
三、運(yùn)行效果詳見視頻
拓展知識:
原創(chuàng)文章,作者:九賢生活小編,如若轉(zhuǎn)載,請注明出處:http://xiesong.cn/11484.html