Italian App chiama App

Sub Globals
    'These global variables will be redeclared each time the activity is created.
    'These variables can only be accessed from this module.

    Private BtTenVen As Button
    Private BtRilInve As Button
    Dim pm As PackageManager
    Dim packages As List
End Sub

Sub Activity_Create(FirstTime As Boolean)
    'Do not forget to load the layout file created with the visual designer. For example:
    Activity.LoadLayout("LyMain")
 
    packages = pm.GetInstalledPackages
    For i = 0 To packages.Size -1
        'utile per sapere con certezza come si chiamano le app
        Log(packages.Get(i))
    Next
 
End Sub

Sub BtTenVen_Click
    StartActivity(pm.GetApplicationIntent("it.multidatanet.siscoapp.tenven"))
End Sub
Sub BtRilInve_Click
    StartActivity(pm.GetApplicationIntent("it.multidatanet.siscoapp.rilinve"))
End Sub

Private lvMyPrj As ListView ' <--- Inserita tramite Designer ?
'...
packages = pm.GetInstalledPackages
Private PackName As String
For i = 0 To packages.Size -1
    PackName = packages.Get(i)
    If PackName.StartsWith("lm.projects.") Then ' <--- ovviamente, che inizi con la tua definizione
       lvMyPrj.AddSingleLine(PackName)
    End If
Next
'...
Private Sub lvMyPrj_ItemClick (Position As Int, Value As Object)
   StartActivity(pm.GetApplicationIntent(Value))
End Sub