[طالب برمجة]

أسلوب VB6 واضح في المشروع

يستحسن أن يتم عمل جدول خاص بالطلاب أو العملاء فيكون لكل واحد منهم رقم تعريف خاص به ويتم ربط الجداول الأخرى به
فإن كانوا تلاميذ تسميه مثلا Student وإن كانوا عملاء تسميه مثلا Customer

---

PHP كود :

Private Sub TextBox1_TextChanged(ByVal sender As Object, ByVal e As EventArgs) Handles TextBox1.TextChanged
    SQLTable = "SELECT * FROM FIRST_TABLE WHERE FirstName LIKE '%" & TextBox1.Text & "%' "
    DataSetTable.Clear()
    Dim DataAdapters As New OleDbDataAdapter(SQLTable, Conn)
    DataAdapters.Fill(DataSetTable, "FIRST_TABLE")

    If Conn.State <> ConnectionState.Open Then Conn.Open()
    TextBox2.Text = New OleDbCommand("SELECT MMOYENNE FROM SECOND_TABLE WHERE FirstName ='" & TextBox1.Text & "' ", Conn).ExecuteScalar
    TextBox3.Text = New OleDbCommand("SELECT MMOYENNE FROM THIRD_TABLE  WHERE FirstName ='" & TextBox1.Text & "' ", Conn).ExecuteScalar
    Conn.Close()

End Sub