Я столкнулся с другой проблемой. Я хочу связать таймер с моей функцией.
На самом деле я пытаюсь сохранить определенные значения в базе данных. Функция такова, что она вычисляет 5 значений и сохраняет их в базе данных. Сохраняя их в базе данных, он отображает их в текстовом поле на форме. Теперь я хочу показать их один за другим, что он делает. Но он делает это так быстро, что я вижу только последнее значение, которое он вводит в базу данных внутри текстового поля.
Могу ли я сделать так, чтобы все значения показывались медленно по одному.
Private Sub dbInsert(ByVal strfile As String, ByVal hashoffile As String, ByVal p As Integer)
'parameter to the above function (ByVal strfile As String)</p>
<pre><code> DbConnection()
cmd = "select * from hashtable"
da = New OleDb.OleDbDataAdapter(cmd, con)
da.Fill(ds, "values")
maxrows = ds.Tables("values").Rows.Count
TextBox1.Text = p + 1
TextBox2.Text = hashoffile
TextBox3.Text = strfile
Dim cb As New OleDb.OleDbCommandBuilder(da)
Dim dsnewrow As DataRow
dsnewrow = ds.Tables("values").NewRow()
dsnewrow.Item("p_id") = TextBox1.Text
dsnewrow.Item("process_name") = TextBox2.Text
dsnewrow.Item("hash_value") = TextBox3.Text
ds.Tables("values").Rows().Add(dsnewrow)
da.Fill(ds)
da.Update(ds, "values")
'MsgBox("new Item added to database")
con.Close()
'System.Threading.Thread.Sleep(1000)
End Sub