佳木斯湛栽影视文化发展公司
主頁(yè) > 知識(shí)庫(kù) > 用vbs產(chǎn)生的若干個(gè)隨機(jī)數(shù)并寫入到一個(gè).txt中的代碼

用vbs產(chǎn)生的若干個(gè)隨機(jī)數(shù)并寫入到一個(gè).txt中的代碼
熱門標(biāo)簽：銀行業(yè)務(wù) 智能手機(jī) 服務(wù)器配置 網(wǎng)站文章發(fā)布 美圖手機(jī) 檢查注冊(cè)表項(xiàng) 鐵路電話系統(tǒng) 呼叫中心市場(chǎng)需求
復(fù)制代碼 代碼如下:

Set a=WScript.CreateObject("WScript.Shell")
a.Run "notepad"
'打開(kāi)記事本
do
Randomize
x= Int((40 * Rnd) + 1)
'產(chǎn)生一個(gè)1~40的隨機(jī)數(shù)賦給X
WScript.Sleep 1000
a.SendKeys x","
'模擬鍵盤，輸出x
n=n+1 '累計(jì)器
if n=10 then wscript.quit '若累計(jì)器N為10則推出腳本
loop
'保存成VBS可以看到結(jié)果
您可能感興趣的文章:
  • VBS合并一個(gè)文件夾里的TXT的實(shí)現(xiàn)代碼
  • vbs解決處理TXT文本數(shù)據(jù)相關(guān)問(wèn)題實(shí)現(xiàn)代碼
  • VBS實(shí)現(xiàn)將Excel表格保存為txt文本
  • TXT轉(zhuǎn)HTM、HTML「TXT轉(zhuǎn)網(wǎng)頁(yè)」的vbs實(shí)現(xiàn)代碼
  • 將HTML或txt文件轉(zhuǎn)換為ASP輸出的vbs代碼
  • 用VBS將一篇txt后綴的內(nèi)容保存為html格式
  • vbs實(shí)現(xiàn)的支持拖動(dòng)的txt文本切割器
  • vbs操作txt文本文件常用方法與函數(shù)代碼

標(biāo)簽：滄州 紅河 沈陽(yáng) 上海 河南 新疆 樂(lè)山 長(zhǎng)治

巨人網(wǎng)絡(luò)通訊聲明：本文標(biāo)題《用vbs產(chǎn)生的若干個(gè)隨機(jī)數(shù)并寫入到一個(gè).txt中的代碼》，本文關(guān)鍵詞  ；如發(fā)現(xiàn)本文內(nèi)容存在版權(quán)問(wèn)題，煩請(qǐng)?zhí)峁┫嚓P(guān)信息告之我們，我們將及時(shí)溝通與處理。本站內(nèi)容系統(tǒng)采集于網(wǎng)絡(luò)，涉及言論、版權(quán)與本站無(wú)關(guān)。
  • 相關(guān)文章
  • 收縮
    • 微信客服
    • 微信二維碼

    • 電話咨詢

    • 400-1100-266
    丹江口市| 独山县| 正蓝旗| 巫溪县| 玛纳斯县| 北京市| 延安市| 瑞丽市| 长寿区| 衡南县| 饶阳县| 新乡县| 尉氏县| 临西县| 龙泉市| 江城| 额济纳旗| 会宁县| 繁昌县| 湘阴县| 龙里县| 九江市| 绩溪县| 襄樊市| 永顺县| 东阿县| 淮北市| 乐山市| 鲁山县| 诸城市| 滁州市| 武强县| 建水县| 定南县| 黄陵县| 醴陵市| 屏东县| 历史| 印江| 侯马市| 塘沽区|