Mi sto incasinando con i colori...

[lotto_tom75]

Scrivi "Sviluppo Combinazioni di classe " & Classe & " per sorte di... " & ColoreTesto ("2") & NomeSorte(nSorte)

vorrei scrivere in rosso solo il valore corrispondente a NomeSorte(nSorte) e non tutta la riga relativa come invece avviene adesso...

Già che ci sono chiedo ai maestri scripters come si mette il grassetto o il cambio size del carattere ? Esiste per caso anche il cambio del tipo di carattere ???

Grazie!

 

[Mike58]

Ciao Tom utlizzando la chiamata call ( scrivi ) ti appare la guida da consultare e passo passo ti guida con quello che devi fare.

vedi l'esempio.

Sub Main
nsorte = CInt(2)
Class2 = 3
Call Scrivi ("Sviluppo Combinazioni di classe " & Classe & " per sorte di... " & ColoreTesto ("2") & NomeSorte(nSorte),1,1,2,4,5)	' size 5
Call Scrivi ("sviluppo combinazioni",1,0,2,4,4) 'size 4 
Call Scrivi (" Per sorte di ",1,0,4,2,3)
Call Scrivi (NomeSorte(nsorte),1,1,1,7,4)
End Sub

 

[lotto_tom75]

Ciao Tom utlizzando la chiamata call ( scrivi ) ti appare la guida da consultare e passo passo ti guida con quello che devi fare.

vedi l'esempio.

Sub Main
nsorte = CInt(2)
Class2 = 3
Call Scrivi ("Sviluppo Combinazioni di classe " & Classe & " per sorte di... " & ColoreTesto ("2") & NomeSorte(nSorte),1,1,2,4,5)	' size 5
Call Scrivi ("sviluppo combinazioni",1,0,2,4,4) 'size 4 
Call Scrivi (" Per sorte di ",1,0,4,2,3)
Call Scrivi (NomeSorte(nsorte),1,1,1,7,4)
End Sub

Grazie mike!