[Taha Okla]

الكود :

كود :

Dim dt As New DataTable
     Try
         quary = "select * from table_game where id_g =" & ComboBox1.SelectedValue  
         da = New SqlDataAdapter(quary, Module1.con)
         da.Fill(dt)
         TextBox5.Text = dt.Rows(0)(3)

     Catch ex As Exception
         MsgBox(ex.Message)
     End Try