Spinner question

[volvomann]

I use this code to call mailclient and send mail.
When i click on lablmail i want the spinner to be position 0 how do i do that
tried a several codes but no sucesss.

Sub spnkont_ItemClick (Position As Int, Value As Object)
   If Position = 0 Then
      
   Else If Position = 1 Then
      lblmail.Visible= True
      Panel1.Visible=True      
   Else If Position = 2 Then
      
   End If
End Sub
Sub lblmail_Click
   Dim imail As Intent 
    imail.Initialize(imail.ACTION_VIEW, "mailto:" & lblmail.Text)
    StartActivity(imail)
       lblmail.Visible= False
      Panel1.Visible=False
   
End Sub

 

[klaus]

spnkont.SelectedIndex = 0

Best regards.

 

[volvomann]

spnkont.SelectedIndex = 0

Best regards.

Thank you