Wie gesagt, im Testprogramm ist dafür eine Funktion vorgesehen. Man kann diese einfach in eigene Programme übernehmen.

Entscheident sind folgende Zeilen:

Code:
Config Adc = Single , Prescaler = Auto                      'Für Tastenabfrage und Spannungsmessung 

Config Pina.7 = Input                                       'Für Tastenabfrage 
Porta.7 = 1                                                 'Pullup Widerstand ein 

dim ws as word

Start Adc 
Ws = Getadc(7) 
print ws
In WS steht je nach Taste nachher ein anderer Wert. Schau die die Select Case Anweisung im Testprogramm (in Anleitung) auch noch an.