مشکل پنل

[rasoul22 40]

چجوری مثله عکس زیر بسازم

http://answercenter.ir/uploads/monthly_01_2016/post-3772-0-39083200-1452097730.png

 لطفا کامل کمک کنید

[پژمان نیکروان 6,055]

سلام.

 

از تابع اینپوت لیست میتونید استفاده کنید:

Dim items As List
items.Initialize
items.Add("دانلود ویدیو")
items.Add("پخش آنلاین")

Dim a As Int
a=InputList(items,"انتخاب عملیات",-1)
If a=0 Then
	ToastMessageShow("روی آیتم اول کلیک شد",False)
else if a=1 Then
	ToastMessageShow("روی آیتم دوم کلیک شد",False)
End If

[rasoul22 40]

عالی بود

مرسی