ILIAS  release_5-3 Revision v5.3.23-19-g915713cf615
HFile_vb.php
Go to the documentation of this file.
1<?php
2
3$BEAUT_PATH = realpath(".") . "/Services/COPage/syntax_highlight/php";
4if (!isset($BEAUT_PATH)) {
5 return;
6}
7require_once("$BEAUT_PATH/Beautifier/HFile.php");
8 class HFile_vb extends HFile
9 {
10 public function __construct()
11 {
12 parent::__construct();
13
14 /*************************************/
15 // Beautifier Highlighting Configuration File
16 // Visual Basic
17 /*************************************/
18 // Flags
19
20 $this->nocase = "1";
21 $this->notrim = "0";
22 $this->perl = "0";
23
24 // Colours
25
26 $this->colours = array("blue", "purple", "gray", "brown", "blue", "purple");
27 $this->quotecolour = "blue";
28 $this->blockcommentcolour = "green";
29 $this->linecommentcolour = "green";
30
31 // Indent Strings
32
33 $this->indent = array("Private Sub", "Public Sub", "With");
34 $this->unindent = array("End Sub", "End With");
35
36 // String characters and delimiters
37
38 $this->stringchars = array();
39 $this->delimiters = array(" ", "(", ")", ".");
40 $this->escchar = "";
41
42 // Comment settings
43
44 $this->linecommenton = array("'");
45 $this->blockcommenton = array("");
46 $this->blockcommentoff = array("");
47
48 // Keywords (keyword mapping to colour number)
49
50 $this->keywords = array(
51 "Abs" => "1",
52 "Array" => "1",
53 "Asc" => "1",
54 "AscB" => "1",
55 "AscW" => "1",
56 "Atn" => "1",
57 "Avg" => "1",
58 "CBool" => "1",
59 "CByte" => "1",
60 "CCur" => "1",
61 "CDate" => "1",
62 "CDbl" => "1",
63 "Cdec" => "1",
64 "Choose" => "1",
65 "Chr" => "1",
66 "ChrB" => "1",
67 "ChrW" => "1",
68 "CInt" => "1",
69 "CLng" => "1",
70 "Command" => "1",
71 "Cos" => "1",
72 "Count" => "1",
73 "CreateObject" => "1",
74 "CSng" => "1",
75 "CStr" => "1",
76 "CurDir" => "1",
77 "CVar" => "1",
78 "CVDate" => "1",
79 "CVErr" => "1",
80 "Date" => "1",
81 "DateAdd" => "1",
82 "DateDiff" => "1",
83 "DatePart" => "1",
84 "DateSerial" => "1",
85 "DateValue" => "1",
86 "Day" => "1",
87 "DDB" => "1",
88 "Dir" => "1",
89 "DoEvents" => "1",
90 "Environ" => "1",
91 "EOF" => "1",
92 "Error" => "1",
93 "Exp" => "1",
94 "FileAttr" => "1",
95 "FileDateTime" => "1",
96 "FileLen" => "1",
97 "Fix" => "1",
98 "Format" => "1",
99 "FreeFile" => "1",
100 "FV" => "1",
101 "GetAllStrings" => "1",
102 "GetAttr" => "1",
103 "GetAutoServerSettings" => "1",
104 "GetObject" => "1",
105 "GetSetting" => "1",
106 "Hex" => "1",
107 "Hour" => "1",
108 "IIf" => "1",
109 "IMEStatus" => "1",
110 "Input" => "1",
111 "InputB" => "1",
112 "InputBox" => "1",
113 "InStr" => "1",
114 "InstB" => "1",
115 "Int" => "1",
116 "IPmt" => "1",
117 "IsArray" => "1",
118 "IsDate" => "1",
119 "IsEmpty" => "1",
120 "IsError" => "1",
121 "IsMissing" => "1",
122 "IsNull" => "1",
123 "IsNumeric" => "1",
124 "IsObject" => "1",
125 "LBound" => "1",
126 "LCase" => "1",
127 "Left" => "1",
128 "LeftB" => "1",
129 "Len" => "1",
130 "LenB" => "1",
131 "LoadPicture" => "1",
132 "Loc" => "1",
133 "LOF" => "1",
134 "Log" => "1",
135 "LTrim" => "1",
136 "Max" => "1",
137 "Mid" => "1",
138 "MidB" => "1",
139 "Min" => "1",
140 "Minute" => "1",
141 "MIRR" => "1",
142 "Month" => "1",
143 "MsgBox" => "1",
144 "Now" => "1",
145 "NPer" => "1",
146 "NPV" => "1",
147 "Oct" => "1",
148 "Partition" => "1",
149 "Pmt" => "1",
150 "PPmt" => "1",
151 "PV" => "1",
152 "QBColor" => "1",
153 "Rate" => "1",
154 "RGB" => "1",
155 "Right" => "1",
156 "RightB" => "1",
157 "Rnd" => "1",
158 "RTrim" => "1",
159 "Second" => "1",
160 "Seek" => "1",
161 "Sgn" => "1",
162 "Shell" => "1",
163 "Sin" => "1",
164 "SLN" => "1",
165 "Space" => "1",
166 "Spc" => "1",
167 "Sqr" => "1",
168 "StDev" => "1",
169 "StDevP" => "1",
170 "Str" => "1",
171 "StrComp" => "1",
172 "StrConv" => "1",
173 "String" => "1",
174 "Switch" => "1",
175 "Sum" => "1",
176 "SYD" => "1",
177 "Tab" => "1",
178 "Tan" => "1",
179 "Time" => "1",
180 "Timer" => "1",
181 "TimeSerial" => "1",
182 "TimeValue" => "1",
183 "Trim" => "1",
184 "TypeName" => "1",
185 "UBound" => "1",
186 "UCase" => "1",
187 "Val" => "1",
188 "Var" => "1",
189 "VarP" => "1",
190 "VarType" => "1",
191 "Weekday" => "1",
192 "Year" => "1",
193 "Accept" => "2",
194 "Activate" => "2",
195 "Add" => "2",
196 "AddCustom" => "2",
197 "AddFile" => "2",
198 "AddFromFile" => "2",
199 "AddFromTemplate" => "2",
200 "AddItem" => "2",
201 "AddNew" => "2",
202 "AddToAddInToolbar" => "2",
203 "AddToolboxProgID" => "2",
204 "Append" => "2",
205 "AppendChunk" => "2",
206 "Arrange" => "2",
207 "Assert" => "2",
208 "AsyncRead" => "2",
209 "BatchUpdate" => "2",
210 "BeginTrans" => "2",
211 "Bind" => "2",
212 "Cancel" => "2",
213 "CancelAsyncRead" => "2",
214 "CancelBatch" => "2",
215 "CancelUpdate" => "2",
216 "CanPropertyChange" => "2",
217 "CaptureImage" => "2",
218 "CellText" => "2",
219 "CellValue" => "2",
220 "Circle" => "2",
221 "Clear" => "2",
222 "ClearFields" => "2",
223 "ClearSel" => "2",
224 "ClearSelCols" => "2",
225 "Clone" => "2",
226 "Close" => "2",
227 "Cls" => "2",
228 "ColContaining" => "2",
229 "ColumnSize" => "2",
230 "CommitTrans" => "2",
231 "CompactDatabase" => "2",
232 "Compose" => "2",
233 "Connect" => "2",
234 "Copy" => "2",
235 "CopyQueryDef" => "2",
236 "CreateDatabase" => "2",
237 "CreateDragImage" => "2",
238 "CreateEmbed" => "2",
239 "CreateField" => "2",
240 "CreateGroup" => "2",
241 "CreateIndex" => "2",
242 "CreateLink" => "2",
243 "CreatePreparedStatement" => "2",
244 "CreatePropery" => "2",
245 "CreateQuery" => "2",
246 "CreateQueryDef" => "2",
247 "CreateRelation" => "2",
248 "CreateTableDef" => "2",
249 "CreateUser" => "2",
250 "CreateWorkspace" => "2",
251 "Customize" => "2",
252 "Delete" => "2",
253 "DeleteColumnLabels" => "2",
254 "DeleteColumns" => "2",
255 "DeleteRowLabels" => "2",
256 "DeleteRows" => "2",
257 "DoVerb" => "2",
258 "Drag" => "2",
259 "Draw" => "2",
260 "Edit" => "2",
261 "EditCopy" => "2",
262 "EditPaste" => "2",
263 "EndDoc" => "2",
264 "EnsureVisible" => "2",
265 "EstablishConnection" => "2",
266 "Execute" => "2",
267 "ExtractIcon" => "2",
268 "Fetch" => "2",
269 "FetchVerbs" => "2",
270 "Files" => "2",
271 "FillCache" => "2",
272 "Find" => "2",
273 "FindFirst" => "2",
274 "FindItem" => "2",
275 "FindLast" => "2",
276 "FindNext" => "2",
277 "FindPrevious" => "2",
278 "Forward" => "2",
279 "GetBookmark" => "2",
280 "GetChunk" => "2",
281 "GetClipString" => "2",
282 "GetData" => "2",
283 "GetFirstVisible" => "2",
284 "GetFormat" => "2",
285 "GetHeader" => "2",
286 "GetLineFromChar" => "2",
287 "GetNumTicks" => "2",
288 "GetRows" => "2",
289 "GetSelectedPart" => "2",
290 "GetText" => "2",
291 "GetVisibleCount" => "2",
292 "GoBack" => "2",
293 "GoForward" => "2",
294 "Hide" => "2",
295 "HitTest" => "2",
296 "HoldFields" => "2",
297 "Idle" => "2",
298 "InitializeLabels" => "2",
299 "InsertColumnLabels" => "2",
300 "InsertColumns" => "2",
301 "InsertObjDlg" => "2",
302 "InsertRowLabels" => "2",
303 "InsertRows" => "2",
304 "Item" => "2",
305 "KillDoc" => "2",
306 "Layout" => "2",
307 "Line" => "2",
308 "LinkExecute" => "2",
309 "LinkPoke" => "2",
310 "LinkRequest" => "2",
311 "LinkSend" => "2",
312 "Listen" => "2",
313 "LoadFile" => "2",
314 "LoadResData" => "2",
315 "LoadResPicture" => "2",
316 "LoadResString" => "2",
317 "LogEvent" => "2",
318 "MakeCompileFile" => "2",
319 "MakeReplica" => "2",
320 "MoreResults" => "2",
321 "Move" => "2",
322 "MoveData" => "2",
323 "MoveFirst" => "2",
324 "MoveLast" => "2",
325 "MoveNext" => "2",
326 "MovePrevious" => "2",
327 "NavigateTo" => "2",
328 "NewPage" => "2",
329 "NewPassword" => "2",
330 "NextRecordset" => "2",
331 "OLEDrag" => "2",
332 "OnAddinsUpdate" => "2",
333 "OnConnection" => "2",
334 "OnDisconnection" => "2",
335 "OnStartupComplete" => "2",
336 "Open" => "2",
337 "OpenConnection" => "2",
338 "OpenDatabase" => "2",
339 "OpenQueryDef" => "2",
340 "OpenRecordset" => "2",
341 "OpenResultset" => "2",
342 "OpenURL" => "2",
343 "Overlay" => "2",
344 "PaintPicture" => "2",
345 "Paste" => "2",
346 "PastSpecialDlg" => "2",
347 "PeekData" => "2",
348 "Play" => "2",
349 "Point" => "2",
350 "PopulatePartial" => "2",
351 "PopupMenu" => "2",
352 "Print" => "2",
353 "PrintForm" => "2",
354 "PropertyChanged" => "2",
355 "PSet" => "2",
356 "Quit" => "2",
357 "Raise" => "2",
358 "RandomDataFill" => "2",
359 "RandomFillColumns" => "2",
360 "RandomFillRows" => "2",
361 "rdoCreateEnvironment" => "2",
362 "rdoRegisterDataSource" => "2",
363 "ReadFromFile" => "2",
364 "ReadProperty" => "2",
365 "Rebind" => "2",
366 "ReFill" => "2",
367 "Refresh" => "2",
368 "RefreshLink" => "2",
369 "RegisterDatabase" => "2",
370 "Reload" => "2",
371 "Remove" => "2",
372 "RemoveAddInFromToolbar" => "2",
373 "RemoveItem" => "2",
374 "Render" => "2",
375 "RepairDatabase" => "2",
376 "Reply" => "2",
377 "ReplyAll" => "2",
378 "Requery" => "2",
379 "ResetCustom" => "2",
380 "ResetCustomLabel" => "2",
381 "ResolveName" => "2",
382 "RestoreToolbar" => "2",
383 "Resync" => "2",
384 "Rollback" => "2",
385 "RollbackTrans" => "2",
386 "RowBookmark" => "2",
387 "RowContaining" => "2",
388 "RowTop" => "2",
389 "Save" => "2",
390 "SaveAs" => "2",
391 "SaveFile" => "2",
392 "SaveToFile" => "2",
393 "SaveToolbar" => "2",
394 "SaveToOle1File" => "2",
395 "Scale" => "2",
396 "ScaleX" => "2",
397 "ScaleY" => "2",
398 "Scroll" => "2",
399 "Select" => "2",
400 "SelectAll" => "2",
401 "SelectPart" => "2",
402 "SelPrint" => "2",
403 "Send" => "2",
404 "SendData" => "2",
405 "Set" => "2",
406 "SetAutoServerSettings" => "2",
407 "SetData" => "2",
408 "SetFocus" => "2",
409 "SetOption" => "2",
410 "SetSize" => "2",
411 "SetText" => "2",
412 "SetViewport" => "2",
413 "Show" => "2",
414 "ShowColor" => "2",
415 "ShowFont" => "2",
416 "ShowHelp" => "2",
417 "ShowOpen" => "2",
418 "ShowPrinter" => "2",
419 "ShowSave" => "2",
420 "ShowWhatsThis" => "2",
421 "SignOff" => "2",
422 "SignOn" => "2",
423 "Size" => "2",
424 "Span" => "2",
425 "SplitContaining" => "2",
426 "StartLabelEdit" => "2",
427 "StartLogging" => "2",
428 "Stop" => "2",
429 "Synchronize" => "2",
430 "TextHeight" => "2",
431 "TextWidth" => "2",
432 "ToDefaults" => "2",
433 "TwipsToChartPart" => "2",
434 "TypeByChartType" => "2",
435 "Update" => "2",
436 "UpdateControls" => "2",
437 "UpdateRecord" => "2",
438 "UpdateRow" => "2",
439 "Upto" => "2",
440 "WhatsThisMode" => "2",
441 "WriteProperty" => "2",
442 "ZOrder" => "2",
443 "AccessKeyPress" => "3",
444 "AfterAddFile" => "3",
445 "AfterChangeFileName" => "3",
446 "AfterCloseFile" => "3",
447 "AfterColEdit" => "3",
448 "AfterColUpdate" => "3",
449 "AfterDelete" => "3",
450 "AfterInsert" => "3",
451 "AfterLabelEdit" => "3",
452 "AfterRemoveFile" => "3",
453 "AfterUpdate" => "3",
454 "AfterWriteFile" => "3",
455 "AmbienChanged" => "3",
456 "ApplyChanges" => "3",
457 "Associate" => "3",
458 "AsyncReadComplete" => "3",
459 "AxisActivated" => "3",
460 "AxisLabelActivated" => "3",
461 "AxisLabelSelected" => "3",
462 "AxisLabelUpdated" => "3",
463 "AxisSelected" => "3",
464 "AxisTitleActivated" => "3",
465 "AxisTitleSelected" => "3",
466 "AxisTitleUpdated" => "3",
467 "AxisUpdated" => "3",
468 "BeforeClick" => "3",
469 "BeforeColEdit" => "3",
470 "BeforeColUpdate" => "3",
471 "BeforeConnect" => "3",
472 "BeforeDelete" => "3",
473 "BeforeInsert" => "3",
474 "BeforeLabelEdit" => "3",
475 "BeforeLoadFile" => "3",
476 "BeforeUpdate" => "3",
477 "ButtonClick" => "3",
478 "ButtonCompleted" => "3",
479 "ButtonGotFocus" => "3",
480 "ButtonLostFocus" => "3",
481 "Change" => "3",
482 "ChartActivated" => "3",
483 "ChartSelected" => "3",
484 "ChartUpdated" => "3",
485 "Click" => "3",
486 "ColEdit" => "3",
487 "Collapse" => "3",
488 "ColResize" => "3",
489 "ColumnClick" => "3",
490 "Compare" => "3",
491 "ConfigChageCancelled" => "3",
492 "ConfigChanged" => "3",
493 "ConnectionRequest" => "3",
494 "DataArrival" => "3",
495 "DataChanged" => "3",
496 "DataUpdated" => "3",
497 "DblClick" => "3",
498 "Deactivate" => "3",
499 "DeviceArrival" => "3",
500 "DeviceOtherEvent" => "3",
501 "DeviceQueryRemove" => "3",
502 "DeviceQueryRemoveFailed" => "3",
503 "DeviceRemoveComplete" => "3",
504 "DeviceRemovePending" => "3",
505 "DevModeChange" => "3",
506 "Disconnect" => "3",
507 "DisplayChanged" => "3",
508 "Dissociate" => "3",
509 "DoGetNewFileName" => "3",
510 "Done" => "3",
511 "DonePainting" => "3",
512 "DownClick" => "3",
513 "DragDrop" => "3",
514 "DragOver" => "3",
515 "DropDown" => "3",
516 "EditProperty" => "3",
517 "EnterCell" => "3",
518 "EnterFocus" => "3",
519 "Event" => "4",
520 "ExitFocus" => "3",
521 "Expand" => "3",
522 "FootnoteActivated" => "3",
523 "FootnoteSelected" => "3",
524 "FootnoteUpdated" => "3",
525 "GotFocus" => "3",
526 "HeadClick" => "3",
527 "InfoMessage" => "3",
528 "Initialize" => "3",
529 "IniProperties" => "3",
530 "ItemActivated" => "3",
531 "ItemAdded" => "3",
532 "ItemCheck" => "3",
533 "ItemClick" => "3",
534 "ItemReloaded" => "3",
535 "ItemRemoved" => "3",
536 "ItemRenamed" => "3",
537 "ItemSeletected" => "3",
538 "KeyDown" => "3",
539 "KeyPress" => "3",
540 "KeyUp" => "3",
541 "LeaveCell" => "3",
542 "LegendActivated" => "3",
543 "LegendSelected" => "3",
544 "LegendUpdated" => "3",
545 "LinkClose" => "3",
546 "LinkError" => "3",
547 "LinkNotify" => "3",
548 "LinkOpen" => "3",
549 "Load" => "3",
550 "LostFocus" => "3",
551 "MouseDown" => "3",
552 "MouseMove" => "3",
553 "MouseUp" => "3",
554 "NodeClick" => "3",
555 "ObjectMove" => "3",
556 "OLECompleteDrag" => "3",
557 "OLEDragDrop" => "3",
558 "OLEDragOver" => "3",
559 "OLEGiveFeedback" => "3",
560 "OLESetData" => "3",
561 "OLEStartDrag" => "3",
562 "OnAddNew" => "3",
563 "OnComm" => "3",
564 "Paint" => "3",
565 "PanelClick" => "3",
566 "PanelDblClick" => "3",
567 "PathChange" => "3",
568 "PatternChange" => "3",
569 "PlotActivated" => "3",
570 "PlotSelected" => "3",
571 "PlotUpdated" => "3",
572 "PointActivated" => "3",
573 "PointLabelActivated" => "3",
574 "PointLabelSelected" => "3",
575 "PointLabelUpdated" => "3",
576 "PointSelected" => "3",
577 "PointUpdated" => "3",
578 "PowerQuerySuspend" => "3",
579 "PowerResume" => "3",
580 "PowerStatusChanged" => "3",
581 "PowerSuspend" => "3",
582 "QueryChangeConfig" => "3",
583 "QueryComplete" => "3",
584 "QueryCompleted" => "3",
585 "QueryTimeout" => "3",
586 "QueryUnload" => "3",
587 "ReadProperties" => "3",
588 "Reposition" => "3",
589 "RequestChangeFileName" => "3",
590 "RequestWriteFile" => "3",
591 "Resize" => "3",
592 "ResultsChanged" => "3",
593 "RowColChange" => "3",
594 "RowCurrencyChange" => "3",
595 "RowResize" => "3",
596 "RowStatusChanged" => "3",
597 "SelChange" => "3",
598 "SelectionChanged" => "3",
599 "SendComplete" => "3",
600 "SendProgress" => "3",
601 "SeriesActivated" => "3",
602 "SeriesSelected" => "3",
603 "SeriesUpdated" => "3",
604 "SettingChanged" => "3",
605 "SplitChange" => "3",
606 "StateChanged" => "3",
607 "StatusUpdate" => "3",
608 "SysColorsChanged" => "3",
609 "Terminate" => "3",
610 "TimeChanged" => "3",
611 "TitleActivated" => "3",
612 "TitleSelected" => "3",
613 "UnboundAddData" => "3",
614 "UnboundDeleteRow" => "3",
615 "UnboundGetRelativeBookmark" => "3",
616 "UnboundReadData" => "3",
617 "UnboundWriteData" => "3",
618 "Unload" => "3",
619 "UpClick" => "3",
620 "Updated" => "3",
621 "Validate" => "3",
622 "ValidationError" => "3",
623 "WillAssociate" => "3",
624 "WillChangeData" => "3",
625 "WillDissociate" => "3",
626 "WillExecute" => "3",
627 "WillUpdateRows" => "3",
628 "WithEvents" => "3",
629 "WriteProperties" => "3",
630 "AppActivate" => "4",
631 "Base" => "4",
632 "Beep" => "4",
633 "Call" => "4",
634 "Case" => "4",
635 "ChDir" => "4",
636 "ChDrive" => "4",
637 "Const" => "4",
638 "Declare" => "4",
639 "DefBool" => "4",
640 "DefByte" => "4",
641 "DefCur" => "4",
642 "DefDate" => "4",
643 "DefDbl" => "4",
644 "DefDec" => "4",
645 "DefInt" => "4",
646 "DefLng" => "4",
647 "DefObj" => "4",
648 "DefSng" => "4",
649 "DefStr" => "4",
650 "Deftype" => "4",
651 "DefVar" => "4",
652 "DeleteSetting" => "4",
653 "Dim" => "4",
654 "Do" => "4",
655 "Else" => "4",
656 "ElseIf" => "4",
657 "End" => "4",
658 "Enum" => "4",
659 "Erase" => "4",
660 "Exit" => "4",
661 "Explicit" => "4",
662 "False" => "4",
663 "FileCopy" => "4",
664 "For" => "4",
665 "ForEach" => "4",
666 "Friend" => "4",
667 "Function" => "4",
668 "Get" => "4",
669 "GoSub" => "4",
670 "GoTo" => "4",
671 "Height" => "4",
672 "If" => "4",
673 "Implements" => "4",
674 "Kill" => "4",
675 "Left" => "4",
676 "Let" => "4",
677 "LineInput" => "4",
678 "Lock" => "4",
679 "Loop" => "4",
680 "LSet" => "4",
681 "MkDir" => "4",
682 "Name" => "4",
683 "Next" => "4",
684 "Not" => "4",
685 "OnError" => "4",
686 "On" => "4",
687 "Option" => "4",
688 "Private" => "4",
689 "Property" => "4",
690 "Public" => "4",
691 "Put" => "4",
692 "RaiseEvent" => "4",
693 "Randomize" => "4",
694 "ReDim" => "4",
695 "Rem" => "4",
696 "Reset" => "4",
697 "Resume" => "4",
698 "Return" => "4",
699 "RmDir" => "4",
700 "RSet" => "4",
701 "SavePicture" => "4",
702 "SaveSetting" => "4",
703 "SendKeys" => "4",
704 "SetAttr" => "4",
705 "Static" => "4",
706 "Sub" => "4",
707 "Then" => "4",
708 "Top" => "4",
709 "True" => "4",
710 "Type" => "4",
711 "Unlock" => "4",
712 "Wend" => "4",
713 "While" => "4",
714 "Width" => "4",
715 "With" => "4",
716 "Write" => "4",
717 "&" => "5");
718
719 // Special extensions
720
721 // Each category can specify a PHP function that returns an altered
722 // version of the keyword.
723
724
725
726 $this->linkscripts = array(
727 "1" => "donothing",
728 "2" => "donothing",
729 "3" => "donothing",
730 "4" => "donothing",
731 "5" => "donothing");
732 }
733
734
735
736 public function donothing($keywordin)
737 {
738 return $keywordin;
739 }
740 }
$BEAUT_PATH
$BEAUT_PATH
Definition: HFile_vb.php:3
php
An exception for terminatinating execution or to throw for unit testing.
HFile_vb
Definition: HFile_vb.php:9
HFile_vb\donothing
donothing($keywordin)
Definition: HFile_vb.php:736
HFile_vb\__construct
__construct()
Definition: HFile_vb.php:10