Vše funguje přesně jak jsem chtěl, až na rozsvícení zelené ledky při (kmitočtu) napětí rovném Ref. Pokoušel jsem vložit popodmínku else if takto:
If Napeti > 0 And Napeti <= 30 Then Struna = Zadna
If Napeti > 30 And Napeti <= 190 Then : Struna = E6 'Ref = 110
If Napeti > 110 Then : Vyssi = 0
Else If Napeti = 110 Then Rovna = 0
Else : Nizsi = 0 : End If : End If
Bascom mi vypisuje error. Díky moc, až budu mít vše hotovo dám sem celý kod i schema. snad se někomu bude hodit.