Download source files:
http://www.jkofsp.net/files/

<UserControl1.cs>

using System;
using System.Collections.Generic;
using System.ComponentModel;
using System.Drawing;
using System.Data;
using System.Linq;
using System.Text;
using System.Windows.Forms;
using System.IO;

namespace CodeEditBox
{
   public partial class CodeEditBox : UserControl
   {
       private List<string> TextLines;
       private List<List<byte>> TextColor;
       private readonly byte Color_Normal = 0, Color_Keyword = 1, Color_Comment = 2, Color_String = 3;
       private int CursorX, CursorDX, CursorY;
       private int ViewX, ViewY;

       public string[] Keywords;

       private Dictionary<char, Bitmap> FullWidthSymbols;

       public event EventHandler<EventArgs> TextChanged, ViewMouseClick;

       public CodeEditBox()
       {
           InitializeComponent();

           View.Visible = true;
           HScroll.Visible = true;
           VScroll.Visible = true;

           TextLines = new List<string>();
           TextLines.Add("");
           CursorX = 0;
           CursorDX = 0;
           CursorY = 0;
           ViewX = 0;
           ViewY = 0;
           TextColor = new List<List<byte>>();
           TextColor.Add(null);

           //this.LostFocus += new EventHandler((sender, e) => Focus());
       }

       public void LoadText(string text)
       {
           TextLines = new List<string>();
           TextLines.AddRange(text.Replace("\r\n", "\n").Replace('\t', ' ').Split('\n'));

           if (TextLines.Count == 0)
               TextLines.Add("");
           CursorX = 0;
           CursorDX = 0;
           CursorY = 0;
           ViewX = 0;
           ViewY = 0;

           VScroll.Maximum = TextLines.Count - 1;

           TextColor = new List<List<byte>>();
           for (int i = 0; i < TextLines.Count; i++)
               TextColor.Add(null);
           for (int i = 0; i < TextLines.Count; i++)
               Highlight(i);

           CheckScroll();

           View.Refresh();
       }

       public string GetText()
       {
           StringBuilder text = new StringBuilder();
           text.Append(TextLines[0]);
           for (int i = 1; i < TextLines.Count; i++)
               text.Append("\r\n").Append(TextLines[i]);

           return text.ToString();
       }

       public int GetCurrentLineID()
       {
           return CursorY;
       }

       public int GetLineCount()
       {
           return TextLines.Count;
       }

       public string GetLine(int lineIndex)
       {
           if (lineIndex < 0 || lineIndex >= TextLines.Count)
               throw new Exception();
           return TextLines[lineIndex];
       }

       public void SelectText(int lineIndex, int start, int length)
       {
           if (lineIndex < 0 || lineIndex >= TextLines.Count)
               throw new Exception();
           CursorY = lineIndex;

           if (start < 0 || start > TextLines[CursorY].Length)
               throw new Exception();
           if (start + length < 0 || start + length > TextLines[CursorY].Length)
               throw new Exception();
           CursorX = start + length;
           CursorDX = -length;

           CheckScroll();

           View.Refresh();
       }

       public void CancelSeletion()
       {
           CursorDX = 0;

           View.Refresh();
       }

       public string GetSelectedText()
       {
           if (CursorDX == 0)
           {
               return "";
           }
           else
           {
               if (CursorDX < 0)
                   return TextLines[CursorY].Substring(CursorX + CursorDX, -CursorDX);
               else
                   return TextLines[CursorY].Substring(CursorX, CursorDX);
           }
       }

       public void InsertOrReplaceText(string text)
       {
           if (text == "")
               return;

           if (CursorDX == 0)
           {
               TextLines[CursorY] = TextLines[CursorY].Substring(0, CursorX) + text + TextLines[CursorY].Substring(CursorX);
               CursorX += text.Length;
               //CursorDX = 0;
           }
           else
           {
               if (CursorDX < 0)
               {
                   TextLines[CursorY] = TextLines[CursorY].Substring(0, CursorX + CursorDX) + text + TextLines[CursorY].Substring(CursorX);
                   CursorX += CursorDX + text.Length;
               }
               else
               {
                   TextLines[CursorY] = TextLines[CursorY].Substring(0, CursorX) + text + TextLines[CursorY].Substring(CursorX + CursorDX);
                   CursorX += text.Length;
               }
               CursorDX = -text.Length;
           }

           Highlight(CursorY);

           CheckScroll();

           View.Refresh();
       }

       private void Render(Graphics g)
       {
           if (CursorDX < 0)
               g.FillRectangle(Brushes.Aqua, (CursorX + CursorDX - ViewX) * 7 + 1, (CursorY - ViewY) * 11, - CursorDX * 7, 11);
           else if (CursorDX > 0)
               g.FillRectangle(Brushes.Aqua, (CursorX - ViewX) * 7 + 1, (CursorY - ViewY) * 11, CursorDX * 7, 11);

           Font font = new Font("Lucida Console", 9.0f);
           for (int i = ViewY; i < Math.Min(ViewY + View.Height / 11, TextLines.Count); i++)
               for (int j = ViewX; j < Math.Min(ViewX + View.Width / 7, TextLines[i].Length); j++)
               {
                   if (TextLines[i][j] != ' ')
                   {
                       if (new List<char>(new char[] { '←', '∈', '÷', '≠', '≤', '≥' }).Contains(TextLines[i][j]))
                       {
                           //if (TextColor[i][j] != Color_Normal)
                           //    throw new Exception();

                           g.DrawImage(FullWidthSymbols[TextLines[i][j]], (j - ViewX) * 7 + 1, (i - ViewY) * 11);
                       }
                       else
                       {
                           Brush brush;
                           if (TextColor[i][j] == Color_Normal)
                               brush = Brushes.Black;
                           else if (TextColor[i][j] == Color_Keyword)
                               brush = Brushes.Blue;
                           else if (TextColor[i][j] == Color_Comment)
                               brush = Brushes.Green;
                           else if (TextColor[i][j] == Color_String)
                               brush = Brushes.DarkRed;
                           else
                               throw new Exception();
                           g.DrawString(TextLines[i][j].ToString(), font, brush, (j - ViewX) * 7.0f, (i - ViewY) * 11.0f);
                       }
                   }
               }

           g.DrawLine(Pens.Black, (CursorX - ViewX) * 7 + 1, (CursorY - ViewY) * 11, (CursorX - ViewX) * 7 + 1, (CursorY - ViewY) * 11 + 11);
       }

       private bool MapKeyword(string ident)
       {
           foreach (string d in Keywords)
               if (ident == d)
                   return true;

           return false;
       }

       private Tuple<byte, int> Lexer(string s, ref int i)
       {
           byte color = Color_Normal;
           int len = 0;
           string ident = "";
       _0:
           if (i >= s.Length) { color = Color_Normal; return new Tuple<byte, int>(color, len); }
           else if (s[i] == '/') { len++; i++; goto _Comment0; }
           else if (s[i] == '`') { len++; i++; goto _String; }
           else if ((s[i] >= 'a' && s[i] <= 'z') || (s[i] >= 'A' && s[i] <= 'Z') || s[i] == '_' || s[i] == '\'') { ident += s[i]; len++; i++; goto _Ident; }
           else { len++; i++; goto _1; }
       _1:
           if (i >= s.Length) { color = Color_Normal; return new Tuple<byte, int>(color, len); }
           else if (s[i] == '/') { color = Color_Normal; return new Tuple<byte, int>(color, len); }
           else if (s[i] == '`') { color = Color_Normal; return new Tuple<byte, int>(color, len); }
           else if ((s[i] >= 'a' && s[i] <= 'z') || (s[i] >= 'A' && s[i] <= 'Z' || s[i] == '_' || s[i] == '\'')) { color = Color_Normal; return new Tuple<byte, int>(color, len); }
           else { len++; i++; goto _1; }
       _Comment0:
           if (i >= s.Length) { return new Tuple<byte, int>(color, len); }
           else if (s[i] == '/') { len++; i++; goto _Comment1; }
           else if (s[i] == '`') { color = Color_Normal; return new Tuple<byte, int>(color, len); }
           else if ((s[i] >= 'a' && s[i] <= 'z') || (s[i] >= 'A' && s[i] <= 'Z' || s[i] == '_' || s[i] == '\'')) { color = Color_Normal; return new Tuple<byte, int>(color, len); }
           else { len++; i++; goto _1; }
       _Comment1:
           if (i >= s.Length) { color = Color_Comment; i++; return new Tuple<byte, int>(color, len); }
           else { len++; i++; goto _Comment1; };
       _String:
           if (i >= s.Length) { color = Color_String; return new Tuple<byte, int>(color, len); }
           else if (s[i] == '`') { len++; i++; color = Color_String; return new Tuple<byte, int>(color, len); }
           else { len++; i++; goto _String; }
       _Ident:
           if (i >= s.Length) { color = MapKeyword(ident) ? Color_Keyword : Color_Normal; return new Tuple<byte, int>(color, len); }
           else if ((s[i] >= 'a' && s[i] <= 'z') || (s[i] >= 'A' && s[i] <= 'Z') || s[i] == '_' || s[i] == '\'' || (s[i] >= '0' && s[i] <= '9')) { ident += s[i]; len++; i++; goto _Ident; }
           else { color = MapKeyword(ident) ? Color_Keyword : Color_Normal; return new Tuple<byte, int>(color, len); }
       }

       private void Highlight(int lineIndex)
       {
           TextColor[lineIndex] = new List<byte>();
           int i = 0;
           while (i < TextLines[lineIndex].Length)
           {
               Tuple<byte, int> t = Lexer(TextLines[lineIndex], ref i);
               for (int j = 0; j < t.Item2; j++)
                   TextColor[lineIndex].Add(t.Item1);
           }
       }

       private void UserControl1_Load(object sender, EventArgs e)
       {
           View.Visible = true;
           HScroll.Visible = true;
           VScroll.Visible = true;

           FullWidthSymbols = new Dictionary<char, Bitmap>();
           char[] chars = new char[] { '←', '∈', '÷', '≠', '≤', '≥' };
           foreach (char ch in chars)
           {
               Bitmap bmp = (Bitmap)Image.FromFile(ch + ".bmp");
               bmp.MakeTransparent(Color.FromArgb(unchecked((int)0xFFffffff)));
               FullWidthSymbols.Add(ch, bmp);
           }
       }

       private void CodeEditBox_Resize(object sender, EventArgs e)
       {
           try
           {
               View.Width = Width - 20;
               View.Height = Height - 20;
               HScroll.Top = View.Height;
               HScroll.Width = View.Width;
               VScroll.Left = View.Width;
               VScroll.Height = View.Height;

               VScroll.Maximum = TextLines.Count - 1;

               View.Refresh();
           }
           catch (Exception) { }
       }

       private void View_Paint(object sender, PaintEventArgs e)
       {
           Render(e.Graphics);
       }

       private void CheckScroll()
       {
           if (CursorY < ViewY)
               VScroll.Value = CursorY;
           if (CursorY > ViewY + View.Height / 11 - 1)
               VScroll.Value = CursorY - View.Height / 11 + 1;
           if (CursorX < ViewX + 1)
               HScroll.Value = Math.Max(CursorX - 1, 0);
           if (CursorX > ViewX + View.Width / 7)
               HScroll.Value = Math.Min(HScroll.Maximum, CursorX - View.Width / 7);
       }