Ille de yapacagim diyorsan verdigim kodlar uzerinde ugras;
Kod:
PrivateSubForm1_Load(ByValsenderAsSystem.Object,ByValeAsSystem.EventArgs)HandlesMyBase.Load
RichTextBox1.SelectionColor= Color.Red
RichTextBox1.SelectedText="Kirmizi"&ControlChars.NewLine
RichTextBox1.SelectionColor=Color.Yellow
RichTextBox1.SelectedText="Sari"&ControlChars.NewLine
RichTextBox1.SelectionColor =Color.DarkGreen
RichTextBox1.SelectedText="Yesil"&ControlChars.NewLine
RichTextBox1.SelectAll()
RichTextBox1.Copy()
EndSub