Android Question life cycle of var

Sub s_1
    Private v12 As Int
    v12 = 100
    s_2(v12)
End Sub
Sub s_2(n as int)
    'need to use v12 var in this sub but not in other subs
    'v12 = is not visible here
    ... no, but [n] would be
End Sub

Sub s_main
    Dim nO, nI, nB As Int
    Dim mode     As Int
    Dim cr         As Cursor
    Select mode
    Case 1      ' select only order
        'all select ise very long procedure and bls code
        s_order
    Case 2     ' select only invoice
        'all select ise very long procedure and bls code
        s_invoice     
    Case 3     ' select only budget
        'all select ise very long procedure and bls code
        s_budget     
    End Select
   
   
    ' i need to exec other code that require cr, nO, nI ecc 
    ' if i pass more argument i need to return them
    ' now i return many parameter by return a list
   
   
End Sub
Sub s_order
    '....msany code
End Sub
Sub s_invoice
    'many code
End Sub
Sub s_budget
    Dim cr As Cursor
    Dim SQL As SQL
    Dim nO
    cr = SQL.ExecQuery("/*long query*/")
    nO = SQL.ExecQuerySingleResult("select sum(orders) from .....")
    '.....
End Sub

Type order (cust as str, accnt as str, orderNum as int, items as List, ...)

Sub processOrder(details as order)
....