.NET (Core and Framework)

namespace My.Namespace.Maintenance
{
  public static class DailyRoutines
  {
     public static void RunSomething()
     {
     }
  }
}

Private Sub MainDrawing
  For each bone in bones list (bone class inherits TreeNode.)
    -Save the Graphics tranform (Graphics.Save)
    -Call a recursive function (DrawBonesRecursively)
     ->DrawBonesRecursively(e.Graphics, bone)
    -Restore the original Graphics tranform (Graphics.Restore)
  End For
End Sub

Private Sub DrawBonesRecursively(g as Graphics,bone as Bone)
  -Get the LOCAL matrix of the bone
  -Rotate and Translate Graphics transform with LOCAL matrix values
  -Get the untransformed GraphicsPath of my bone
  -Draw it
  For each childBone in bone.Nodes
   -Call this sub itself for recursion. For "bone" argument, I pass "bone.
  End For
End Sub

Undo Rotate and Translate Graphics transform with LOCAL matrix values

Naerling wrote:

We always fill every cell in a datagrid or every textbox on a form programatically

Textbox1.Text = datarow("field1")
Textbox2.Text = datarow("field2")
Textbox3.Text = datarow("field3")
...
Textbox50.Text = datarow("field50")

Naerling wrote:

You get the idea

Using connection As New SqlClient.SqlConnection(My.Settings.MyConnectionString)
         Using cmd As New SqlClient.SqlCommand("select * from smartasses where name = @name", connection)
            cmd.Parameters.Add("name", SqlDbType.VarChar, 50).Value = GetUserFromPostAbove()
            connection.Open()
            Try

               Using reader As SqlClient.SqlDataReader = cmd.ExecuteReader
                  While reader.Read
                     Dim gridRow As New DataGridViewRow
                     gridRow.CreateCells(gridSmartAsses)

                     gridRow.Cells(gridSmartAsses.Columns("name").Index).Value = reader.Item("name")
                     gridRow.Cells(gridSmartAsses.Columns("age").Index).Value = reader.Item("age")
                     gridRow.Cells(gridSmartAsses.Columns("message").Index).Value = reader.Item("message")
                     gridRow.Cells(gridSmartAsses.Columns("funny").Index).Value = reader.Item("funny")
                     ' ... Up to about 20 columns.

                     gridSmartAsses.Rows.Add(gridRow)
                  End While
               End Using

            Finally
               connection.Close()
            End Try
         End Using
      End Using

gridRow.Cells(gridSmartAsses.Columns("name").Index).Value = reader.Item("name")

Naerling wrote:

Actually we're all kind of tired of having to type:

I are Troll