Visual Basic

RichTextBox1.Font = New Font(RichTextBox1.Font.Name, 5)

'Dunno if this works:

'select all text
rtb.SelectionText = rtb.Text
'change font (only size so use old font)
'i don't know what happens if there are different fonts involved in the selection..
rtb.SelectionFont = New Font(rtb.SelectionFont, 12.0!)
'deselect the text
rtb.SelectionLength = 0

' Somewhere in your code to setup your columns:
'
    Dim newCol As New DataGridViewTextBoxColumn
    With newCol
        .DataPropertyName = "databaseTableColumnName"
        .HeaderText = "My Column Header"
        .AutoSizeMode = DataGridViewAutoSizeColumnMode.ColumnHeader
        .DefaultCellStyle.Alignment = DataGridViewContentAlignment.MiddleCenter
        .DefaultCellStyle.BackColor = Color.Blue
    End With
    DataGridView1.Columns.Add(newCol)

RoundsGridView.Rows(0).Cells(0).Style.BackColor = Color.BurlyWood

Imports System.Collections
 
Public Class MyNodeSorter
    Implements IComparer
 
    <font color=green>' You MUST supply the code for the Compare method using this exact function header!!</font>
    Public Function Compare(ByVal x As Object, ByVal y As Object) As Integer Implements IComparer.Compare
        <font color=green>' All you do is compare the objects you get (they should always be TreeNodes).
        ' First, cast the Objects you get to TreeNodes.</font>
        Dim x As TreeNode = CType(x, TreeNode)
        Dim y As TreeNode = CType(y, TreeNode)
 
        <font color=green>' Then compare the Text properties of each node.  Since the String class already
        ' supplies a Comparer implementation that works on strings (duh!), just use that
        ' to do the work for you and return the value that it returns.</font>
        Return String.Compare(x.Text, y.Text)
    End Function
End Class

TreeView1.TreeViewNodeSorter = New MyNodeSorter()