لو سمحتوا انا عندي اسئلة مهمة جدا جدا

بالنسبه لموضوع اخر رقمين "سافترض ان الرقم هو k وانك حصلت عليه بطريقه ما"

dim s as integer

dim n as double

n=k

n=n/100

s=n

slution=(n-s)*100

msgbox slution

الف شكر على الرد

لكن الكود يعمل فقط اذا كان الرقم مكون من ثلاث ارقام

لكن لو كبر عن ذلك يعطي نتيجة غريبة

لا ان الرقم اللي عندي مكون من 12 رقم

Right :وتعيد عدد معين من السلسلة من الجهة اليمنى

Right(text1.text,2)

المثال المرفق يضح العملية

vba.zip

بالنسبة لاستقطاع رقمين من سلسلة فان طريقة الاخر اشرف (awadiah) هي المثلى .

اما موضوع التاب Tab فيوجد أداة ايضا اسمها SSTab لها امكانيات وتحكمات اكثر من الاولي

وهي موجودة باسم Microsoft Tabbed Dialog Control 6.0

تحياتي للجميع

بالنسبة للسؤال الثاني كما ذكر لك الإخوة الأعزاء نستخدم الدوال Right و Left و Mid

الدالة Right لاقتطاع عدد معين من الأحرف ( تحدده أنت ) من جهة اليمين

والدالة Left لاقتطاعه من جهة اليسار

والدالة Mid لاقتطاعه من أي مكان في الكلمة أو الجملة

بالنسبة للسؤال الثالث لوضع شرطين في الأمر

If .... then
....
elseif ....
....
else
....
end if

أو بإمكانك استخدام الأمر Select case

بالنسبة للأداة تاب ستريب فأعتقد أنها صممت بطريقة خطأ من ميكروسوف

هذه الأداة تعمل بشكل جيد في فيجوال نت فقد

تكملة الرسالة

فقد قمت بتجربتها في فيجوال نيت وكانت تعمل بشكل جيد جداً

وعندما أستخدمتها في فيجوال 6 وجدت أنها ليس لها أي فائدة

الف شكر على الردود

لكن يا اخ عبد الله انا قصدي

مثلا

select * from members where id=8 and b_id=9

انا قصدي كيف احط شرطين في الفلتير الواحد (شرطين في نفس الوقت)

او اكثر من شرطين