[ali_ahmed12]

(28-09-22, 12:56 AM)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

نفس المشكلة