Обновление базы данных SQL Server динамически в VB.Net

Question

Я пытаюсь динамически генерировать запрос с использованием значений текстового поля из формы «Мои заказы», ​​чтобы обновлять только те значения, которые были введены пользователем.

Я использую следующий код:

Dim str As String 

str = "UPDATE Bookings SET " 
Dim first As Integer = 1 
For Each x As Control In Me.Controls 
    If x.GetType Is GetType(TextBox) Then 
     If first = 1 Then 
      first = 2 
     Else 
      str &= "," 
     End If 
     If x.Tag = 1 Then 
      str = str & x.Name & " = @" & x.Name 
     End If 
    End If 
Next 

Но генерирует запрос следующим образом:

Update Bookings SET ,,booking_date = @booking_date,,,,,cust_name = @cust_name where bookingID = @bookingID 

Или, если я хочу, чтобы обновить только 1 поле он генерирует это:

Update Bookings SET ,,,,,,,cust_name = @cust_name where bookingID = @bookingID 

Answer 1

Dim str As String 
str = "UPDATE Bookings SET " 
Dim comma As string = "" 
For Each x As Control In Me.Controls 
    If x.GetType Is GetType(TextBox) Then 
    If x.Tag = 1 Then 
     str &= comma & x.Name & " = @" & x.Name 
     comma = "," 
    End If 
    End If 
Next 

И вот e Один ответ.

Dim str = "UPDATE Bookings SET " & String.Join(",", (From _E In Controls.OfType(Of Control)() Where _E.GetType() Is GetType(TextBox) AndAlso _E.Tag = "1" Select _E.Name).ToList())