Herzlich willkommen in der
DP.
Das erste, was mir auffällt, ist dein exessiver Gebrauch von "With".
Dadurch wird dein Code extrem unübersichtlich und schlecht lesbar. Du benutzt das ja selbst, wenn nur eine Eigenschaft verändert wird, in diesem Fall also völlig nutzlos.
Gewöhn dir das erst gar nicht an damit tust du dir und Leuten, die deinen Code lesen müssen keinen Gefallen.