Sub lblExit_Click
Dim Answ As Int
Dim Txt As String = "Are you sure?"
Dim msgSi As String = "yes"
Dim msgNo As String = "no"
Answ=Msgbox2(Txt,"Question",msgSi,"",msgNo,LoadBitmap(File.DirAssets, "logo.png"))
If Answ=DialogResponse.POSITIVE Then
Activity.finish
End If