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?
Tekstin maalaus
Hellu
1
278
Vastaukset
- nappulan.painaja
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
Ketjusta on poistettu 0 sääntöjenvastaista viestiä.
Luetuimmat keskustelut
- 477725
- 334283
- 573755
- 503220
- 172906
Voi ei! Jari Sillanpää heitti keikan Helsingissä - Hämmästyttävä hetki lavalla...
Ex-tangokuningas on parhaillaan konserttikiertueella. Hän esiintyi Savoy teatterissa äitienpäivänä. Sillanpää jakoi kons692636- 642508
- 582459
- 402349
- 162306