EditPlus的VBS语法高亮

标签: , , ,

VbsEdit固然强大,但是有时我还是喜欢用EditPlus来写VBS。遗憾的是EditPlus自带的VBS语法高亮参杂了一些VB的语法和函数在里面,不够纯粹,于是自己写了一个VBS语法高亮的配置文件。

把《VBS关键字和保留字》、《VBS内置函数大全》和《VBS内置常量大全》结合起来即可,so easy。

打开EditPlus,选择Tools菜单下的Set Directories,open,找到vb.stx,用EditPlus打开,替换为


#TITLE=VBScript
; VBScript syntax file written Demon.
; http://demon.tw

#DELIMITER=,(){}[]-+*%/="'~!&|\<>?:;.#
#QUOTATION1="
#LINECOMMENT='
#LINECOMMENT2=rem
#CASE=n
#AUTOCASE=y
#NUMBER_PATTERN=cpp

#KEYWORD=Reserved Word
And
As
Boolean
ByRef
Byte
ByVal
Call
Case
Class
Const
Currency
Debug
Dim
Do
Double
Each
Else
ElseIf
Empty
End
EndIf
Enum
Eqv
Event
Exit
False
For
Function
Get
Goto
If
Imp
Implements
In
Integer
Is
Let
Like
Long
Loop
LSet
Me
Mod
New
Next
Not
Nothing
Null
On
Option
Optional
Or
ParamArray
Preserve
Private
Public
RaiseEvent
ReDim
Rem
Resume
RSet
Select
Set
Shared
Single
Static
Stop
Sub
Then
To
True
Type
TypeOf
Until
Variant
WEnd
While
With
Xor

#KEYWORD=Build-in Function
CCur
CInt
CLng
CBool
CByte
CDate
CDbl
CSng
CStr
Hex
Oct
VarType
IsDate
IsEmpty
IsNull
IsNumeric
IsArray
IsObject
Atn
Cos
Sin
Tan
Exp
Log
Sqr
Randomize
Rnd
Timer
LBound
UBound
RGB
Len
LenB
Left
LeftB
Right
RightB
Mid
MidB
StrComp
LCase
UCase
LTrim
RTrim
Trim
Space
String
InStr
InStrB
AscB
ChrB
Asc
Chr
AscW
ChrW
Abs
Fix
Int
Sgn
Now
Date
Time
Day
Month
Weekday
Year
Hour
Minute
Second
DateValue
TimeValue
DateSerial
TimeSerial
InputBox
MsgBox
CreateObject
GetObject
DateAdd
DateDiff
DatePart
TypeName
Array
Erase
Filter
Join
Split
Replace
StrReverse
InStrRev
LoadPicture
ScriptEngine
ScriptEngineMajorVersion
ScriptEngineMinorVersion
ScriptEngineBuildVersion
FormatNumber
FormatCurrency
FormatPercent
FormatDateTime
WeekdayName
MonthName
Round
Escape
Unescape
Eval
Execute
ExecuteGlobal
GetRef

#KEYWORD=Build-in Constant
vbUseSystem
vbUseSystemDayOfWeek
vbSunday
vbMonday
vbTuesday
vbWednesday
vbThursday
vbFriday
vbSaturday
vbFirstJan1
vbFirstFourDays
vbFirstFullWeek
vbOKOnly
vbOKCancel
vbAbortRetryIgnore
vbYesNoCancel
vbYesNo
vbRetryCancel
vbCritical
vbQuestion
vbExclamation
vbInformation
vbDefaultButton1
vbDefaultButton2
vbDefaultButton3
vbDefaultButton4
vbApplicationModal
vbSystemModal
vbOK
vbCancel
vbAbort
vbRetry
vbIgnore
vbYes
vbNo
vbEmpty
vbNull
vbInteger
vbLong
vbSingle
vbDouble
vbCurrency
vbDate
vbString
vbObject
vbError
vbBoolean
vbVariant
vbDataObject
vbDecimal
vbByte
vbArray
vbTrue
vbFalse
vbUseDefault
vbBinaryCompare
vbTextCompare
vbDatabaseCompare
vbGeneralDate
vbLongDate
vbShortDate
vbLongTime
vbShortTime
vbObjectError
vbBlack
vbBlue
vbCyan
vbGreen
vbMagenta
vbRed
vbWhite
vbYellow
vbCr
vbCrLf
vbNewLine
vbFormFeed
vbLf
vbNullChar
vbNullString
vbTab
vbVerticalTab
vbMsgBoxHelpButton
VbMsgBoxSetForeground
vbMsgBoxRight
vbMsgBoxRtlReading

#keyword=Built-in Object
Err

#keyword=Regexp Class
Regexp

随机文章:

  1. 从Win32程序的主函数WinMain中获取命令行参数
  2. 人人网状态及评论导出工具
  3. 用VBS精确计算100的阶乘
  4. 用bbPress搭建了一个VBS论坛
  5. getElementsByName的用法

留下回复