SyntaxRichTextBox highlighting Problem

  • VB.NET
  • .NET (FX) 4.5–4.8

Es gibt 6 Antworten in diesem Thema. Der letzte Beitrag () ist von Counterbug.

    SyntaxRichTextBox highlighting Problem

    Hallo zusammen,

    Ich benutze diese SyntaxRichTextBox als Code Editor:
    codeproject.com/Articles/10675…lighting-in-a-RichTextBox

    Wenn etwas eingeben werden wird, werden bestimmte Wörter in bestimmte Farben korrekt angezeigt:


    Wenn ein Text eingefügt wird, oder in die RichTextBox geladen wird, dann wird nur die erste Zeile highlighted.

    Ich möchte das der gesamte Text highlighted wird.

    Hier der dazugehörige Code: (Dieses Sub wird im Programm Load-Event aufgerufen)

    Quellcode

    1. ​
    2. Public Sub LadeEigenschgaftenVonCodeRichTextBox()
    4. ' Add the keywords to the list.
    5. m_syntaxRichTextBox.Settings.Keywords.Add("ASSOC")
    6. m_syntaxRichTextBox.Settings.Keywords.Add("assoc")
    7. m_syntaxRichTextBox.Settings.Keywords.Add("@ECHO OFF")
    8. m_syntaxRichTextBox.Settings.Keywords.Add("@echo off")
    9. m_syntaxRichTextBox.Settings.Keywords.Add("ECHO")
    10. m_syntaxRichTextBox.Settings.Keywords.Add("Echo")
    11. m_syntaxRichTextBox.Settings.Keywords.Add("echo")
    12. m_syntaxRichTextBox.Settings.Keywords.Add("ECHO ON")
    13. m_syntaxRichTextBox.Settings.Keywords.Add("Echo on")
    14. m_syntaxRichTextBox.Settings.Keywords.Add("echo on")
    15. m_syntaxRichTextBox.Settings.Keywords.Add("ECHO OFF")
    16. m_syntaxRichTextBox.Settings.Keywords.Add("Echo off")
    17. m_syntaxRichTextBox.Settings.Keywords.Add("echo off")
    18. m_syntaxRichTextBox.Settings.Keywords.Add("CLS")
    19. m_syntaxRichTextBox.Settings.Keywords.Add("cls")
    20. m_syntaxRichTextBox.Settings.Keywords.Add("GOTO")
    21. m_syntaxRichTextBox.Settings.Keywords.Add("Goto")
    22. m_syntaxRichTextBox.Settings.Keywords.Add("goto")
    23. m_syntaxRichTextBox.Settings.Keywords.Add("START")
    24. m_syntaxRichTextBox.Settings.Keywords.Add("Start")
    25. m_syntaxRichTextBox.Settings.Keywords.Add("start")
    26. m_syntaxRichTextBox.Settings.Keywords.Add("SET")
    27. m_syntaxRichTextBox.Settings.Keywords.Add("Set")
    28. m_syntaxRichTextBox.Settings.Keywords.Add("set")
    29. m_syntaxRichTextBox.Settings.Keywords.Add("/p")
    30. m_syntaxRichTextBox.Settings.Keywords.Add("/s")
    31. m_syntaxRichTextBox.Settings.Keywords.Add("/i")
    32. m_syntaxRichTextBox.Settings.Keywords.Add("/a")
    33. m_syntaxRichTextBox.Settings.Keywords.Add("/c")
    34. m_syntaxRichTextBox.Settings.Keywords.Add("/all")
    35. m_syntaxRichTextBox.Settings.Keywords.Add("%RANDO%")
    36. m_syntaxRichTextBox.Settings.Keywords.Add("%Random%")
    37. m_syntaxRichTextBox.Settings.Keywords.Add("%random%")
    38. m_syntaxRichTextBox.Settings.Keywords.Add("%")
    39. m_syntaxRichTextBox.Settings.Keywords.Add("EXIST")
    40. m_syntaxRichTextBox.Settings.Keywords.Add("Exist")
    41. m_syntaxRichTextBox.Settings.Keywords.Add("exist")
    42. m_syntaxRichTextBox.Settings.Keywords.Add("IF")
    43. m_syntaxRichTextBox.Settings.Keywords.Add("If")
    44. m_syntaxRichTextBox.Settings.Keywords.Add("if")
    45. m_syntaxRichTextBox.Settings.Keywords.Add("EXIT")
    46. m_syntaxRichTextBox.Settings.Keywords.Add("Exit")
    47. m_syntaxRichTextBox.Settings.Keywords.Add("exit")
    48. m_syntaxRichTextBox.Settings.Keywords.Add("NOT")
    49. m_syntaxRichTextBox.Settings.Keywords.Add("Not")
    50. m_syntaxRichTextBox.Settings.Keywords.Add("not")
    51. m_syntaxRichTextBox.Settings.Keywords.Add("==")
    52. m_syntaxRichTextBox.Settings.Keywords.Add("=")
    53. m_syntaxRichTextBox.Settings.Keywords.Add(":")
    54. m_syntaxRichTextBox.Settings.Keywords.Add("PAUSE")
    55. m_syntaxRichTextBox.Settings.Keywords.Add("Pause")
    56. m_syntaxRichTextBox.Settings.Keywords.Add("pause")
    57. m_syntaxRichTextBox.Settings.Keywords.Add("IPCONGIF")
    58. m_syntaxRichTextBox.Settings.Keywords.Add("Ipconfig")
    59. m_syntaxRichTextBox.Settings.Keywords.Add("ipconfig")
    60. m_syntaxRichTextBox.Settings.Keywords.Add("PING")
    61. m_syntaxRichTextBox.Settings.Keywords.Add("Ping")
    62. m_syntaxRichTextBox.Settings.Keywords.Add("ping")
    63. m_syntaxRichTextBox.Settings.Keywords.Add("%path%")
    64. m_syntaxRichTextBox.Settings.Keywords.Add("%username%")
    65. m_syntaxRichTextBox.Settings.Keywords.Add("%computername%")
    66. m_syntaxRichTextBox.Settings.Keywords.Add("%prompt%")
    67. m_syntaxRichTextBox.Settings.Keywords.Add("CALL")
    68. m_syntaxRichTextBox.Settings.Keywords.Add("Call")
    69. m_syntaxRichTextBox.Settings.Keywords.Add("call")
    70. m_syntaxRichTextBox.Settings.Keywords.Add("FOR")
    71. m_syntaxRichTextBox.Settings.Keywords.Add("For")
    72. m_syntaxRichTextBox.Settings.Keywords.Add("for")
    73. m_syntaxRichTextBox.Settings.Keywords.Add("IN")
    74. m_syntaxRichTextBox.Settings.Keywords.Add("In")
    75. m_syntaxRichTextBox.Settings.Keywords.Add("in")
    76. m_syntaxRichTextBox.Settings.Keywords.Add("DIR")
    77. m_syntaxRichTextBox.Settings.Keywords.Add("Dir")
    78. m_syntaxRichTextBox.Settings.Keywords.Add("dir")
    79. m_syntaxRichTextBox.Settings.Keywords.Add("DEL")
    80. m_syntaxRichTextBox.Settings.Keywords.Add("Del")
    81. m_syntaxRichTextBox.Settings.Keywords.Add("del")
    82. m_syntaxRichTextBox.Settings.Keywords.Add("DO CALL")
    83. m_syntaxRichTextBox.Settings.Keywords.Add("Do Call")
    84. m_syntaxRichTextBox.Settings.Keywords.Add("do call")
    85. m_syntaxRichTextBox.Settings.Keywords.Add("DO")
    86. m_syntaxRichTextBox.Settings.Keywords.Add("Do")
    87. m_syntaxRichTextBox.Settings.Keywords.Add("do")
    88. m_syntaxRichTextBox.Settings.Keywords.Add("CALL")
    89. m_syntaxRichTextBox.Settings.Keywords.Add("Call")
    90. m_syntaxRichTextBox.Settings.Keywords.Add("call")
    91. m_syntaxRichTextBox.Settings.Keywords.Add("%0")
    92. m_syntaxRichTextBox.Settings.Keywords.Add("ASSOC")
    93. m_syntaxRichTextBox.Settings.Keywords.Add("Assoc")
    94. m_syntaxRichTextBox.Settings.Keywords.Add("assoc")
    95. m_syntaxRichTextBox.Settings.Keywords.Add("ATTRIB")
    96. m_syntaxRichTextBox.Settings.Keywords.Add("Attrib")
    97. m_syntaxRichTextBox.Settings.Keywords.Add("attrib")
    98. m_syntaxRichTextBox.Settings.Keywords.Add("BREAK")
    99. m_syntaxRichTextBox.Settings.Keywords.Add("Break")
    100. m_syntaxRichTextBox.Settings.Keywords.Add("break")
    101. m_syntaxRichTextBox.Settings.Keywords.Add("BOOTCFG")
    102. m_syntaxRichTextBox.Settings.Keywords.Add("Bootcfg")
    103. m_syntaxRichTextBox.Settings.Keywords.Add("CACLS")
    104. m_syntaxRichTextBox.Settings.Keywords.Add("Calls")
    105. m_syntaxRichTextBox.Settings.Keywords.Add("calls")
    106. m_syntaxRichTextBox.Settings.Keywords.Add("CD")
    107. m_syntaxRichTextBox.Settings.Keywords.Add("cd")
    108. m_syntaxRichTextBox.Settings.Keywords.Add("CHCP")
    109. m_syntaxRichTextBox.Settings.Keywords.Add("chcp")
    110. m_syntaxRichTextBox.Settings.Keywords.Add("CHDIR")
    111. m_syntaxRichTextBox.Settings.Keywords.Add("chdir")
    112. m_syntaxRichTextBox.Settings.Keywords.Add("CHKDSK")
    113. m_syntaxRichTextBox.Settings.Keywords.Add("chkdsk")
    114. m_syntaxRichTextBox.Settings.Keywords.Add("CHKNTFS")
    115. m_syntaxRichTextBox.Settings.Keywords.Add("chkntfs")
    116. m_syntaxRichTextBox.Settings.Keywords.Add("CHDIR")
    117. m_syntaxRichTextBox.Settings.Keywords.Add("chdir")
    118. m_syntaxRichTextBox.Settings.Keywords.Add("COM")
    119. m_syntaxRichTextBox.Settings.Keywords.Add("com")
    120. m_syntaxRichTextBox.Settings.Keywords.Add("COMP")
    121. m_syntaxRichTextBox.Settings.Keywords.Add("comp")
    122. m_syntaxRichTextBox.Settings.Keywords.Add("COMPACT")
    123. m_syntaxRichTextBox.Settings.Keywords.Add("compact")
    124. m_syntaxRichTextBox.Settings.Keywords.Add("CMD")
    125. m_syntaxRichTextBox.Settings.Keywords.Add("cmd")
    126. m_syntaxRichTextBox.Settings.Keywords.Add("COLOR")
    127. m_syntaxRichTextBox.Settings.Keywords.Add("Color")
    128. m_syntaxRichTextBox.Settings.Keywords.Add("color")
    129. m_syntaxRichTextBox.Settings.Keywords.Add("CONVERT")
    130. m_syntaxRichTextBox.Settings.Keywords.Add("Convert")
    131. m_syntaxRichTextBox.Settings.Keywords.Add("convert")
    132. m_syntaxRichTextBox.Settings.Keywords.Add("COPY")
    133. m_syntaxRichTextBox.Settings.Keywords.Add("Copy")
    134. m_syntaxRichTextBox.Settings.Keywords.Add("copy")
    135. m_syntaxRichTextBox.Settings.Keywords.Add("DATE")
    136. m_syntaxRichTextBox.Settings.Keywords.Add("Date")
    137. m_syntaxRichTextBox.Settings.Keywords.Add("date")
    138. m_syntaxRichTextBox.Settings.Keywords.Add("DEL")
    139. m_syntaxRichTextBox.Settings.Keywords.Add("DIR")
    140. m_syntaxRichTextBox.Settings.Keywords.Add("Dir")
    141. m_syntaxRichTextBox.Settings.Keywords.Add("dir")
    142. m_syntaxRichTextBox.Settings.Keywords.Add("DISKOMP")
    143. m_syntaxRichTextBox.Settings.Keywords.Add("Diskomp")
    144. m_syntaxRichTextBox.Settings.Keywords.Add("diskomp")
    145. m_syntaxRichTextBox.Settings.Keywords.Add("DISKCOPY")
    146. m_syntaxRichTextBox.Settings.Keywords.Add("Diskcopy")
    147. m_syntaxRichTextBox.Settings.Keywords.Add("diskcopy")
    148. m_syntaxRichTextBox.Settings.Keywords.Add("DISKPART")
    149. m_syntaxRichTextBox.Settings.Keywords.Add("Diskpart")
    150. m_syntaxRichTextBox.Settings.Keywords.Add("diskpart")
    151. m_syntaxRichTextBox.Settings.Keywords.Add("DOSKEY")
    152. m_syntaxRichTextBox.Settings.Keywords.Add("Doskey")
    153. m_syntaxRichTextBox.Settings.Keywords.Add("doskey")
    154. m_syntaxRichTextBox.Settings.Keywords.Add("DRIVERQUERY")
    155. m_syntaxRichTextBox.Settings.Keywords.Add("Driverquery")
    156. m_syntaxRichTextBox.Settings.Keywords.Add("driverquery")
    157. m_syntaxRichTextBox.Settings.Keywords.Add("EXIT")
    158. m_syntaxRichTextBox.Settings.Keywords.Add("Exit")
    159. m_syntaxRichTextBox.Settings.Keywords.Add("exit")
    160. m_syntaxRichTextBox.Settings.Keywords.Add("FC")
    161. m_syntaxRichTextBox.Settings.Keywords.Add("fc")
    162. m_syntaxRichTextBox.Settings.Keywords.Add("FIND")
    163. m_syntaxRichTextBox.Settings.Keywords.Add("Find")
    164. m_syntaxRichTextBox.Settings.Keywords.Add("find")
    165. m_syntaxRichTextBox.Settings.Keywords.Add("ENDLOCAL")
    166. m_syntaxRichTextBox.Settings.Keywords.Add("Endlocal")
    167. m_syntaxRichTextBox.Settings.Keywords.Add("endlocal")
    168. m_syntaxRichTextBox.Settings.Keywords.Add("FINDSTR")
    169. m_syntaxRichTextBox.Settings.Keywords.Add("Findstr")
    170. m_syntaxRichTextBox.Settings.Keywords.Add("findstr")
    171. m_syntaxRichTextBox.Settings.Keywords.Add("FOR")
    172. m_syntaxRichTextBox.Settings.Keywords.Add("For")
    173. m_syntaxRichTextBox.Settings.Keywords.Add("for")
    174. m_syntaxRichTextBox.Settings.Keywords.Add("ERASE")
    175. m_syntaxRichTextBox.Settings.Keywords.Add("Erase")
    176. m_syntaxRichTextBox.Settings.Keywords.Add("erase")
    177. m_syntaxRichTextBox.Settings.Keywords.Add("FORMAT")
    178. m_syntaxRichTextBox.Settings.Keywords.Add("Format")
    179. m_syntaxRichTextBox.Settings.Keywords.Add("format")
    180. m_syntaxRichTextBox.Settings.Keywords.Add("FSUTIL")
    181. m_syntaxRichTextBox.Settings.Keywords.Add("Fsutil")
    182. m_syntaxRichTextBox.Settings.Keywords.Add("fsutil")
    183. m_syntaxRichTextBox.Settings.Keywords.Add("FTYPE")
    184. m_syntaxRichTextBox.Settings.Keywords.Add("Ftype")
    185. m_syntaxRichTextBox.Settings.Keywords.Add("ftype")
    186. m_syntaxRichTextBox.Settings.Keywords.Add("GPRESULT")
    187. m_syntaxRichTextBox.Settings.Keywords.Add("gpresult")
    188. m_syntaxRichTextBox.Settings.Keywords.Add("Gpresult")
    189. m_syntaxRichTextBox.Settings.Keywords.Add("GRAFTABL")
    190. m_syntaxRichTextBox.Settings.Keywords.Add("graftabl")
    191. m_syntaxRichTextBox.Settings.Keywords.Add("HELP")
    192. m_syntaxRichTextBox.Settings.Keywords.Add("Help")
    193. m_syntaxRichTextBox.Settings.Keywords.Add("help")
    194. m_syntaxRichTextBox.Settings.Keywords.Add("ICACLS")
    195. m_syntaxRichTextBox.Settings.Keywords.Add("icacls")
    196. m_syntaxRichTextBox.Settings.Keywords.Add("LABEL")
    197. m_syntaxRichTextBox.Settings.Keywords.Add("Label")
    198. m_syntaxRichTextBox.Settings.Keywords.Add("label")
    199. m_syntaxRichTextBox.Settings.Keywords.Add(":LABEL")
    200. m_syntaxRichTextBox.Settings.Keywords.Add("MD")
    201. m_syntaxRichTextBox.Settings.Keywords.Add("md")
    202. m_syntaxRichTextBox.Settings.Keywords.Add("MKDIR")
    203. m_syntaxRichTextBox.Settings.Keywords.Add("mkdir")
    204. m_syntaxRichTextBox.Settings.Keywords.Add("MKLINK")
    205. m_syntaxRichTextBox.Settings.Keywords.Add("mklink")
    206. m_syntaxRichTextBox.Settings.Keywords.Add("MODE")
    207. m_syntaxRichTextBox.Settings.Keywords.Add("Mode")
    208. m_syntaxRichTextBox.Settings.Keywords.Add("mode")
    209. m_syntaxRichTextBox.Settings.Keywords.Add("MORE")
    210. m_syntaxRichTextBox.Settings.Keywords.Add("More")
    211. m_syntaxRichTextBox.Settings.Keywords.Add("more")
    212. m_syntaxRichTextBox.Settings.Keywords.Add("MOVE")
    213. m_syntaxRichTextBox.Settings.Keywords.Add("Move")
    214. m_syntaxRichTextBox.Settings.Keywords.Add("move")
    215. m_syntaxRichTextBox.Settings.Keywords.Add("OPENFILES")
    216. m_syntaxRichTextBox.Settings.Keywords.Add("Openfiles")
    217. m_syntaxRichTextBox.Settings.Keywords.Add("openfiles")
    218. m_syntaxRichTextBox.Settings.Keywords.Add("PATH")
    219. m_syntaxRichTextBox.Settings.Keywords.Add("Path")
    220. m_syntaxRichTextBox.Settings.Keywords.Add("path")
    221. m_syntaxRichTextBox.Settings.Keywords.Add("PAUSE")
    222. m_syntaxRichTextBox.Settings.Keywords.Add("Pause")
    223. m_syntaxRichTextBox.Settings.Keywords.Add("pause")
    224. m_syntaxRichTextBox.Settings.Keywords.Add("POPD")
    225. m_syntaxRichTextBox.Settings.Keywords.Add("Popd")
    226. m_syntaxRichTextBox.Settings.Keywords.Add("popd")
    227. m_syntaxRichTextBox.Settings.Keywords.Add("PRINT")
    228. m_syntaxRichTextBox.Settings.Keywords.Add("Print")
    229. m_syntaxRichTextBox.Settings.Keywords.Add("print")
    230. m_syntaxRichTextBox.Settings.Keywords.Add("PROMPT")
    231. m_syntaxRichTextBox.Settings.Keywords.Add("Prompt")
    232. m_syntaxRichTextBox.Settings.Keywords.Add("prompt")
    233. m_syntaxRichTextBox.Settings.Keywords.Add("PUSHD")
    234. m_syntaxRichTextBox.Settings.Keywords.Add("Pushd")
    235. m_syntaxRichTextBox.Settings.Keywords.Add("pushd")
    236. m_syntaxRichTextBox.Settings.Keywords.Add("RD")
    237. m_syntaxRichTextBox.Settings.Keywords.Add("rd")
    238. m_syntaxRichTextBox.Settings.Keywords.Add("RECOVER")
    239. m_syntaxRichTextBox.Settings.Keywords.Add("Recover")
    240. m_syntaxRichTextBox.Settings.Keywords.Add("recover")
    241. m_syntaxRichTextBox.Settings.Keywords.Add("REN")
    242. m_syntaxRichTextBox.Settings.Keywords.Add("Ren")
    243. m_syntaxRichTextBox.Settings.Keywords.Add("ren")
    244. m_syntaxRichTextBox.Settings.Keywords.Add("RENAME")
    245. m_syntaxRichTextBox.Settings.Keywords.Add("Rename")
    246. m_syntaxRichTextBox.Settings.Keywords.Add("rename")
    247. m_syntaxRichTextBox.Settings.Keywords.Add("REPLACE")
    248. m_syntaxRichTextBox.Settings.Keywords.Add("Replace")
    249. m_syntaxRichTextBox.Settings.Keywords.Add("replace")
    250. m_syntaxRichTextBox.Settings.Keywords.Add("RMDIR")
    251. m_syntaxRichTextBox.Settings.Keywords.Add("rmdir")
    252. m_syntaxRichTextBox.Settings.Keywords.Add("ROBOCOPY")
    253. m_syntaxRichTextBox.Settings.Keywords.Add("Robocopy")
    254. m_syntaxRichTextBox.Settings.Keywords.Add("robocopy")
    255. m_syntaxRichTextBox.Settings.Keywords.Add("SET")
    256. m_syntaxRichTextBox.Settings.Keywords.Add("Set")
    257. m_syntaxRichTextBox.Settings.Keywords.Add("set")
    258. m_syntaxRichTextBox.Settings.Keywords.Add("SETLOCAL")
    259. m_syntaxRichTextBox.Settings.Keywords.Add("Setlocal")
    260. m_syntaxRichTextBox.Settings.Keywords.Add("setlocal")
    261. m_syntaxRichTextBox.Settings.Keywords.Add("CS")
    262. m_syntaxRichTextBox.Settings.Keywords.Add("cs")
    263. m_syntaxRichTextBox.Settings.Keywords.Add("SCHTASKS")
    264. m_syntaxRichTextBox.Settings.Keywords.Add("Schtasks")
    265. m_syntaxRichTextBox.Settings.Keywords.Add("schtasks")
    266. m_syntaxRichTextBox.Settings.Keywords.Add("SHIFT")
    267. m_syntaxRichTextBox.Settings.Keywords.Add("Shift")
    268. m_syntaxRichTextBox.Settings.Keywords.Add("shift")
    269. m_syntaxRichTextBox.Settings.Keywords.Add("SHUTDOWN")
    270. m_syntaxRichTextBox.Settings.Keywords.Add("Shutdown")
    271. m_syntaxRichTextBox.Settings.Keywords.Add("shutdown")
    272. m_syntaxRichTextBox.Settings.Keywords.Add("SORT")
    273. m_syntaxRichTextBox.Settings.Keywords.Add("Sort")
    274. m_syntaxRichTextBox.Settings.Keywords.Add("sort")
    275. m_syntaxRichTextBox.Settings.Keywords.Add("START")
    276. m_syntaxRichTextBox.Settings.Keywords.Add("Start")
    277. m_syntaxRichTextBox.Settings.Keywords.Add("start")
    278. m_syntaxRichTextBox.Settings.Keywords.Add("SUBST")
    279. m_syntaxRichTextBox.Settings.Keywords.Add("Subst")
    280. m_syntaxRichTextBox.Settings.Keywords.Add("subst")
    281. m_syntaxRichTextBox.Settings.Keywords.Add("SYSTEMINFO")
    282. m_syntaxRichTextBox.Settings.Keywords.Add("Systeminfo")
    283. m_syntaxRichTextBox.Settings.Keywords.Add("systeminfo")
    284. m_syntaxRichTextBox.Settings.Keywords.Add("TASKLIST")
    285. m_syntaxRichTextBox.Settings.Keywords.Add("Tasklist")
    286. m_syntaxRichTextBox.Settings.Keywords.Add("tasklist")
    287. m_syntaxRichTextBox.Settings.Keywords.Add("TASKKILL")
    288. m_syntaxRichTextBox.Settings.Keywords.Add("Taskkill")
    289. m_syntaxRichTextBox.Settings.Keywords.Add("taskkill")
    290. m_syntaxRichTextBox.Settings.Keywords.Add("TIME")
    291. m_syntaxRichTextBox.Settings.Keywords.Add("Time")
    292. m_syntaxRichTextBox.Settings.Keywords.Add("time")
    293. m_syntaxRichTextBox.Settings.Keywords.Add("TITLE")
    294. m_syntaxRichTextBox.Settings.Keywords.Add("Title")
    295. m_syntaxRichTextBox.Settings.Keywords.Add("title")
    296. m_syntaxRichTextBox.Settings.Keywords.Add("TREE")
    297. m_syntaxRichTextBox.Settings.Keywords.Add("Tree")
    298. m_syntaxRichTextBox.Settings.Keywords.Add("tree")
    299. m_syntaxRichTextBox.Settings.Keywords.Add("TYPE")
    300. m_syntaxRichTextBox.Settings.Keywords.Add("Type")
    301. m_syntaxRichTextBox.Settings.Keywords.Add("type")
    302. m_syntaxRichTextBox.Settings.Keywords.Add("VER")
    303. m_syntaxRichTextBox.Settings.Keywords.Add("Ver")
    304. m_syntaxRichTextBox.Settings.Keywords.Add("ver")
    305. m_syntaxRichTextBox.Settings.Keywords.Add("VERIFY")
    306. m_syntaxRichTextBox.Settings.Keywords.Add("Verify")
    307. m_syntaxRichTextBox.Settings.Keywords.Add("verify")
    308. m_syntaxRichTextBox.Settings.Keywords.Add("VOL")
    309. m_syntaxRichTextBox.Settings.Keywords.Add("Vol")
    310. m_syntaxRichTextBox.Settings.Keywords.Add("vol")
    311. m_syntaxRichTextBox.Settings.Keywords.Add("XCOPY")
    312. m_syntaxRichTextBox.Settings.Keywords.Add("xcopy")
    313. m_syntaxRichTextBox.Settings.Keywords.Add("Xcopy")
    314. m_syntaxRichTextBox.Settings.Keywords.Add("WMIC")
    315. m_syntaxRichTextBox.Settings.Keywords.Add("wmic")
    316. m_syntaxRichTextBox.Settings.Keywords.Add("on")
    317. m_syntaxRichTextBox.Settings.Keywords.Add("off")
    319. ' Set the comment identifier.
    320. ' For Lua this is two minus-signs after each other (--).
    321. ' For C++ code we would set this property to "//".
    322. m_syntaxRichTextBox.Settings.Comment = "Rem"
    324. ' Set the colors that will be used.
    325. m_syntaxRichTextBox.Settings.KeywordColor = Color.DodgerBlue ' Color.Blue
    326. m_syntaxRichTextBox.Settings.CommentColor = Color.Green
    327. m_syntaxRichTextBox.Settings.StringColor = Color.OrangeRed ' Color.Red
    328. m_syntaxRichTextBox.Settings.IntegerColor = Color.Gray
    330. ' Let's not process strings and integers.
    331. m_syntaxRichTextBox.Settings.EnableStrings = True
    332. m_syntaxRichTextBox.Settings.EnableIntegers = False
    333. m_syntaxRichTextBox.Settings.EnableComments = True
    335. ' Let's make the settings we just set valid by compiling
    336. ' the keywords to a regular expression.
    337. m_syntaxRichTextBox.CompileKeywords()
    339. ' Load a file and update the syntax highlighting.
    340. ' m_syntaxRichTextBox.LoadFile("script.txt", RichTextBoxStreamType.PlainText)
    341. Try
    342. m_syntaxRichTextBox.ProcessAllLines()
    343. Catch ex As Exception
    344. End Try
    346. End Sub


    Danke schon mal :)

Facebook
Telefonspende