Keskustelu: Ohjelmointikysymykset: VB6: Kursorin kohtaan kirjoittaminen

Miten RichTextBoxissa voi kirjoittaa kohtaan jossa se vilkkuva viiva (kursori) on? VBni on VB4

Enpä ole paljon RichTextBoxia käyttänyt, SelStart ja SelLength eivät ainakaan tunnu toimivan suoraan, koska silloin tekstin mahdollinen muotoilu katoaa. Mutta vanhasta kunnon SendKeys-kikasta voisi olla apua:

Private Sub Form_Click()
    RichTextBox1.SetFocus
    SendKeys "Tämä tulee väliin"
End Sub

RichTextBoxille siis lähetetään tekstiä kuin se olisi käyttäjän kirjoittamaa. Silloinhan teksti luonnollisesti tulee valittuun kohtaan. Huomaa, että merkit +, ^, %, ~, ( ja ) täytyy ympäröidä aaltosuluilla SendKeys-komennossa. Siis esimerkiksi "5 + 3":sta tulee "5 {+} 3".

Viimeinen este HTML-editoriin on poistettu!

Miten muuten voin lähettää sille rivinvaihtoja (Entereitä) ja nuolinäppäimiä kursorin liikuttamista varten?

Loogisesti ne menevät: Enterin koodi on {ENTER}, ja nuolinäppäimien {UP}, {DOWN}, {LEFT} ja {RIGHT}. Täydellinen lista erikoiskoodeista löytyy osoitteesta http://msdn.microsoft.com/library/default.asp?url=/library/en-us/cpref/html/frlrfsystemwindowsformssendkeysclasstopic.asp (liittyy oikeastaan .NETiin, mutta koodit ovat pysyneet samoina)

RichTextBoxiin voi laittaa tekstiä myös näin:
richtextbox.seltext= "Tämä tulee valittuun kohtaan"

Joo, tuo vaikuttaa paljon järkevämmältä. :)

Miten seltextissä voi käyttää rivinvaihtoja?

Käytä vakiota vbCrLf seuraavaan tapaan:

RichTextBox1.SelText = "Eka rivi" & vbCrLf & "Toka rivi"