Keskustelu: Koodit: VB6: Valitse teksti valmiiksi

Ohjelma valitsee (maalaa) Text1 kentässä olevan tekstin valmiiksi, kun Text1 kenttään kohdistetaan. Jos kokeilet niin laita formille Text1 ja Text2 ja huomaat eron.

Private Sub Text1_GotFocus()
    MaalaaTeksti
End Sub
Sub MaalaaTeksti()
    'maalaa textin valmiiksi
    Me.ActiveControl.SelStart = 0
    Me.ActiveControl.SelLength = Len(Me.ActiveControl.Text)
End Sub

Pitääpä testata joskus, jos jaksaa.

Onhan toi ihan kätevä.

Kiitos tosta oli apua :)