1. VB中如何實現刪除資料庫的記錄
..................
strsql = "select * from jieyong"
rs.Open strsql, conn, 3, 3
tag=false
for i=1 to rs.recordcount
if text1.text = rs.fields(1) then
rs.delete
rs.update
tag=true
end if
rs.movenext
next i
if tag=false then
msgbox("無該記錄！")
else
msgbox("已刪除！")
endif
rs.close
2. 怎樣用VB添加資料庫表，刪除記錄
'引入命名空間
Imports System.Data.SqlClient
'建立數據連接
Dim strcon As String = "integrated security=sspi;" & "server=(local);database=master"
Dim mycon As New SqlConnection(strcon)
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
'建立數據命令
Dim mycmd As New SqlCommand
mycmd.Connection = mycon
mycmd.CommandType = CommandType.Text
mycmd.CommandText = "create database student on" & _
"( NAME = student_dat,FILENAME = 'D:\data\student.mdf')" & _
"log on" & _
"( NAME = 'student_log'," & " FILENAME = 'D:\data\student.ldf')"
mycon.Open()
'執行數據命令
Try
mycmd.ExecuteNonQuery()
MsgBox("資料庫創建成功！")
Catch ex As Exception
MessageBox.Show(ex.Message, "請注意！", MessageBoxButtons.OK, MessageBoxIcon.Stop)
Finally
End Try
'關閉連接
mycon.Close()
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim mycmd1 As New SqlCommand
mycmd1.Connection = mycon
mycmd1.CommandType = CommandType.Text
mycmd1.CommandText = "CREATE TABLE info(學號 int,姓名 varchar(50) NOT NULL,班級 varchar(50),出生年月 datetime,戶籍 varchar(50) null)"
mycon.Open()
'執行數據命令
Try
mycmd1.ExecuteNonQuery()
MsgBox("表創建成功！")
Catch ex As Exception
MessageBox.Show(ex.Message, "請注意！", MessageBoxButtons.OK, MessageBoxIcon.Stop)
Finally
End Try
'關閉連接
mycon.Close()
End Sub
3. vb 刪除資料庫 .delete
rs.delete刪除一跳，如果刪除多條可以使用刪除的SQL，例如：
SetConn=CreateObject("ADODB.Connection")
Conn.open"driver={MicrosoftAccessDriver(*.mdb)};dbq=HB_LQTZ0111.mdb;pwd=1024"
Conn.Execute("deletefromwhere狀態='中斷'")
Conn.Close
4. VB+SQL刪除指令怎麼做
trim()函數，是刪除文本的前後空格！
例如：
dim s as string
DIM D AS STRING
s = " ABC "
D = Trim(s)
D的結果是「ABC」
前後空格沒有了。
這個主要是怕，用戶輸入到文本框里的內容，前後帶上不必要的空格，而造成找不到需要的記錄。
但是你的這個Select語法還是錯誤的
應該：
Adodc1.Recordset = "select * from table1 where 姓名='" & Trim(Text1(0).Text) & "'"
少了2個單引號，在等號後面加一個單引號
在最後一對雙引號之間加1個單引號
5. VB怎樣刪除資料庫全部記錄
下面語句剛剛做成，並通過測試。
Private Sub Command5_Click()
If (Adodc1.Recordset.BOF Or Adodc1.Recordset.EOF) Then
MsgBox "無記錄可刪除", , "提示"
End If
While Not Adodc1.Recordset.EOF()
Adodc1.Recordset.Delete
Adodc1.Recordset.MoveNext
Wend
MsgBox "記錄已經全部清除！", vbOKOnly, "提示"
End Sub
6. VB中使用SQl語句刪除記錄
可以使用execute語句刪除記錄，但你的查詢語句可能寫錯了，應該寫為：
AccessDBF.Execute ("delete from OPCTagTable Where TagName ='Channel_0_User_Defined.Sine.Sine1'")
7. VB刪除SQL資料庫記錄問題
你的工程文件中已經引用了ADODB了嗎？
8. VB 刪除sql
藉助於約束名:
alter table 表名 drop 約束名
9. 在vb中刪除sqlserver中表的記錄，我是想刪除查詢到底語句，如何實現
你的查詢應該是有條件的，既然如此
用ado執行刪除語句即可，條件就是查詢的條件
示例：connection.Execute "delete from table where 條件"
10. VB中使用SQL語句刪除記錄
Private
Sub
Form_Load()
Dim
cn
As
New
ADODB.Connection
Dim
rs
As
New
ADODB.Recordset
cn.Open
"Provider=Microsoft.Jet.OLEDB.4.0;Data
Source="
&
App.Path
&
"\TEST.mdb"
cn.Execute
("delete
from
TEST
where
NAME_CODE=0567")
'此處的0567不是數字類型所以要改為
cn.Execute
("delete
from
TEST
where
NAME_CODE='0567'")
'加上單引號
End
Sub