bonjour
je souhaites récupérer la valeur de ma requête dans un texbox

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
20
21
22
23
24
25
26
27
 Private Sub Form1_Load(sender As Object, e As EventArgs) Handles Me.Load
 
        ConnSQL.ConnectionString = "Data Source=DESKTOP-KBC80U4\SQLEXPRESS;Initial Catalog=ScadaNetDb1;Integrated Security=SSPI"
        ConnSQL.Open()
 
        sqlSelect = " SELECT sum(T1.INF_Value)  FROM  dbo.View_ArchivedInformations  As T1 " _
            & "  WHERE ((T1.STA_SiteNumber = 14 Or T1.STA_SiteNumber = 15 Or T1.STA_SiteNumber = 16 )And T1.INF_NumberInStation < 49) " _
            & " And T1.INF_Date = (Select MAX(S1.INF_Date)  FROM dbo.View_ArchivedInformations As S1     WHERE S1.ID = T1.ID  )"
 
 
 
        Dim dt As New DataTable
 
        Dim oSqlDataAdapter As New SqlDataAdapter(sqlSelect, ConnSQL)
        oSqlDataAdapter.Fill(dt)
        'MsgBox(dt)
        DataGridView1.AutoGenerateColumns = True
        DataGridView1.DataSource = dt
        DataGridView1.Refresh()
 
        'ReadSQL.Close()
        ConnSQL.Close()
 
        cnx.open()
 
 
    End Sub
sans passer par un datagridview

merci de vote aide