A.Farzin
چهارشنبه 01 خرداد 1387, 19:32 عصر
با سلام
من تعداد 90 Sub دارم كه هر كدامشان در حالتي خاص بايد اجرا شوند. نامهاي اين سابها عبارتند از Sub1، Sub2، Sub3، ...، Sub90
براي تشخيص اينكه در هر شرايط كدام Sub بايد Call شود از يك SELECT CASE ... END SELECT استفاده كردهام.
دوست داشتم تا بدون ساخت چنين SELECT CASE طولاني و از طريق تركيب دو متغير، نام مناسب هر ساب را بدست آورده و اين متغير را در جلوي Call قرار دهم ولي روي نوع متغير خطا رخ ميداد.
به اين ترتيب كه اگر I متغيري از نوع Byte باشد از طريق
"SUB" & TRIM(STR(I)) يك متغير String بدست آورم كه معادل نام يكي از سابهاست. و حالا اين نام را اجرا كنم.
ميخواستم بدانم كه آيا چنين چيزي عملي است و اگر هست از چگونه بايد انجامش دهم؟
ممنون
من تعداد 90 Sub دارم كه هر كدامشان در حالتي خاص بايد اجرا شوند. نامهاي اين سابها عبارتند از Sub1، Sub2، Sub3، ...، Sub90
براي تشخيص اينكه در هر شرايط كدام Sub بايد Call شود از يك SELECT CASE ... END SELECT استفاده كردهام.
دوست داشتم تا بدون ساخت چنين SELECT CASE طولاني و از طريق تركيب دو متغير، نام مناسب هر ساب را بدست آورده و اين متغير را در جلوي Call قرار دهم ولي روي نوع متغير خطا رخ ميداد.
به اين ترتيب كه اگر I متغيري از نوع Byte باشد از طريق
"SUB" & TRIM(STR(I)) يك متغير String بدست آورم كه معادل نام يكي از سابهاست. و حالا اين نام را اجرا كنم.
ميخواستم بدانم كه آيا چنين چيزي عملي است و اگر هست از چگونه بايد انجامش دهم؟
ممنون