Changing dimension values wiyh VB.NET?

Hi,

I have like "D1@sketch1" or "D2@Sketch1" dimension names in sketch and I want to change these values in VB.NET?

I saw some equation samples but I want to chane directly "D1@sketch1" value and update part directly.

 

Regards,

Mucip:)