[Amin_Mansouri]

سلام اکتیویتی نزار
پنل بزار
و رو پنل کارتو بکن

کد:

Sub Globals
Dim Panel1 As Panel
End Sub
Sub Activity_Create (FirstTime As Boolean)
LoadLayoutToPanel("layout1")
End Sub

Sub LoadLayoutToPanel (Layout As String)
If Panel1.IsInitialized then
  Activity.RemoveViewAt(0)
End If
Panel1.Initialize("")
Panel1.LoadLayout(Layout)
Activity.AddView(Panel1, 0, 0, 100%x, 100%y)
End Sub

برا بستن اکتیویتی قبلی از دستور زیر :

کد:

activity.finish

اطلاعات بیشتر :

http://www.b4x.com/android/forum/threads...yout.6993/