Sub showpanel2(e)
Panel2.visible=e
Panel2.Left=0
Panel2.Top=0
Panel2.Width=100%x
Panel2.Height=100%y
BtnReturn2player.Width=100%x
BtnReturn2player.Height=40dip
BtnReturn2player.Top=100%y-BtnReturn2player.height
BtnReturn2player.Left=0
listview1.Top=0
listview1.Left=0
listview1.Width=100%x
listview1.Height=100%y-BtnReturn2player.height
End Sub