السلام عليكم ورحمة الله
ممكن كود يعرف ان المدخل = رقم او لا
جربت :
dim a
a = text1
if a <> number then
msgbox ""
end if
لا فائدة
(ما هي دالة number ),,, لا اعرف
Numbers - معرفة الارقام
اقتباس(ما هي دالة number ),,, لا اعرف
IsNumeric
Dim a as string a = text1.text if IsNumeric(a) = false then msgbox "هذه ليست قيمة رقمية" end if
تم تعديل هذه المشاركة بواسطة Ala2 VB في 24 أبريل 2008 في 17:40
اقتباسIf A is success in life, then A equals x plus y plus z. Work is x; y is play; and z is keeping your mouth shut
Albert Einstein