Sub Globals
Dim a As Int
Private Label1 As Label
Dim c(3) As String
End Sub
Sub Activity_Create(FirstTime As Boolean)
Activity.LoadLayout("1")
c(0)="sss"
c(1)="sss"
c(2)="bbb"
c(3)="mmm"
a=Rnd(0,3)
Label1.Text=c(a)
End Sub
سلام دوستان من برنامه ای میخوام بنویسم که از ارایه چهار تایی از نوع رشته یکیش بطور تصادفی تو لیل نشون بده برنامه بالارو نوشتم
کامپایل میشه ولی هنگام اجرا ارور میده . و تو لیبل چیزی به نمایش درنمیاد.کجای کارم غلطه؟لطفا اگه میتونید درسته برنامه ی من بنویسید .واسم خیلی
سوال
bazarghan 0
Sub Globals Dim a As Int Private Label1 As Label Dim c(3) As String End Sub Sub Activity_Create(FirstTime As Boolean) Activity.LoadLayout("1") c(0)="sss" c(1)="sss" c(2)="bbb" c(3)="mmm" a=Rnd(0,3) Label1.Text=c(a) End Subسلام دوستان من برنامه ای میخوام بنویسم که از ارایه چهار تایی از نوع رشته یکیش بطور تصادفی تو لیل نشون بده برنامه بالارو نوشتم
کامپایل میشه ولی هنگام اجرا ارور میده . و تو لیبل چیزی به نمایش درنمیاد.کجای کارم غلطه؟لطفا اگه میتونید درسته برنامه ی من بنویسید .واسم خیلی
مهمه .
لینک ارسال
به اشتراک گذاری در سایت های دیگر
3 پاسخ به این سوال تاکنون داده شده است
ارسال‌های توصیه شده
بایگانی شده
این موضوع بایگانی و قفل شده و دیگر امکان ارسال پاسخ نیست.