با سلام و سپاس

 

با این تکه کد شما میتونید بین دو متن در فاصله ایجاد کنید .

 

ابتدا تیک کتابخانه  reflection بزنید و بعد ساب زیر رو اضافه کنید :

 

sub setLineSpace (lbl as label,meghdar as float)

  Dim r As Reflector
  r.Target = lbl
  r.RunMethod3("setLineSpacing",1, "java.lang.float", meghdar, "java.lang.float")

end sub

 

setLineSpace(lbl1,1.3)