[طالب برمجة]

PHP كود :

   Private Sub Form3_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        dbase_conn()
        InfoCommand = New OleDbCommand("SELECT * FROM RECENSEMENT ORDER BY Nname", con)
        InfoAdapter = New OleDbDataAdapter()
        InfoAdapter.SelectCommand = InfoCommand
        InfoTable = New DataTable()
        InfoAdapter.Fill(InfoTable)
        DataGridView1.DataSource = InfoTable

        If con.State <> ConnectionState.Open Then con.Open()
        Using cmd As New OleDbCommand(Nothing, con)
            cmd.CommandText = "SELECT COUNT(*) FROM RECENSEMENT WHERE Ggenre='ذكر'"
            TextBox1.Text = cmd.ExecuteScalar
            cmd.CommandText = "SELECT COUNT(*) FROM RECENSEMENT WHERE Ggenre='أنثى'"
            TextBox2.Text = cmd.ExecuteScalar
        End Using
        con.Close()
    End Sub 


#16