Sub btnaggiungi_Click
speech.StopRecording
Dim items As List = TableView1.GetItems(0)
Dim tc As TableCell 'create a new item
tc.InitializeSingleLine(txtordine.Text)
items.InsertAt(0, tc)
TableView1.ReloadSection(0)
txtordine.Text=""
End Sub
Sub btnwhastapp_Click
Dim avc As ActivityViewController
avc.Initialize("avc", Array("TESTO COME STRINGA" , ""))
avc.Show(Page1, Page1.RootPanel)
End Sub
Sub avc_Complete (Success As Boolean, ActivityType As String)
Log($"Success: ${Success}, ActivityType: ${ActivityType}"$)
End Sub
Sub TableView1_SelectedChanged (SectionIndex As Int, Cell As TableCell)
TableView1.ReloadSection(0)
TableView1.RemoveCells(SectionIndex, TableView1.GetItems(SectionIndex).IndexOf(Cell), 1)
End Sub