龙空技术网

一段精彩的VBS小代码

宇宙辩证法 50

前言:

今天看官们对“vbs运行文件代码”大概比较重视,大家都需要知道一些“vbs运行文件代码”的相关文章。那么小编同时在网络上网罗了一些关于“vbs运行文件代码””的相关资讯,希望小伙伴们能喜欢,我们快快来了解一下吧!

一、代码:

set a=createobject("scripting.dictionary")

a.add "A",1+1

a.add "B",now()

a.add "C",rnd

a.add "D","I love you."

a.add "E",chr(41420)

set b=createobject("scripting.filesystemobject")

c="c:\users\administrator\desktop\1.txt"

set d=b.createtextfile(c,0)

i=0

do

d.writeline a(chr(65+i)) & " "

i=i+1

loop while i<5

二、代码注释:

本代码涉及三个知识点:

1、字典知识:字典含两方面的内容,关键字key,条目item;

2、创建文本文件;

3、使用do-loop循环。

三、程序文件图片及运行图片:

将源程序保存为:11.vbs;再双击11.vbs,得到1.txt文件

打开1.txt文件

标签: #vbs运行文件代码