Visual basicia käsittelevässä oppikirjassa näin muutaman rivin mittaisen koodin- jonka tarkoitus oli "maalata" tekstikehyksessä oleva teksti kun kehystä klikataan. kirjoitin esimerkin mukaan mutten saanut sitä toimimaan Excelissä. En ihan tarkkaan muista miten koodi meni mutta pari riviä oli jotenkin näin:
Private Sub TextBox1_Click()
.
TextBox1.SelStart = 0
TextBox1.SelLength = len(TextBox1)
.
.
End Sub
Osaatteko täydentää kukaan?
Private Sub TextBox1_Click()
.
TextBox1.SelStart = 0
TextBox1.SelLength = len(TextBox1)
.
.
End Sub
Osaatteko täydentää kukaan?
Vastaukset 1
Vanhimmat
Yksi tapa on käyttää MouseDown-eventtiä:
Private Sub TextBox1_MouseDown(ByVal Button As Integer, ByVal Shift As Integer, ByVal X As Single, ByVal Y As Single)
TextBox1.SelStart = 0
TextBox1.SelLength = Len(TextBox1.Text)
End Sub