Android Question [Solved] (BLE+BT) Elegant solution for the automatic connection

Sub Class_Globals
    Private bt As clsBluetooth
    Private ble As clsBluetoothBle   
End Sub

'Initializes the object. You can add parameters to this method if needed.
Public Sub Initialize
    
    'Classic-Bluetooth initialisieren.
    bt.Initialize(Me, "bt")

    'BLE initialisieren.
    ble.Initialize(Me, "ble")
End Sub

Public Sub ConnectDevice
    bt.ConnectDevice

    ble.ConnectDevice
End Sub

Public Sub IsConnected As Boolean
    Return bt.IsConnected Or ble.IsConnected
End Sub

#Region bt-Funktionen
Private Sub bt_DeviceNotFound
    Log("bt_DeviceNotFound")
End Sub

Private Sub bt_DeviceConnected
    Log("bt.IsConnected=" & bt.IsConnected)
End Sub
#End Region

#Region ble-Funktionen
Private Sub ble_DeviceNotFound
    Log("ble_DeviceNotFound")
End Sub

Private Sub ble_DeviceConnected
    Log("ble.IsConnected=" & ble.IsConnected)
End Sub
#End Region

Public Sub DestroyConnection
    If bt.IsConnected Then
        bt.DestroyConnection
    else if ble.IsConnected Then
        ble.DestroyConnection
    End If
End Sub