استعلام مركب في الاكسس

جرب الاستعلام التالي

select (select count (id) from table1 where kind='male') as Males, (select count (id) from table1 where kind='female') as Females, (select count (id) from table1 where kind='pass') as Pass, (select count (id) from table1 where kind='fale') As Fail

لم ينفذ معي

فكرت في حل

اقسم الاستعلام حتي اصل الي الحل

select (select count (id) from table1  where  kind='mal' ) as males, (select count(id) from talbe1 where kind='femail' ) as femals

لكن لم يفي بالحل

ما الحل

ارجو ارفاق رساله الخطأ ممكن يكون خطأ باسم الجدول او الحقل, لأنه الحل جربته مسبقا

If Conn.State = ConnectionState.Open Then Conn.Close()
        'ds.Clear()
        Dim ds6 As New DataSet
        ds6.Clear()
        Dim sqlstr6 As String = "select (select count (id) from student   where kind='ذكر') as Males, (select count (id) from student where kind='انثي') as Females "
        Dim dt6 As New OleDbDataAdapter(sqlstr6, Conn)
        dt6.Fill(ds6, sqlstr6)
        Conn.Close()
        MsgBox(ds6.Tables("").Rows(0).Item("Males").ToString)

حاولت ارفع القاعدة لم استطع

اذا كنت تستخدم اللغه العربيه في ادخال البيانات ارجو اضاف الحرف N قبل القيم في جمله الـ Select

السيد الفاضل

برجاء جملة ال  select    حتي  يظهر الاعداد

عذرا افتكر قاعده البيانات سيكول سيرفر, خليك على الجمله الاولى, لكن يبدوا في خطأ عندك في الكود, حاول استخدام ds6.Tables(0)