代码搜索：VbScript
找到约 10,000 项符合「VbScript」的源代码
代码结果 10,000
www.eeworm.com/read/161759/10379761
htm index3.htm
dim i,x,j,s,a
x=inputbox("请输入一个数","求质数")
if x>1000 or x="" or x
www.eeworm.com/read/245112/12820405
htm 5_13.htm
验证哥德巴赫猜想
Sub Prime(m, f)
f = True
If m > 3 Then
For i = 3 To Sqr(m)
If m Mod i = 0 The
www.eeworm.com/read/245112/12820413
htm lx5_3.htm
验证哥德巴赫猜想
Function Prime(m)
f = True
If m > 3 Then
For i = 3 To Sqr(m)
If m Mod i = 0 T
www.eeworm.com/read/251763/12321546
htm 例3-10.htm
dim i
i=hour(time())
if i>=0 and i=6 and i=8 and i
www.eeworm.com/read/128708/14280910
mac simple2.mac
MsgBox "Hello world!",vbInformation,"Script Control - VBScript"