Keskustelu: Ohjelmointikysymykset: VB6: Richtextboxin fontin koon lisäys kahdella

Olisiko keinoa miten voisi richtextboxin fontin kokoa lisätä/vähentää kahdella ajon aikana?

Eikö voi muka Loota.FontSize = Loota.FontSize + 2? Jos ei niin ensin Loota.SelSize = Loota.FontSize + 2 (selsizestä en o varma, joku semmone, ehkä selfont.size) jonka jälkee Loota.SelText = "teksti joka siihe heitetään"

RichTextBox1.Font.Size = RichTextBox1.Font.Size + 2

Edit: Sooda ehti ensin. Mutta äsken, kun itse kokeilin, niin Font piti esitellä sen boxin ominaisuutena ja sitten Size ja muut sen Fontin ominaisuutena. En tiedä sitten, toimiiko pelkkä FontSize. Ja noista RichTextBoxeistahan on myös eri versioita...

Tällainen ei toimi:

If Combo1.Text > Activeform.rtfText Then ActiveForm.rtfText.Text.Font.Size + 2

(Activeformia käytän koska projektissa on monta samanlaista formia ja boxin nimi on kaikissa sama.) vb pyyhkii + merkin koodista pois.

Tuo "Active.Form.rtfText.Text.Font.Size + 2" ei ole käsky vaan ainoastaan lauseke, jota Visual Basic ei voi laskea, ellei sitä käytetä mihinkään. Jos haluat kasvattaa arvoa, se pitää tehdä näin:

ActiveForm.rtfText.Text.Font.Size = ActiveForm.rtfText.Text.Font.Size + 2

Sijoitusoperaattori = tekee siitä "käskyn", joka voidaan suorittaa.

Kiitos. Nyt toimii.