随心笔谈
随心记录网事-锻炼心境-记录过往事迹
vbs-toolkit VBSEdit 提供 免费的COM组件（vbs1）速看
VBSCRIPT 语法简单 强大 但是功能上明显不足 需要第三方的控制 e.g. COM 组件来扩展其功能. VBSEDIT 安装完之后就可以在安装目录下发现 免费提供的...
vbs 读写注册表之系统启动项添加与删除（vb读写注册表）速看
'变量定义 Dim writeName,writeValue,fileName,regLoaction,regApp '创建注册表编辑器对象 Set regApp=WScript.CreateOb...
vbs 自制数字益智游戏实现代码（用vb设计一个猜数字游戏软件叫什么）快来看
Dim game(3,2),i,j,result,num '定义二维数组 二维长度3, 一维长度2 Dim fso ,ws,f ,logFileWrite,logFileRead, fileStr,flag,flagFailNum...
VBS 脚本中的字典、动态数组、队列和堆栈实现代码（vbs dictionary）学会了吗
1.编写环境 今天突发奇想下载了个gVim来写VBS脚本，我用的版本是7.4的 在写脚本前，需要在gVim的安装根目录下，找到文件“_vimrc”...
VBS 批量Ping的项目实现（vb word批量编辑）深度揭秘
'判断当前VBS脚本是否由CScript执行 If InStr(LCase(WScript.FullName), 'cscript.exe')=0 Then ?'若不是由CScript执行，则使用CScript重新...
vbs 复制指定文件到指定目录下（vb文本复制怎么编程）奔走相告
Set fso=CreateObject('Scripting.filesystemobject') Function CopyFileToPath() SrcPATH=createobject('Scripting.FileSystemOb...
vbs ping实现的两种方式（vbs简单命令）真没想到
'url='www.baidu.com' url='119.75.217.109' strComputer='.' Set objWMIService=GetObject('winmgmts:{impersonationLev...
VBA解决Windows空当接龙的617局（win10空当接龙11982破解步骤）不要告诉别人
Declare Function FindWindow Lib 'user32' Alias _ 'FindWindowA' (ByVal lpClassName As String, ByVal lpWindowName As String) As Lon...
VBA工程加密PJ方式(两种)
Option Explicit Private Declare Sub MoveMemory Lib 'kernel32' Alias 'RtlMoveMemory' (Destination As Long, Source As Long, ByVal L...
VBA将excel数据表生成JSON文件（vba能生成exe文件吗）快来看
Sub ToJson() '创建UTF8文本文件 myrange=Worksheets('sheet1').UsedRange '通过有效数据区来选择数据 'myrange=ActiveWorkbook.N...