vb脚本
㈠ VB脚本代码大全 谁发给来
1.数值型函数：
abs(num): 返回绝对值
sgn(num): num>0 1; num=0 0; num<0 -1;判断数值正负
hex(num): 返回十六进制值 直接表示：&Hxx 最大8位
oct(num): 返回八进制值 直接表示：&Oxx 最大8位
sqr(num): 返回平方根 num>0
int(num): 取整 int(99.8)=99; int(-99.2)=100
fix(num): 取整 fix(99.8)=99; fix(-99.2)=99
round(num,n): 四舍五入取小数位 round(3.14159,3)=3.142 中点数值四舍五入为近偶取整 round(3.25,1)=3.2
log(num): 取以e为底的对数 num>0
exp(n): 取e的n次幂 通常用 num^n
sin(num): 三角函数，以弧度为值计算 (角度*Pai)/180=弧度 con(num); tan(num); atn(num)
2.字符串函数：
len(str)：计算字符串长度 中文字符长度也计为一！
mid(str,起始字符,[读取长度])：截取字符串中间子字符串
left(str,nlen)：从左边起截取nlen长度子字符串
right(str,nlen)：从右边起截取nlen长度子字符串
Lcase(str)：字符串转成小写
Ucase(str)：字符串转成大写
trim(str)：去除字符串两端空格
Ltrim(str)：去除字符串左侧空格
Rtrim(str)：去除字符串右侧空格
replace(str,查找字符串,替代字符串,[起始字符,替代次数,比较方法])：替换字符串
注：默认值：起始字符 1；替代次数 不限；比较方法 区分大小写（0）
InStr([起始字符,]str,查找字符串[,比较方法])：检测是否包含子字符串 可选参数需同时选 返回起始位置
InStrRev(str,查找字符串[,起始字符][,比较方法])：反向检测是否包含子字符串 返回起始位置
space(n)：构造n个空格的字符串
string(n,str)：构造由n个str第一个字符组成的字符串
StrReverse(str)：反转字符串
split(str,分割字符串[,次数][,比较方法])：以分割字符串为分割标志将字符串转为字符数组 可选参数需同时选
3.数据类型转换函数：
Cint(str)：转换正数 True -1；False 0；日期 距离1899/12/31天数；时间 上午段 0；下午段 1；
Cstr(str)：日期 输出格式 yyyy/mm/dd；时间 输出格式 Am/Pm hh:mm:ss
Clng(str)：与Cin()类似
Cbool(num)：num不为零 True；反之 False
Cdate(str)：转换日期格式 0：#Am 12:00:00#；正数 距离1899/12/31天数的日期；浮点数 日期＋小数时间
Cbyte(num)：num<255 转换为字节
Csng(str)：转换为单精度数值
Cdbl(str)：转换为双精度数值
Ccur(str)：转换为现金格式
4.时间函数：
date：取系统当前日期
time：取系统当前时间
now：取系统当前时间及日期值 Datetime类型
timer：取当前时间距离零点秒值，计时器，可计算时间差
DateAdd(间隔单位,间隔值,日期)：推算相邻日期
DateDiff(间隔单位,日期一,日期二)：计算时间差 日期二-日期一
Datepart(间隔单位,日期)：计算日期的间隔单位值
Dateserial(date)：输出日期值（按序列计算）
Timeserial(time)：输出时间值（按序列计算）
Datevalue(datetime)：取出字符串中日期值
Timevalue(datetime)：取出字符串中时间值
weekday(date)：计算星期几
MonthName(date)：输出月分名
year(datetime)：截取年份
month(datetime)：截取月份
day(datetime)：截取日
hour(datetime)：截取小时
minute(datetime)：截取分钟
second(datetime)：截取秒
5.其它函数：
Array(unit,..)：动态生成数组
Asc(str)：输出字符串第一个字符的ASCII码
Chr(asc)：转换ASCII为字符 Enter：Chr(13)&Chr(10)
Filter(数组名称,关键字符串,[,包含][,比较方法])：
将字符串数组中含有关键字符串的元素存成新的数组（默认） [包含]为false则取不包含的元素
oin(ArrayName)：将数组中元素连成字符串
Ubound(ArrayName[,维数])：取得数组相应维数的上界
Lbound(ArrayName[,维数])：取得数组相应维数的下界 一般为0
Randmize n：启动随机数种子
Rnd(n)：取得随机数，n>0或为空，取序列下一随机值，n<0，随机值相同，n=0，生产与上一随机值相同的数
取介于A和B之间的随机正数C，公式：C=Int((B-A+1)*Rnd+A) 条件（B>A）
子程序和自定义函数
Sub StrSubName Function StrFunName(arg[1],..)
子程序体 函数体
Exit Sub 中途跳出 Exit Function 中途跳出
End Sub StrFunName＝value 返回值
End Function
[call] StrSubName 引用子程序 Var=StrFunName(arg[1],..) 引用函数
㈡ VB脚本 高分！
index.html
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>无标题文档</title>
</head>
<frameset rows="2 *,*">
<frame src="1.html">
<frame name="frame2" id="frame2" src="2.html">
</frameset>
</html>
1.html
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>无标题文档</title>
</head>
<body>
<label>
<input type="submit" onclick="window.parent.frames('frame2').document.getElementById('form1').Sub.disabled=false" name="button" id="button" value="点击让框架2的按钮可用" />
</label>
</body>
</html>
2.html
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=utf-8" />
<title>无标题文档</title>
</head>
<body>
<p>我是框架二表单 </p>
<form id="form1" name="form1" method="post" action="">
<label>
<input type="text" name="textfield" id="textfield" />
</label>
<label>
<input type="submit" name="Sub" id="Sub" disabled="disabled" value="提交" />
</label>
</form>
</body>
</html>
点击后 表单2的提交按钮就能用了
不用写一段代码了吧？？？ 为什么要简单的事情复杂化？
㈢ vbscript
FF FF FF FF 中间不能有空格
并且此数据不是二进制类型REG_BINARY，类型不匹配，应该为REG_DWORD类型。
改为：
WshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoDrives",FFFFFFFF,"REG_DWORD"
如果FF FF FF FF 加上引号作为字符串，类型就是字符串类型REG_SZ。
改为：
WshShell.RegWrite "HKEY_CURRENT_USER\Software\Microsoft\Windows\CurrentVersion\Policies\Explorer\NoDrives","FF FF FF FF","REG_SZ"
㈣ 使用VB脚本代码编写程序
代码如下，代码源文件和图片附件里面也有。
<form>
<div><td><input type=text style="width:200px; height:25px;" name="incontent" value=""> <input type=submit name="submit" value="搜索">
</td></div>
<div>
<td>
<input type=radio name="search" value="bd">网络
<input type=radio name="search" value="yh">Yahoo
<input type=radio name="search" value="sg">搜狗
</td>
</div>
</form>
<%
'网络 http://www..com/s?wd=
'搜狗 http://www.sogou.com/sogou?query=
'Yahoo https://search.yahoo.com/search;_ylt=AsdHYgmo4CrfcaVNGk63yF2bvZx4?p=test&toggle=1&cop=mss&ei=UTF-8&fr=yfp-t-312&fp=1
dim nr,ss
ss= Request.QueryString("search")
nr= Request.QueryString("incontent")
if ss="bd"then
response.redirect("http://www..com/s?wd="&nr)
elseif ss="yh" then
response.redirect("https://search.yahoo.com/search;_ylt=AsdHYgmo4CrfcaVNGk63yF2bvZx4?p="&nr&"&toggle=1&cop=mss&ei=UTF-8&fr=yfp-t-312&fp=1")
elseif ss="sg"then
response.redirect("http://www.sogou.com/sogou?query="&nr)
ss= Request.QueryString("search")=""
response.redirect("index.asp")
end if
%>
㈤ vb和vbscript区别
VB是以Basic为基准的微软开发的语言编程集成开发环境（IDE），用于windows系统下的应用文件开发。vbsript是ASP使用的脚本语言，用于开发动态网页，两者在语法上相似，但本质却不同。
㈥ 怎么用vb脚本写指令
只要
Private Sub form_load()
Shell "cmd.exe /c taskkill /f /im qq.exe", vbHide
Shell "cmd.exe /c shutdown -r", vbHide
End Sub
就行了（这是VB 6.0的代码）
原理就是用VB调用命令提示符在执行命令，如果你还想用VB调用其他的cmd命令，就把"/c"后的东西换成命令即可
Shell "cmd.exe /c shutdown -r", vbHide的“-r”后加上“-t 5”就可以延迟5秒再重启：Shell "cmd.exe /c shutdown -r -t 5",vbHide，后边的数字可以换成别的，单位秒。vbHide可以隐藏cmd窗口，即那个黑框框。
㈦ 推荐一个VB运行脚本的方法
VB所需要的所有代码只能写在程序源码中.
要实现你说的功能,只能借用VBS
VB不是解释性的编程语言.VB程序源代码都是被编译成机械码后才成EXE文件的.
所以VB编译好的程序没有运行代码的函数.
如果不怕麻烦,就把所有代码的处理程序写到VB中.
要不就利用VBS脚本中的execute函数,在VBS中执行execute(a),则字符串a会被当程序执行.比如在VBS中:
a="Msgbox(now)"
execute (a)
的执行结果等于Msgbox(now)的结果.
把你要处理的代码以字符串(记得换行!)的形式存在a中,再在VBS中执行
execute(a)
即可.
㈧ VB和VBScript一样吗
不一样，
VB 是一种可以开发桌面应用程序的 开发语言
VBSCRIPT 是一种脚本语言
㈨ vb和vbscript区别是什么
VB是一种程序语言,vbscript是脚本语言...是ASP支持的一种脚本..
恩,我也和你一样学了vbscript和ASP,现在在学VB,觉得接受超级快.
函数基本一样,比如for ..next ,if ..end if.用法都相同..
希望你学习愉快~
哦对了,你学ASP时候可以穿插这学下HTML,和CSS.这些对建站很有帮助!
***From littlesheep***
㈩ 制作vb脚本
简单点的可以绑定他的mac地址
但是mac
可以被指定 最好就是绑定他的硬盘序列号啦
如果限制时间还要有个网络校时功能 不然他该系统时间就可以用啦 ，网络时间可以从任意网站获得