A concise dictionary generator written in vbs

Time:2020-11-18

How to use it ‘ use:cscript   this.vbs  >  dic.txt  
Save the following code as this.vbs  

Copy codeThe code is as follows:
a=Array(1,2,3,4,”a”) 
Function js1(n) 
for i=1 to n 
f=f&”f”&i&”&” 
s=s&”For Each f”&i &” In a :wscript.echo “& f 
s=Mid(S,1,Len(S)-1)&”:” 
Next 
js1=s 
End Function 

Function js2(n) 
for i=1 to n 
m=m & “Next” & “:” 
Next 
js2=m 
End Function 

lcx= js1(UBound(a)+1)&js2(UBound(a)+1) 
lcx=Mid(lcx,1,Len(lcx)-1) 
b=”a=Array(1,2,3,4,””a””):”&lcx 

Execute b 

Recommended Today

Regular expression sharing for checking primes

This regular expression is shown as follows: Regular expressions for checking prime numbers or not To use this positive regular expression, you need to convert the natural number into multiple 1 strings. For example, 2 should be written as “11”, 3 should be written as “111”, 17 should be written as “11111111111”. This kind of […]