VB - 使用文本框中保存的数据更新表

时间:2014-01-11 09:33:12

标签: sql vb.net textbox

如何使用SQL将数据放入空表?到目前为止,在我的代码中,我从SQL表中获取了数据,然后使用以下代码将其放入文本框中:

Dim query As String = "SELECT Pronunciation, Character FROM [Katakana List] WHERE Pronunciation='" & pronunciation & "';"
    Dim instruction = New SqlCommand(query, sqlCon)
    Dim da As New SqlDataAdapter
    da.SelectCommand = instruction
    da.Fill(Katakana)

Textbox1.text=DT.row(0)("column")

既然数据保存在文本框中,我该如何反过来将数据放入空表中。如果有人能给我一个我可以用来重新输入数据的查询示例,那将会有所帮助。

2 个答案:

答案 0 :(得分:1)

如果您想要之前从查询中获得的更新数据,请使用UPDATE - 查询
如果您想要插入全新数据,请使用INSERT - 查询

'For updating existing data
Dim query As String = "UPDATE [Katakana List] SET Character = @NewCharacter WHERE Pronunciation=@Pronunciation"
'For Inserting new data
Dim query As String = "INSERT INTO [Katakana List] (Character) VALUES (@NewCharacter);" 
Using instruction As New SqlCommand(query, sqlCon)
    'Better practice to use parameters in query
    instruction.Parameters.AddWithValue("@Pronunciation", pronunciation)
    instruction.Parameters.AddWithValue("@NewCharacter", Textbox1.text)
    instruction.ExecuteNonQuery()
End Using

答案 1 :(得分:0)

如果要将文本框中的数据设置为数据表,请执行以下操作:

DT.row(0)("column") = Textbox1.text

如果要将其输入数据库创建查询,请执行以下操作:

Dim query As String = "Insert Into TableName(col1) Values('"& Textbox1.text &"');"
Dim command = New SqlCommand(query, sqlCon)
command.ExecuteNonQuery()