Dim techs As List = gnfc.GetTechList(intentstart)
If gnfc_mode = 1 And techs.IndexOf("android.nfc.tech.Ndef") > -1 Then
gnfctech.Initialize("NFCTag", "android.nfc.tech.Ndef" , intentstart)
gnfctech.Connect
else if gnfc_mode = 2 And techs.IndexOf("android.nfc.tech.Ndef") > -1 Then
gnfctech.Initialize("NFCTag", "android.nfc.tech.Ndef" , intentstart)
gnfctech.Connect
else if gnfc_mode = 2 And techs.IndexOf("android.nfc.tech.NfcA") > -1 Then
gnfctech.Initialize("NFCTag", "android.nfc.tech.NfcA" , intentstart)
gnfctech.Connect
else if gnfc_mode = 2 And techs.IndexOf("android.nfc.tech.NdefFormatable") > -1 Then
gnfctech.Initialize("NFCTag", "android.nfc.tech.NdefFormatable" , intentstart)
gnfctech.Connect