當前位置:首頁 » 編程軟體 » vb腳本

vb腳本

發布時間: 2022-01-08 17:47:28

㈠ 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="">&nbsp;&nbsp;<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
可以被指定 最好就是綁定他的硬碟序列號啦
如果限制時間還要有個網路校時功能 不然他該系統時間就可以用啦 ,網路時間可以從任意網站獲得

熱點內容
ubuntu交叉編譯鏈 發布:2024-09-21 00:39:36 瀏覽:13
優酷緩存視頻導出 發布:2024-09-21 00:31:37 瀏覽:873
有線電視的二級密碼是多少 發布:2024-09-21 00:31:28 瀏覽:778
安卓i管家在哪裡 發布:2024-09-21 00:29:05 瀏覽:691
伺服器推薦我的世界手機版中國版 發布:2024-09-21 00:26:00 瀏覽:270
java是如何藉助jvm編譯的 發布:2024-09-21 00:18:09 瀏覽:957
php日期大小 發布:2024-09-21 00:00:51 瀏覽:359
js編程技術 發布:2024-09-20 23:57:57 瀏覽:487
挖槽的編程 發布:2024-09-20 23:52:53 瀏覽:251
linux命令行安裝 發布:2024-09-20 23:42:38 瀏覽:282