WINDOWS aktif olduğunda içerdiği metnin tümü seçilen metin kutuları gibi hayatımızı kolaylaştıracak bir çok güzel özellik bulundurur. Siz de bu özellikleri programlarınıza koyduğunuzda programınızın kullanılmasını daha kolay bir hale getirirsiniz. Bir metin kutusunun içeriğinin TAB tuşuyla veya başka bir şekilde aktif olmasıyla seçilmesini, aşağıdaki kodları metin kutusunun Got_Focus özelliğine ekleyerek sağlayabilirsiniz. Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text) Eğer projenizde bir çok metin kutusu bulunuyorsa yukarıdaki iki satırı her metin kutusuna yazmanız zor olacaktır. Bunun için General - Declarations kısmına projenin her tarafından çağırılabilecek aşağıdaki altyordamı yazıp bu altyordamı herhangi bir metin kutusunun Got_Focus özelliğinden SelAllText yazarak çağırmanız daha uygun olacaktır. Public Sub SelAllText()
Screen, ActiveControl.SelStart = 0
Screen.ActiveControl.SelLength = Len(Screen,ActiveControl.Text)
End Sub