202:
Can I use code completion without any UI
With Edit1
	.CodeCompletion = 1
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
	.Context().Add "class"
End With
201:
How can I hide the control's horizontal scroll bar
With Edit1
	.ScrollBars = 2
End With
200:
Is it possible to change the line's height

With Edit1
	.LineHeight = "value + 8 * dpi"
	.DrawGridLines = True
End With
199:
How to bold everything between two * (asterisk) characters

With Edit1
	With .Font
		.Name = "Consolas"
		.Size = 12
	End With
	.AddExpression "<fgcolor=FF0000><b>*","<fgcolor=FF0000> ","<fgcolor=FF0000><b>*"
	.InsertText "some text * another text * other text\r\n",1
	.Refresh 
End With
198:
How to bold everything that starts with * (asterisk), to the end of the line

With Edit1
	With .Font
		.Name = "Consolas"
		.Size = 12
	End With
	.AddWild "<fgcolor=FF0000><b>\**"
	.InsertText "some text * another text * other text\r\n",1
	.Refresh 
End With
197:
How to make a * (asterisk) bold, not the entire / rest line

With Edit1
	With .Font
		.Name = "Consolas"
		.Size = 12
	End With
	.AddWild "<fgcolor=FF0000><b>\*"
	.InsertText "some text * another text * other text\r\n",1
	.Refresh 
End With
196:
How can I change the control's font (template)

With Edit1
	.Template = "Font { Name = `Consolas`; Size = 12 }"
	.AddKeyword "<fgcolor=FF0000>class</fgcolor>"
	.Refresh 
End With
195:
How can I change the control's font (runtime)

With Edit1
	With .Font
		.Name = "Consolas"
		.Size = 12
	End With
	.AddKeyword "<fgcolor=FF0000>class</fgcolor>"
	.Refresh 
End With
194:
When I click and drag to try and select some text, sometimes my cursor turns into a hand and drags the whole text in the window around. I would like to disable this feature, could you tell me what it is called so I can disable it please
With Edit1
	.OLEDropMode = -1
End With
193:
How can I display information about events the control fires

' Event event - Notifies the application once the control fires an event.
Private Sub Edit1_Event(ByVal EventID As Long)
	With Edit1
		Debug.Print( .EventParam(-2) )
	End With
End Sub

With Edit1
	.AddWild "<fgcolor=808080>(?*)</fgcolor>"
	.AddKeyword "<b>class</b>","a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qualit" & _
"y"
	.Refresh 
End With
192:
How do I highlights words based on wild characters

With Edit1
	.AddWild "<fgcolor=0000FF><b>[MC]*_HANDLER*</b></fgcolor>(*)"
	.Refresh 
End With
191:
How do I highlights words based on wild characters

With Edit1
	.AddWild "<fgcolor=0000FF><b> *</b></fgcolor>(*)*;"
	.Refresh 
End With
190:
How can I provide different tooltip for the same keyword

' QueryContext event - Queries for the context at the specified location, to provide different tooltips for the same keyword on QueryContextToolTip event.
Private Sub Edit1_QueryContext(ByVal XCursor As Long,ByVal YCursor As Long,QContext As Variant)
	With Edit1
		QContext = YCursor
	End With
End Sub

' QueryContextToolTip event - Asks for the tooltip/title of the keyword on the context retrieved by the QueryContext event.
Private Sub Edit1_QueryContextToolTip(ByVal QContext As String,ByVal Keyword As String,QToolTip As Variant,QToolTipTitle As Variant)
	With Edit1
		QToolTip = QContext
		QToolTipTitle = "Keyword Found At Line:"
	End With
End Sub

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.AddKeyword "<fgcolor=FF0000><b>keyword</b></fgcolor>"
	.Text = ""
	.InsertText "here's the keyword on the first line"
	.InsertText "\r\nhere's the keyword on the second line"
	.InsertText "\r\nhere's the keyword on the third line"
End With
189:
Is it possible to left, right or center align the inline tooltip

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.CaretLine = 6
	.Background(160) = RGB(240,240,240)
	.TempInlineToolTip = "<font ;6>Left Alignment<br><c>Center Alignment<br><r>Right Alignment"
	.Refresh 
End With
188:
Is it possible to display the inline tooltip with a different appearance than temporarily inline tooltip

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.AddKeyword "<b>class</b>","<r>a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qua" & _
"lity."
	.AllowInlineToolTip = 513 ' AllowInlineToolTipEnum.exInlineToolTipWordWrap Or AllowInlineToolTipEnum.exInlineToolTip
	.Background(159) = RGB(128,128,128)
	.Background(158) = RGB(240,240,240)
	.CaretLine = 6
	.Background(160) = RGB(255,40,0)
	.Background(161) = RGB(0,0,1)
	.TempInlineToolTip = "<br><c><font ;12>This is a bit of text that's shown temporarily only. <br><c>Now, click the <off -4><b>class</b></off> keyword," & _
" in the top...<br>"
	.Refresh 
End With
187:
How can I display the inline tooltip over the lines, instead pushing the lines

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.Background(160) = RGB(255,255,0)
	.CaretLine = 3
	.TempInlineToolTip = "This is a bit of text that's shown under the current line, and it is displayed as soon as the control's caret is changed."
	.AllowInlineToolTip = 768 ' AllowInlineToolTipEnum.exInlineToolTipWordWrap Or AllowInlineToolTipEnum.exInlineToolTipOver
	.Refresh 
End With
186:
Is it possible to display the inline tooltip all the time

' SelChange event - Occurs when the user selects text in the control.
Private Sub Edit1_SelChange()
	With Edit1
		.TempInlineToolTip = "This is a bit of text that's shown under the current line, and it is displayed as soon as the control's caret is changed."
	End With
End Sub

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.Background(160) = RGB(255,255,0)
	.CaretLine = 12
	.AllowInlineToolTip = 512
	.Refresh 
End With
185:
Is it possible to display images in the inline tooltip

With Edit1
	.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
	.Images "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.CaretLine = 4
	.Background(160) = &H1000000
	.AllowInlineToolTip = 512
	.TempInlineToolTip = "<img>1</img>This is a bit of text that's shown programatically under the current line"
End With
184:
How can I change the visual appearance of the temporarily inline tooltip

With Edit1
	.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.CaretLine = 4
	.Background(160) = &H1000000
	.AllowInlineToolTip = 512
	.TempInlineToolTip = "This is a bit of text that's shown programatically under the current line"
End With
183:
How can I display programmatically the inline tooltip, but using word-wrapping

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.CaretLine = 4
	.Background(160) = RGB(240,240,240)
	.AllowInlineToolTip = 512
	.TempInlineToolTip = "This is a bit of text that's shown programatically under the current line"
End With
182:
How can I display programmatically the inline tooltip

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.CaretLine = 4
	.Background(160) = RGB(240,240,240)
	.TempInlineToolTip = "<br><c>This is a bit of text that's shown programatically under the current line<br>"
End With
181:
How can I show the inline tooltip with a different appearance

With Edit1
	.VisualAppearance.Add 1,"c:\exontrol\images\normal.ebn"
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.AddKeyword "<b>class</b>","a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qualit" & _
"y."
	.AllowInlineToolTip = 513 ' AllowInlineToolTipEnum.exInlineToolTipWordWrap Or AllowInlineToolTipEnum.exInlineToolTip
	.Background(158) = &H1000000
	.Background(159) = RGB(128,0,0)
	.Refresh 
End With
180:
Is it possible to prevent moving the lines after the inline tooltip

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.AddKeyword "<b>class</b>","a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qualit" & _
"y."
	.AllowInlineToolTip = 769 ' AllowInlineToolTipEnum.exInlineToolTipWordWrap Or AllowInlineToolTipEnum.exInlineToolTipOver Or AllowInlineToolTipEnum.exInlineToolTip
	.Background(158) = RGB(255,255,0)
	.Refresh 
End With
179:
How can I display the inline tooltip, when typing only

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.ToolTipOnTyping = False
	.AddKeyword "<b>class</b>","a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qualit" & _
"y."
	.AllowInlineToolTip = 514 ' AllowInlineToolTipEnum.exInlineToolTipWordWrap Or AllowInlineToolTipEnum.exInlineToolTipOnChange
	.Background(158) = RGB(240,240,240)
	.Refresh 
End With
178:
How do I enable the inline tooltip support

With Edit1
	.LineNumberWidth = -1
	.LineNumberBackColor = RGB(240,240,240)
	.AddKeyword "<b>class</b>","a set or category of things having some property or attribute in common and differentiated from others by kind, type, or qualit" & _
"y."
	.AllowInlineToolTip = 513 ' AllowInlineToolTipEnum.exInlineToolTipWordWrap Or AllowInlineToolTipEnum.exInlineToolTip
	.Background(159) = RGB(128,128,128)
	.Refresh 
End With
177:
How do I display a tooltip for a non-keyword

' MouseMove event - Occurs when the user moves the mouse.
Private Sub Edit1_MouseMove(ByVal Button As Integer,ByVal Shift As Integer,ByVal X As Long,ByVal Y As Long)
	With Edit1
		.ShowToolTip .WordFromPoint(-1,-1),,,"+8","+8"
	End With
End Sub


176:
How do I get the text from the cursor

' MouseMove event - Occurs when the user moves the mouse.
Private Sub Edit1_MouseMove(ByVal Button As Integer,ByVal Shift As Integer,ByVal X As Long,ByVal Y As Long)
	With Edit1
		Debug.Print( .WordFromPoint(-1,-1) )
	End With
End Sub


175:
I've noticed that while I type, the control's sensitive context selects the item that contains the typing word, so the question is how can I disable it
With Edit1
	With .Context()
		.Add "exText"
		.Add "exHTML"
		.Options(7) = True
	End With
	.Text = ""
	.InsertText "Press CTRL+SPACE, and type h, so the exHTML is not selected."
End With
174:
I have a context that inserts some comments, it is possible to set the cursor before comment begins, when user selects a value from the control's sensitive context
With Edit1
	.AddExpression "<fgcolor=008000>'</fgcolor>","<fgcolor=008000> </fgcolor>",""
	With .Context()
		.Add "exText (0)","0 ' specifies the exText flag"
		.Add "exHTML (-1)","-1 ' specifies the exHTML flag"
		.Options(6) = "(0:=value lfind `'`) < 0 ? -1 : ( =:0 - (len(1:=(value left =:0)) - len(ltrim(reverse(=:1)))))"
	End With
	.Text = ""
	.InsertText "Press CTRL + SPACE, and select any item, a number is inserted"
End With
173:
How can I show a different sensitive context when user press a key/character

' Change event - Indicates that the control's text have changed.
Private Sub Edit1_Change()
	With Edit1
		.ShowContext .ChangeOnKey
		.ActiveContextItems = ""
	End With
End Sub

With Edit1
	.Text = ""
	.InsertText "Press .(dot), :(color) or =(equal), to get different sensitive context"
	.ActiveContextItems = ""
	With .Context("61")
		.Add "Equal_1"
		.Add "Equal_2"
	End With
	With .Context("46")
		.Add "Dot_1"
		.Add "Dot_2"
	End With
	With .Context("58")
		.Add "Colon_1"
		.Add "Colon_2"
	End With
End With
172:
How can I allow spaces when control's sentitive context is shown/opened

' Change event - Indicates that the control's text have changed.
Private Sub Edit1_Change()
	With Edit1
		.ShowContext .ChangeOnKey
		.ActiveContextItems = ""
	End With
End Sub

With Edit1
	With .Context("61")
		.Add "True (-1)","True"
		.Add "False (-1)","False"
		.Options(5) = True
	End With
	.Text = ""
	.InsertText "Press the = key and after that press the space keys"
	.InsertText ""
End With
171:
How can I display more pages on the control's senitive context

With Edit1
	With .Context()
		.Add "First_1"
		.Add "First_2"
	End With
	With .Context("Second")
		.Add "Second_1"
		.Add "Second_2"
		.Add "Second_3"
	End With
	.ActiveContextItems = "Second"
	.PagesContextItems = ":Page<font ;6><off -4>1</off></font>,Second:Page<font ;6><off -4>2</off></font>"
End With
170:
Is it possible to disable showing tooltip for items in the control's senitive context
With Edit1
	With .Context()
		.Add "Column"
		.Options(3) = "This is bit of text that shown when user selects the <b>Column</b> item."
		.Add "Item"
		.Options(3) = "This is bit of text that shown when user selects the <b>Item</b> item."
		.Options(2) = False
	End With
End With
169:
How can I assign tooltips for items in the control's senitive context

With Edit1
	With .Context()
		.Add "Column"
		.Options(3) = "This is bit of text that shown when user selects the <b>Column</b> item."
		.Add "Item"
		.Options(3) = "This is bit of text that shown when user selects the <b>Item</b> item."
	End With
End With
168:
By default, the control shows the Context(""). How can I display other items

' OnContext event - Occurs when the user invokes the control's context window.
Private Sub Edit1_OnContext(ByVal Start As Long,ByVal Context As String)
	With Edit1
		Debug.Print( "CurrentContext:" )
		Debug.Print( Context )
		.ActiveContextItems = "Second"
	End With
End Sub

With Edit1
	With .Context()
		.Add "First_1"
		.Add "First_2"
	End With
	With .Context("Second")
		.Add "Second_1"
		.Add "Second_2"
		.Add "Second_3"
	End With
End With
167:
How can I show the control's sensitive context

' DblClick event - Occurs when the user double clicks the left mouse button over an object.
Private Sub Edit1_DblClick(ByVal Shift As Integer,ByVal X As Long,ByVal Y As Long)
	With Edit1
		.ShowContext "DB"
	End With
End Sub

With Edit1
	With .Context("DB")
		.Add "BEGIN_MSG_MAP"
		.Add "<fgcolor=808080>MESSAGE_HANDLER"
		.Add "<fgcolor=808080>COMMAND_HANDLER"
		.Add "END_MSG_MAP"
	End With
End With
166:
How can I provide different sensitive context

' Change event - Indicates that the control's text have changed.
Private Sub Edit1_Change()
	With Edit1
		.ShowContext .ChangeOnKey
	End With
End Sub

With Edit1
	.Text = ""
	.InsertText "Press .(dot), :(colon) or CTRL + SPACE to invoke the control's context"
	With .Context()
		.Add "General_1"
		.Add "General_2"
	End With
	With .Context("46")
		.Add "Property_1"
		.Add "Property_2"
		.Add "Property_3"
	End With
	With .Context("58")
		.Add "Method_1"
		.Add "Method_2"
		.Add "Method_3"
	End With
End With
165:
How can I change the control's background/foreground colors while the control is locked/read-only

With Edit1
	.Locked = True
	.SelBackColor = RGB(128,128,128)
	.ForeColorLockedLine = RGB(128,128,128)
	.BackColorLockedLine = RGB(255,255,255)
End With
164:
How can change the color for selected text, when the control has no focus

With Edit1
	.HideSelection = False
	.SelLength = 10
	.SelBackColorHide = RGB(255,0,0)
End With
163:
How do I change the "Incremental Search" caption

With Edit1
	.Cursor(3) = "exHelp"
	.Caption(3,0) = "Search for: %s"
	.IncrementalSearchError = RGB(255,0,0)
End With
162:
How do I enable the scrollbar-extension, as thumb to be shown outside of the control's client area

With Edit1
	.ScrollBars = 3
	.ScrollPartVisible(0,65536) = True
	.ScrollPartVisible(1,65536) = True
	.ScrollPartVisible(2,65536) = True ' &H2
	.ScrollWidth = 4
	.Background(276) = RGB(240,240,240)
	.Background(260) = RGB(128,128,128)
	.ScrollHeight = 4
	.Background(404) = .Background(276)
	.Background(388) = .Background(260)
	.Background(3) = .Background(276)
End With
161:
How can I get ride of control's horizontal scroll bar

With Edit1
	.AddKeyword "<b>CExHelperDialog</b>"
	.Refresh 
	.ScrollBars = 2
End With
160:
How do I specify the characters to close the sensitive context

With Edit1
	.Images "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.AddKeyword "<b>public</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
	With .Context()
		.Add "<b>class</b>","",1
		.Add "<b>public</b>","",2
		.Options(1) = "_ABCDEFGHIJKLMNOPQRSTUVWXYZabcdefghijklmnopqrstuvwxyz"
	End With
End With
159:
How do I sort items in the sensitive context

With Edit1
	.Images "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.AddKeyword "<b>public</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
	.Context().Add "<b>public</b>","",2
	.Context().Add "<b>class</b>","",1
	.Context().Sort True
End With
158:
Can I add icons to the sensitive context

With Edit1
	.Images "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
	.Context().Add "<b>class</b>","",1
End With
157:
How can I change the keys combination that invokes the sensitive context

With Edit1
	.ContextKey = 544
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
	.Context().Add "class"
End With
156:
How do I enable or disable the sensitive context menu
With Edit1
	.CodeCompletion = 0
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
	.Context().Add "class"
End With
155:
How can I add a sensitive context menu

With Edit1
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
	.Context().Add "class"
End With
154:
Can I use wild characters to define keys in your control

With Edit1
	.AddWild "<fgcolor=808080>(*)</fgcolor>"
	.Refresh 
End With
153:
Can I use wild characters to define keys in your control

With Edit1
	.AddWild "_HANDLER<fgcolor=FF0000>(*)</fgcolor>"
	.Refresh 
End With
152:
How can I remove or delete all expressions

With Edit1
	.AddExpression "(","<b><fgcolor=FF0000> </fgcolor></b>",")",False
	.ClearExpressions 
	.Refresh 
End With
151:
How can I remove or delete an expression

With Edit1
	.AddExpression "(","<b><fgcolor=FF0000> </fgcolor></b>",")",False
	.DeleteExpression "("
	.Refresh 
End With
150:
How can I add an expression

With Edit1
	.AddExpression "(","<b><fgcolor=FF0000> </fgcolor></b>",")",False
	.Refresh 
End With
149:
How can I add an expression on multiple lines

With Edit1
	.AddExpression "<fgcolor=800000><b>BEGIN_MSG_MAP</b></fgcolor>","<b><fgcolor=FF0000> </fgcolor></b>","<fgcolor=800000><b>END_MSG_MAP</b></fgcolor>",True
	.Refresh 
End With
148:
How can I remove or delete all keywords
With Edit1
	.AddKeyword "<b><fgcolor=FF0000>class</fgcolor></b>"
	.ClearKeywords 
	.Refresh 
End With
147:
How can I remove or delete keyword
With Edit1
	.AddKeyword "<b><fgcolor=FF0000>class</fgcolor></b>"
	.DeleteKeyword "class"
	.Refresh 
End With
146:
How do I add a keyword that's not case sensitive

With Edit1
	.AddKeyword "<b><fgcolor=FF0000>class</fgcolor></b>","","",2
	.Refresh 
	.InsertText "ClasS\r\n",1
	.InsertText "CLASS\r\n",1
End With
145:
How do I add a keyword that's not case sensitive

With Edit1
	.AddKeyword "<fgcolor=FF0000>class</fgcolor>","","",1
	.Refresh 
	.InsertText "ClasS\r\n",1
	.InsertText "CLASS\r\n",1
End With
144:
How can I assign a tooltip to a keyword

With Edit1
	.AddKeyword "<fgcolor=FF0000>class</fgcolor>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
End With
143:
How do I add a keyword

With Edit1
	.AddKeyword "<fgcolor=FF0000>class</fgcolor>"
	.Refresh 
End With
142:
How do I add a keyword

With Edit1
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
End With
141:
How can I display a tooltip as soon as the user types a keyword

With Edit1
	.ToolTipDelay = 1
	.ToolTipOnTyping = True
	.AddKeyword "<b>class</b>","this is a bit of text that's shown when the cursor hovers the <b>class</b> keyword.","exontrol.edit"
	.Refresh 
End With
140:
How do I change the color for a locked or a read only line

With Edit1
	.ForeColorLockedLine = RGB(0,0,0)
	.BackColorLockedLine = RGB(255,0,0)
	.LockedLine(1) = True
End With
139:
How do I lock or make read only a line

With Edit1
	.LockedLine(1) = True
End With
138:
How do I start overtyping

With Edit1
	.Overtype = True
End With
137:
How do I get the selection

With Edit1
	.GetSelection sy,sx,ey,ex
	Debug.Print( sy )
	Debug.Print( sx )
	Debug.Print( ey )
	Debug.Print( ex )
End With
136:
How do I select multiple lines

With Edit1
	.SetSelection 0,0,10,0
	.HideSelection = False
End With
135:
How can I change the shape of the cursor when it hovers the selected text

With Edit1
	.Cursor(4) = "exHelp"
	.SelLength = 10
	.HideSelection = False
End With
134:
How can I change the shape of the cursor when it hovers the incremental search area

With Edit1
	.Cursor(3) = "exHelp"
End With
133:
How can I change the shape of the cursor when it hovers the line numbers area

With Edit1
	.Cursor(2) = "exHelp"
	.LineNumberWidth = 16
End With
132:
How can I change the shape of the cursor when it hovers the bookmark area

With Edit1
	.Cursor(1) = "exHelp"
	.BookmarkWidth = 16
End With
131:
How can I change the shape of the cursor when it hovers the edit
With Edit1
	.Cursor(0) = "exHelp"
End With
130:
How can I enable or disable OLE drag and drop operations
With Edit1
	.OLEDropMode = -1
End With
129:
How can I change the descriptions for items in the control's context menu

With Edit1
	.Caption(2,16384) = "U N D O"
	.Caption(2,16385) = "R E D O"
	.Caption(2,16387) = "C U T"
	.Caption(2,16388) = "C O P Y"
	.Caption(2,16389) = "P A S T E"
	.Caption(2,16390) = "D E L"
	.Caption(2,16392) = "A L L "
End With
128:
How can I change the descriptions for fields in the Replace dialog

With Edit1
	.Caption(1,202) = "What"
	.Caption(1,204) = "Replace"
	.Caption(1,104) = "Word"
	.Caption(1,105) = "Case"
	.Caption(1,103) = "Dir"
	.Caption(1,113) = "Sel"
	.Caption(1,114) = "File"
	.Caption(1,21199) = "Rep"
	.Caption(1,21200) = "All"
	.Caption(1,2) = "Abandon"
	.Caption(1,32000) = "Title"
	.Caption(1,32001) = "Failed!"
	.Caption(1,32001) = "Done"
End With
127:
How can I change the descriptions for fields in the Find dialog

With Edit1
	.Caption(0,202) = "What"
	.Caption(0,104) = "Word"
	.Caption(0,105) = "Case"
	.Caption(0,103) = "Dir"
	.Caption(0,113) = "U"
	.Caption(0,114) = "D"
	.Caption(0,103) = "Next"
	.Caption(0,21199) = "All"
	.Caption(0,2) = "Abandon"
	.Caption(0,32001) = "Failed!"
End With
126:
How can I change the caption for the Replace dialog

With Edit1
	.Caption(1,0) = "Search and Replace"
End With
125:
How can I change the caption for the Find dialog

With Edit1
	.Caption(0,0) = "Search"
End With
124:
How can I move the cursor when user invokes the control's context menu

With Edit1
	.RClick = True
End With
123:
How can I disable indenting the selected text when the user presses the TAB key
With Edit1
	.IndentOnTab = False
End With
122:
How can I indent a line

With Edit1
	.LineNumberWidth = 18
	.HideSelection = False
	.SelectLine 3
	.IndentSel True
End With
121:
How can I show or hide the control's splitter

With Edit1
	.AllowSplitter = 3
	.SplitPaneHeight = 128
	.SplitPaneWidth = 128
End With
120:
How can I select a line

With Edit1
	.LineNumberWidth = 18
	.HideSelection = False
	.SelectLine 3
End With
119:
How do I change the font to display the line numbers

With Edit1
	.LineNumberFont.Name = "Tahoma"
	.LineNumberWidth = 18
End With
118:
How can I change the height of the line

With Edit1
	.Font.Size = 32
	.DrawGridLines = True
	.Refresh 
End With
117:
How can I show or hide the grid lines

With Edit1
	.DrawGridLines = True
End With
116:
How do I highlight the position of multiple lines expression on the vertical scroll bar

With Edit1
	.AllowMark = True
	.MarkContinueBlocks = True
	.AddKeyword "<b>CAxWnd"
	.AddExpression "<fgcolor=800000><b>BEGIN_MSG_MAP</b></fgcolor>","<b><fgcolor=FF0000> </fgcolor></b>","<fgcolor=800000><b>END_MSG_MAP</b></fgcolor>",True
	.MarkColor("BEGIN_MSG_MAP") = RGB(255,0,0)
	.MarkColor("END_MSG_MAP") = RGB(128,0,0)
	.MarkColor("CAxWnd") = RGB(0,0,0)
	.Refresh 
End With
115:
How do I ignore \" in a string

With Edit1
	.InsertText """just a string \""expression""\r\n",1
	.AddExpression "<fgcolor=800000><b>""</b></fgcolor>","<b><fgcolor=FF0000> </fgcolor></b>","<fgcolor=800000><b>""</b></fgcolor>",True
	.IgnorePrefixInExpression("""") = "\"
	.Refresh 
End With
114:
How can I change the color for the line number's border

With Edit1
	.LineNumberBorderColor = RGB(255,0,0)
	.LineNumberWidth = 18
End With
113:
How can I change the color for the bookmark's border

With Edit1
	.BookmarkBorderColor = RGB(255,0,0)
	.BookmarkWidth = 18
End With
112:
Can I display a custom icon or picture for bookmarks

With Edit1
	.Images "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.BookmarkImage = 1
	.Bookmark(2) = True
	.Bookmark(4) = True
	.BookmarkWidth = 18
End With
111:
Can I display a custom icon or picture in the bookmark area

With Edit1
	.Images "gBJJgBAIDAAGAAEAAQhYAf8Pf4hh0QihCJo2AEZjQAjEZFEaIEaEEaAIAkcbk0olUrlktl0vmExmUzmk1m03nE5nU7nk9n0/oFBoVDolFo1HpFJpVLplNp1PqFRqVTq" & _
"lVq1XrFZrVbrldr1fsFhsVjslls1ntFptVrtltt1vuFxuVzul1u13vF5vV7vl9v1/wGBwWDwmFw2HxGJxWLxmNx0xiFdyOTh8Tf9ZymXx+QytcyNgz8r0OblWjyWds+m" & _
"0ka1Vf1ta1+r1mos2xrG2xeZ0+a0W0qOx3GO4NV3WeyvD2XJ5XL5nN51aiw+lfSj0gkUkAEllHanHI5j/cHg8EZf7w8vl8j4f/qfEZeB09/vjLAB30+kZQAP/P5/H6/y" & _
"NAOAEAwCjMBwFAEDwJBMDwLBYAP2/8Hv8/gAGAD8LQs9w/nhDY/oygIA="
	.BookmarkImageLine(2) = 1
	.Bookmark(4) = True
	.BookmarkWidth = 18
End With
110:
How do I remove the line's background color
With Edit1
	.BackColorLine(1) = RGB(255,0,0)
	.ClearBackColorLine 1
End With
109:
How do I change the foreground color for a line

With Edit1
	.ForeColorLine(1) = RGB(255,0,0)
End With
108:
How do I change the background color for a line

With Edit1
	.BackColorLine(1) = RGB(255,0,0)
End With
107:
How can I add my own items in the control's context menu

With Edit1
	.ContextMenuItems = "New Item"
End With
106:
How do I ensure that a specified line is visible

With Edit1
	.EnsureVisibleLine .Count
End With
105:
How can I programmatically perform a REDO operation
With Edit1
	.Redo 
End With
104:
How can I programmatically perform an UNDO operation
With Edit1
	.Undo 
End With
103:
How do I get the bookmarks as a list

With Edit1
	.Bookmark(2) = True
	.Bookmark(4) = True
	.BookmarkWidth = 16
	var_BookmarksList = .BookmarksList
End With
102:
How can I move to the previous bookmark

With Edit1
	.Bookmark(2) = True
	.Bookmark(4) = True
	.BookmarkWidth = 16
	.PrevBookmark 
End With
101:
How can I move to the next bookmark

With Edit1
	.Bookmark(2) = True
	.Bookmark(4) = True
	.BookmarkWidth = 16
	.NextBookmark 
End With