Label.Text Problem

Sub lstviewResults_ItemClick (Position2 As Int, Value As Object)
Dim Buffer() As Byte 'declare an empty byte array
Dim InputStream1 As InputStream
Dim Cursor1 As Cursor
Dim Bitmap1 As Bitmap
Dim Myphone As Phone
Dim MP As MediaPlayer
   
   Myphone.HideKeyboard(Activity)
   ToastMessageShow("Displaying " & Value,False)
   MenuPanel.Visible = False
   SelectionPanel.LoadLayout("Selection")
   
   
   lblSelectionTitle.Text = Value

    Cursor1 = myDatabase.ExecQuery2("SELECT Pic FROM Rudiments WHERE Rudiments = ?",Array As String(Value))
    Cursor1.Position = 0
  
   Buffer = Cursor1.GetBlob("Pic")
    InputStream1.InitializeFromBytesArray(Buffer, 0, Buffer.Length)
    Bitmap1.Initialize2(InputStream1)
    InputStream1.Close
   ImgViewRudiment.SetBackgroundImage(Bitmap1)
    
    Cursor1 = myDatabase.ExecQuery2("SELECT Sticking FROM Rudiments WHERE Rudiments = ?",Array As String(Value))
   Cursor1.Position = 0

   LblSticking.Text = Cursor1.GetString("Sticking")
   
   Cursor1.Close
   
   SelectionPanel.Visible = True
   
End Sub

SelectionPanel.LoadLayout("Selection")