บทช่วยสอน VBS - พื้นฐาน: 5 ขั้นตอน

2024 ผู้เขียน: John Day | [email protected]. แก้ไขล่าสุด: 2024-01-30 13:09

ตกลงมีคนถามฉันว่าฉันเรียนรู้ vbs ของฉันจากที่ไหน.. ฉันเรียนรู้จากเว็บไซต์ต่าง ๆ เช่น w3schools แม้รู้ว่าสำหรับการเขียนสคริปต์เว็บคุณยังคงสามารถใช้งานได้จาก vbs ธรรมดา ฉันเรียนรู้จากเว็บไซต์ที่คุณ' ll เรียนรู้จากฉัน =DSo มาเริ่มกันเลย … vbs คืออะไร?VBScript เป็นภาษาสคริปต์ของ Microsoft -_- ดังนั้นการเป็น Microsoft พวกเขาจึงสร้างมันขึ้นมาเพื่อให้ใช้งานได้บน IE เท่านั้น แต่ก็เป็นเว็บสคริปต์ที่ใช้ได้ทุกอย่าง …เช่นในรูปที่ 2) (นั่นคือรูปที่สอง) ที่นำมาจากโฟลเดอร์ System 32 Vbs สามารถใช้เพื่อสร้างโปรแกรม.. แต่นั่นคือ VB. NET.. ใช้การเข้ารหัสเดียวกันเกือบทั้งหมด โปรดสนุกกับการกวดวิชา.. และโปรดแสดงความคิดเห็นและให้คะแนน และโปรดบอกฉันถ้ามีคนให้หัวผักกาดให้ฉันทำ vbs กวดวิชา.. แต่ฉันหามันไม่เจอ นอกจาก cammel8 ที่ดูเหมือนจะเก่งมากกับสคริปต์ vbs =P.. แต่ฉันยังคงทำบทแนะนำอยู่

ขั้นตอนที่ 1: พื้นฐานของ Vbs

ตกลง นี่คือพื้นฐาน.. สิ่งที่คุณควรรู้อยู่แล้ว …คุณบันทึกไฟล์เป็น: something.vbs มันไม่เหมือนกับไฟล์แบตช์ มันไม่มีหน้าจอบอกข้อมูลคุณ มันเหมือนกับจาวาสคริปต์มาก แต่ในขณะเดียวกัน มันไม่เหมือนเดิมเลย ในการสร้าง var ที่คุณใช้ dime.g.. dim iRulenow คุณจะต้องเรียกตัวแปร iRulenow คุณสามารถเริ่มเพิ่มสิ่งต่าง ๆ ให้กับคุณได้ vars.. like:iRule=msgbox("hello") นี่จะทำให้กล่องข้อความปรากฏขึ้นทักทาย (รูปที่ 1) นอกจากนั้น คุณสามารถเพิ่มปุ่มต่างๆ ลงในกล่องข้อความ.. นี่คือทั้งหมดเกี่ยวกับกล่องข้อความ: ที่นี่มีบทช่วยสอนมากมายที่ฉันจะไม่แม้แต่จะสนใจด้วยซ้ำ นอกจากนี้ vars คุณสามารถหรี่ vars ได้ array:dim iRule(3)แต่จะกลายเป็นดังนี้: (เพราะรวม 0)iRule(0)="var1"iRule(1)="var2"iRule(2)="var3"iRule(3) ="var4"การใช้ vars ในสคริปต์..คุณสามารถใช้ vars ได้อย่างง่ายดาย..คุณสามารถมี: (รูปที่ 2)

dim iRuledim InstrucablesiRule="instructables"instructables=msgbox("hello" & iRule) เนื่องจากการ & มันบอกว่า 'hello Instrucables' เพราะค่าของ iRule นั้นสามารถสั่งสอนได้ Subs คุณสามารถมี subs ได้: ย่อยเป็นขั้นตอนที่ไม่ได้ให้ a return value. Sub iRule(arg1, arg2, arg3)…Script…End SubThe arg 1, 2, 3 are the Arguments.ที่เกี่ยวกับพื้นฐานทั้งหมด.. สนุกกับมัน.. หรืออ่านต่อไปสำหรับพื้นฐานที่ไม่มาก..

ขั้นตอนที่ 2: ไม่ใช่พื้นฐานของVbs

ฉันจะเริ่มขั้นตอนนี้ด้วย Functions… เพราะฉันมักจะพบว่ามันน่ารำคาญ.. แม้ว่ามันจะค่อนข้างง่าย =Pfunctions ใน vbs นั้นง่าย.. ish.. พวกมันอาจสร้างความสับสนได้.. มาเริ่มด้วยฟังก์ชันง่าย ๆ กันเถอะ: (รูปที่ 1)

เวลาทำงาน (x, y) ครั้ง = x * yEnd FunctionDim ผลdim var1result = ครั้ง (10, 10)var1=msgbox(ผลลัพธ์) สิ่งนี้จะทำให้คุณ 100 ให้ฉันอธิบาย …. คุณบอกเป็นครั้งที่ 10 โดย 10..result = เวลา (10, 10) ไปที่ฟังก์ชัน timesx คือตอนนี้ 10 และ y คือตอนนี้ 10so: x * y ส่งคืนค่าพร้อม answer. For, Next, Do, LoopThe For, Next loop สามารถใช้เพื่อทำซ้ำสิ่งต่าง ๆ เช่น:for var = 0 ถึง 5 msgbox(var)nextmsgbox("Finish")นี่จะแสดงกล่องข้อความที่นับ 0, 1, 2, 3, 4, 5 จากนั้นจะขึ้นว่า 'Finish'REMEMBER ใน vbs 0 นับเกือบทุกครั้ง! ดังนั้น รหัสนั้นจะทำซ้ำคำสั่ง 6 ครั้งเช่น:for var = 0 ถึง 5 msgbox("hello") nextmsgbox("Finish") ข้อความ 'hello' จะปรากฏขึ้น 6 ครั้ง ในครั้งที่ 7 มันจะขึ้นว่า Finish. If you add: step … to end of for var = 0 to 5 eg for var = 0 to 5 step 5 that will make it jump 5 each.. ในกรณีนี้ข้อความจะเท่านั้น แสดงสองครั้งเพราะ 5 คือขีด จำกัด คุณสามารถก้าวลงได้เช่นกัน.. เช่น ขั้นตอนที่ -5 จะนับถอยหลัง 5 ในแต่ละครั้ง ทำ Loopthe do loop ใช้เพื่อวนซ้ำโค้ดซ้ำแล้วซ้ำอีก ect ส่วนใหญ่ใช้สำหรับไวรัส =Pแต่คุณสามารถใช้มันเพื่อช่วยคุณ.. พูดว่าถ้าคุณต้องการให้พูดข้อความต่อไปจนกว่าจะเลือกตัวเลือกบางอย่าง คุณสามารถเพิ่ม จนถึง ในส่วน do หรือ ของลูปได้เสมอ egdo จนถึง var=5แต่ในโค้ด คุณต้องทำให้มันเพิ่ม 1 ตัวขึ้นไปใน var.. มิฉะนั้น มันจะวนซ้ำ คุณสามารถใช้ do จากสิ่งเช่น: do while var=10this จะทำคำสั่งได้ก็ต่อเมื่อ var เท่ากับ 10! นั่นคือทั้งหมดสำหรับ Not So Basics ของ vbs

ขั้นตอนที่ 3: The If's and Then's

วิทยานิพนธ์ค่อนข้างง่ายที่จะได้รับ แต่ฉันตัดสินใจว่าพวกเขาต้องการหน้าในกรณีที่มีคนไม่รู้ว่าพวกเขาทำอะไร แต่จริงๆแล้วมันง่ายมาก: e-g.webp

the else และ elseif สิ่งเหล่านี้ก็ไม่ยากเช่นกัน..the else มีไว้สำหรับเมื่อคุณต้องการตัวเลือกหนึ่งสำหรับสิ่งหนึ่งและอีกตัวเลือกหนึ่งสำหรับส่วนที่เหลือ.. e-g.webp

ขั้นตอนที่ 4: กรณีของ

เคสเรียบง่ายและทำให้ชีวิตคุณง่ายขึ้นมาก.. e.g กรณีง่าย ๆ:

Dim FavCol FavCol = "red" Select Case FavCol Case "Black"msgbox("your Fav Color is Black") Case "red"msgbox("your Fav Color is Red") กรณี "สีเหลือง"msgbox("สีที่ชอบของคุณคือ สีเหลือง ") Case Elsemsgbox("ตอนนี้คุณแค่สับสน") End Select สคริปต์ง่าย ๆ นี้จะเลือกตัวเลือกจากรายการในกรณีนี้จะบอกคุณว่าสีโปรดของคุณคือสีแดง ให้ฉันเข้าไปดูรายละเอียดเพิ่มเติมอีกเล็กน้อย … คุณได้รับ var ของคุณ: Dim var, var="iRule" var สามารถ quel อะไรก็ได้จากนั้นคุณขอให้ vbs ดูผ่านรายการเพื่อค้นหา var ของคุณ … หากหาไม่พบมันจะไปที่: Case Else ซึ่งเหมือนกับคำสั่ง if, else หากพบ var ของคุณมันจะดำเนินการ

ขั้นตอนที่ 5: ผ่าน Vars

หากคุณมองไปรอบๆ บนอินเทอร์เน็ต คุณจะพบว่ามีคนจำนวนมากที่ต้องการทราบวิธีส่ง vars ระหว่าง batch to vbs และ vbs to batch…ฉันจะแสดงวิธีที่ดีที่สุดที่ฉันพบ:เนื่องจากนี่คือการสอน vbs ฉัน' จะแสดงวิธีถ่ายโอน vars จาก vbs ไปยังแบตช์ก่อน …VBS TO BATCHนี่คือ vbs:

dim aa=InputBox("Type in somthing:", "Var")dim WshShellset WshShell=Wscript. Createobject("Wscript.shell")wshshell.run "test.bat " & aThis จะขอให้คุณพิมพ์ var จากนั้น จะเรียก test.bat ผ่าน var ที่คุณพิมพ์ลงไป = สิ่งที่คุณพิมพ์เข้าไป นี่คือ batch:@echo offecho %1pauseexitthis จะเขียน var ที่คุณพิมพ์ลงใน vbs.. Simple…สำหรับ var หลายตัว เพียงแค่เพิ่ม:the vbs: wshshell.run "test.bat " & a & b & var3 ect.. อย่าลืมตั้งค่าให้กับแบตช์: echo %1 %2 %3 ect.. BATCH TO VBSthe batch:@echo offset var=hellowscript test vbs %var%this จะส่ง 'hello' ไปยัง test.vbsthe vbs:dim ArgObj, aSet fso = CreateObject("Scripting. FileSystemObject")Set ArgObj = WScript. Arguments a = ArgObj(0)msgbox(a) ซึ่งจะแสดง ' สวัสดี 'ในกล่องข้อความสำหรับ vars หลายตัวสำหรับแบตช์ถึง vbs เพิ่มอีก var เช่นแบตช์: wscript test.vbs %var% %var2% the vbs: dim ArgObj, a, bSet fso = CreateObject("Scripting. FileSystemObject ") ตั้งค่า ArgObj = WScript.อาร์กิวเมนต์ a = ArgObj(0)b = ArgObj(1)msgb ox(a)msgbox(b)REMEMBER 0 countsหากคุณมีปัญหาใด ๆ กับสิ่งเหล่านี้โปรด pm หรือแสดงความคิดเห็น