Discussion :

[seksaki]

bonsoir,

je veux savoir comment actualiser des données d'une listbox avec un timer 5secondes.
quand j'ajoute des données dans ma table il faut qu'ils récupère les derniers ajout et s'affichent dans la prochaine actualisation de la listbox

merci.

[Ehjoe]

Bonjour,

Objets = 3
- form 1
- Timer 1
- ListBox 1

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
 
' Liste + Timer_form 1
Option Explicit On
Public Class Form1
  Dim sourceListe As String
 
  Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
    ListBox1.Items.Clear()
    Timer1.Interval = 1000 ' 1s
    Timer1.Enabled = True
  End Sub
 
  Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
    sourceListe = "???"
    ListBox1.Items.Add(sourceListe) ' ou autre op
    ListBox1.Refresh()
    If Condition = C Then Timer1.Enabled = False ' stop timer
  End Sub
End Class

Cordialement.

Joe.