probier erst mal mit einer testsequenz ob sich das servo überhaupt dreht
und natürlich mit bytevariablen
dim servopos as byte

for servopos= 50 to 150 step 5
servo(2)=servopos
waitms 100
next servopos

wenn sichs dreht dann kanste weiter fummeln