Переход от набора записей к набору данных

Я работаю над проектом по обновлению с VB6 до VS.Net. Я очень сомневаюсь и потерялся из-за того, как набор записей должен функционировать в этом куске кода, так что, конечно, это не поможет пытаясь сделать то же действие с набором данных. Я был бы очень признателен, если бы кто-то мог объяснить это и посоветовать, как продолжить реализацию с набором данных. Это "Рекордсет!" часть, которая действительно отталкивает меня.

Private Sub cmdTemp_Click()
  Dim sz As String
  If txtTemp >= 0 Then
    sz = "Update ProdSheet set Temp = " & txtTemp & " "
    sz = sz & "Where Prod like '" & adoSchedList.Recordset!Prod & "' "
    adoLoggedDBExecute sz
  Else
    MsgBox "Enter a Value for the Temperature you wish to update"
  End If 
End Sub

это моя попытка в VS 2017

Private Sub CmdTemp_Click(sender As Object, e As EventArgs) Handles CmdTemp.Click
  Dim sz As String
  With TxtTemp
    If IsNumeric(.Text) Then
      If Val(.Text) >= 0 Then
        sz = "Update ProdSheet set Temp = " & TxtCheck.Text & " "
        sz = sz & "Where Prod =  @!Prod "
        LoggedDBExecute(conn, sz)
        MsgBox("Worked")
      End If
    Else
      MsgBox("Please enter a numeric value!")
    End If
  End With
End Sub

0 ответов

Другие вопросы по тегам