alireza1991
کاربر تازه وارد
- تاریخ عضویت
- 9 مارس 2007
- نوشتهها
- 3
- لایکها
- 0
ممنون ميشم جواب بديد.
(حل با استفاده از تابع RND)
با يكم توضيح...
(حل با استفاده از تابع RND)
با يكم توضيح...
يني چي با تابع RNDممنون ميشم جواب بديد.
(حل با استفاده از تابع RND)
با يكم توضيح...
dim a(10) as string
private sub command1_click()
select case rnd()*4
case 1
print "ARMIN"
case 2
print "ALI"
case 3
print "alireza"
case 4
print"moeen"
end select
end sub