dolaylı bir yol olacak ama eğer değeri veri tabanından alıyorsa aşağıdaki gibi bir fonksiyon düşünüle bilir

metin1.value = "*******" & mid(metintcno.value,8) 

mid ( dize, başlangıç ,[uzunluk ] )