سؤال بسيط فى الinput

يمكنك إظهاره مرتين مثلاً، مرة للطول ومرة للعرض.

أو يمكنك كتابة التالي مثلاً:

Dim MyArray As Variant
Dim MyHeight As Double
Dim MyWidth As Double
MyArray = Split(InputBox("أدخل الطول والعرض مفصولين بفاصلة"), ",")
MyHeight = MyArray(0)
MyWidth = MyArray(1)
MsgBox MyHeight
MsgBox MyWidth

جعلت MyArray من نوع Variant بسبب خطأ ليس له سبب (الظاهر أن الفيجوال بيسك عندي قد أصيب بالملل ويريد أن يتسلى :( )

أرجو أن يفيدك.

جزاك الله خيرآ يا أخى

ولك ألف شكر

يمكنك إظهاره مرتين مثلاً، مرة للطول ومرة للعرض.

اقتباس

أو يمكنك كتابة التالي مثلاً:

plain text

Dim MyArray As Variant

Dim MyHeight As Double

Dim MyWidth As Double

MyArray = Split(InputBox("أدخل الطول والعرض مفصولين بفاصلة"), ",")

MyHeight = MyArray(0)

MyWidth = MyArray(1)

MsgBox MyHeight

MsgBox MyWidth

أرجو أن يفيدك.

طبعآ أفادنى

ولى سؤال بسيط تابع لنفس الموضوع

أجد هذا الكود يقبل ادخال أكثر من متغيرين مثلآ(12,89,56,78)

فهل يمكن جعله لا يقبل ادخال أكثر من متغيرين

ولك ألف شكر