level 1
ihitu
楼主
VBScript脚本扩展 for Notepad++
VBS插件扩展下载地址
百度网盘
该插件可使用VBS扩展Notepad++的强大功能,让Notepad++实现更多复杂实用的功能
-------------------------------------------------------------------------------------------------
内置对象 Notepad
'方法 清空文本
Notepad.Clear
'方法 新增一行
Notepad.AddLine "这是一行信息"
'读写属性 设置或读取当前编辑区文字
Notepad.Text
示例:
msgbox Notepad.Text
Notepad.Text="Good"
'只读属性 获取当前编辑区行数
Notepad.LineCount
示例:
msgbox "一共有" & Notepad.LineCount & "行"
'方法 设置编辑区内某一行的文字
Notepad.SetLine LineNO,LineText
示例:
dim Line
for Line=1 to 10
Notepad.SetLine Line,"第" & Line & "行"
next
'函数 获取编辑区内某一行的文字
Notepad.GetLine(LineNO)
示例:
dim Line
for Line=1 to 10
msgbox "第" & Line & "信息为:" & Notepad.GetLine(Line)
next
'读写属性 获取选择的文本或把选择的文本替换成想要的文字
Notepad.SelectText
示例:
msgbox "当前选择的文本是" & Notepad.SelectText
Notepad.SelectText="替换选择的文本"
'只读属性 获取当前选择的文字个数
Notepad.SelectLength
示例:
if Notepad.SelectLength>0 then
msgbox "当前选择的文本是" & Notepad.SelectText
else
msgbox "选择没有选择的文本"
end if
'只读属性 获取当前编辑的文件名
Notepad.FileName
'只读属性 获取当前编辑的文件所在目录
Notepad.FileDir
'只读属性 获取当前编辑的文件扩展名
Notepad.FileExt
示例:
msgbox Notepad.FileName
msgbox Notepad.FileDir
msgbox Notepad.FileExt
'方法 删除一行文字
Notepad.DeleteLine LineNO
示例:
msgbox "正在将要删除第3行文字"
Notepad.DeleteLine 3
-------------------------------------------------------------------------------------------------
内置对象 Debug
debug.clear'清空调试窗口
debug.BackColor=&H000000'设置调试窗口背景色
debug.FontColor=&HFFFF00'设置调试窗口文字景色
debug.FontSize=12'设置调试窗口文字大小
for i=1 to 250
debug.print i'输出调试信息
next
debug.BackColor=&H000000
debug.FontColor=&HFF00FF
debug.FontSize=13
for i=1 to 250
debug.print i
next
'debug.close 隐藏调试窗口
-------------------------------------------------------------------------------------------------
内置对象 VBS
VBS.Sleep 1000 '延时1000毫秒
set Wrap=VBS.CreateAPI'创建著名的DynamicWrapper对象 等价于下面写法
Set Wrap = CreateObject("DynamicWrapper")'创建著名的DynamicWrapper对象
其它内置方法如下.........
2015年08月18日 05点08分
1
VBS插件扩展下载地址
百度网盘

该插件可使用VBS扩展Notepad++的强大功能,让Notepad++实现更多复杂实用的功能-------------------------------------------------------------------------------------------------
内置对象 Notepad
'方法 清空文本
Notepad.Clear
'方法 新增一行
Notepad.AddLine "这是一行信息"
'读写属性 设置或读取当前编辑区文字
Notepad.Text
示例:
msgbox Notepad.Text
Notepad.Text="Good"
'只读属性 获取当前编辑区行数
Notepad.LineCount
示例:
msgbox "一共有" & Notepad.LineCount & "行"
'方法 设置编辑区内某一行的文字
Notepad.SetLine LineNO,LineText
示例:
dim Line
for Line=1 to 10
Notepad.SetLine Line,"第" & Line & "行"
next
'函数 获取编辑区内某一行的文字
Notepad.GetLine(LineNO)
示例:
dim Line
for Line=1 to 10
msgbox "第" & Line & "信息为:" & Notepad.GetLine(Line)
next
'读写属性 获取选择的文本或把选择的文本替换成想要的文字
Notepad.SelectText
示例:
msgbox "当前选择的文本是" & Notepad.SelectText
Notepad.SelectText="替换选择的文本"
'只读属性 获取当前选择的文字个数
Notepad.SelectLength
示例:
if Notepad.SelectLength>0 then
msgbox "当前选择的文本是" & Notepad.SelectText
else
msgbox "选择没有选择的文本"
end if
'只读属性 获取当前编辑的文件名
Notepad.FileName
'只读属性 获取当前编辑的文件所在目录
Notepad.FileDir
'只读属性 获取当前编辑的文件扩展名
Notepad.FileExt
示例:
msgbox Notepad.FileName
msgbox Notepad.FileDir
msgbox Notepad.FileExt
'方法 删除一行文字
Notepad.DeleteLine LineNO
示例:
msgbox "正在将要删除第3行文字"
Notepad.DeleteLine 3
-------------------------------------------------------------------------------------------------
内置对象 Debug
debug.clear'清空调试窗口
debug.BackColor=&H000000'设置调试窗口背景色
debug.FontColor=&HFFFF00'设置调试窗口文字景色
debug.FontSize=12'设置调试窗口文字大小
for i=1 to 250
debug.print i'输出调试信息
next
debug.BackColor=&H000000
debug.FontColor=&HFF00FF
debug.FontSize=13
for i=1 to 250
debug.print i
next
'debug.close 隐藏调试窗口
-------------------------------------------------------------------------------------------------
内置对象 VBS
VBS.Sleep 1000 '延时1000毫秒
set Wrap=VBS.CreateAPI'创建著名的DynamicWrapper对象 等价于下面写法
Set Wrap = CreateObject("DynamicWrapper")'创建著名的DynamicWrapper对象
其它内置方法如下.........