Hallo Paulsche,
auf die schnelle sehe ich hier zwei Ansatzpunkte:
1. Die Zeilen
	
	
	
	
	
	
	
	
	
		   For i = 0 To 9                                    ' Eigene Tastatur Events
      AddEvent ("BTNtastatur0" & i,Click,"Tastatur")         ' gedrückter Button 0-9 an SUB "Tastatur" weitergeben
   Next
   AddEvent ("BTNtastaturKomma",Click,"Tastatur")            ' gedrückter Button "," an SUB "Tastatur" weitergeben
   AddEvent ("BTNtastaturBackspace",Click,"Tastatur")         ' gedrückter Button "<" an SUB "Tastatur" weitergeben
	 
	
	
		
	
 
aus der Sub BTNtanken_Click nach AppStart verlagern, damit der Code nur einmal aufgerufen wird.
Ansonsten hängt jeder Tanken-Klick weitere Klick-Events an die Tastaturbuttons, da kommt die Anwendung irgendwann aufgrund der vielen (gleichartigen) Evants zwangsläufig durcheinander. 
2. JOTHA hat in seinem Goldkauf-Prog einfache Buttons verwendet während Du ImageButtons definiert hast. Ich habe es jetzt nicht selbst ausprobiert, aber da bei ImageButtons wesentlich mehr passiert könnte hier ein Performancegewinn möglich sein, zumal Du zumindest in der bisherigen Version den Buttons keine Images zugeordnet hast.
Gruß
specci48