ສາຍລາຍການ VBScript

ການໄປຫາອານາວໜ້າ ສາຍລາຍການ VB
ການໄປຫາອານາວໜ້າ ຄຳກ່າວກ່ຽວກັບ VB

ບົດນາຍພິມ

ຄຳສັ່ງ If...then..else: ບົດນີ້ສະແດງວ່າແນວໃດທີ່ຂຽນຄຳສັ່ງ if...then..else
ຄຳສັ່ງ If...then..elseif: ບົດນີ້ສະແດງວ່າແນວໃດທີ່ຂຽນຄຳສັ່ງ if...then...elseif...
ຄຳສັ່ງ Select case: 本例演示如何编写 select case 语句。

条件语句

经常地，当我们编写代码时，我们需要根据不同的判断执行不同操作。我们可以使用条件语句完成这个工作。

在 VBScript 我们可以使用三种条件语句：

if 语句: 假如你希望在条件为 true 时执行一系列的代码，可以使用这个语句。
if...then...else 语句: 假如你希望执行两套代码其中之一，可以使用这个语句。
if...then...elseif 语句: ຖ້າທ່ານຢາກເລືອກລະບຸກະສັດຫນື່ງທີ່ຢູ່ໃນບັນນາທິການຈະດໍາເນີນການໂດຍດໍາເນີນການເລືອກ ທ່ານສາມາດໃຊ້ຄອບການນີ້.
select case 语句: ຖ້າທ່ານຢາກເລືອກລະບຸກະສັດຫນື່ງທີ່ຢູ່ໃນບັນນາທິການຈະດໍາເນີນການໂດຍດໍາເນີນການເລືອກ ທ່ານສາມາດໃຊ້ຄອບການນີ້.

If....Then.....Else

ຖ້າໃນການດັ່ງກ່າວນີ້ ທ່ານສາມາດໃຊ້ຄອບການ If...Then...Else 语句:

ຖ້າຄວາມຈະແຈ້ງຢູ່ true ຈະດໍາເນີນການດໍາເນີນການຫນື່ງທີ່ຢູ່ໃນບັນນາທິການ
ຖ້າທ່ານເລືອກລະບຸກະສັດຫນື່ງທີ່ຢູ່ໃນບັນນາທິການຈະດໍາເນີນການໂດຍດໍາເນີນການເລືອກ:

ຖ້າທ່ານຢາກເລືອກລະບຸກະສັດຫນື່ງທີ່ຢູ່ໃນຄວາມຈະແຈ້ງຢູ່ true ແລະບໍ່ true ຈະດໍາເນີນການດໍາເນີນການດຽວນີ້ ທ່ານສາມາດຂຽນການດໍາເນີນການດຽວໃນໜຶ່ງການ:

if i=10 Then msgbox "Hello"

ໃນການດໍາເນີນການຂອງຄອບການດັ່ງກ່າວນີ້ ບໍ່ມີຄອບການ .else.. 语句. ພວກເຮົາພຽງແຕ່ດໍາເນີນການດໍາເນີນການຫນື່ງບ່ອນໃນຄວາມຈະແຈ້ງຢູ່ true (ຖ້າ i ແມ່ນ 10).

ຖ້າພວກເຮົາຢາກເລືອກລະບຸກະສັດຫນື່ງທີ່ຢູ່ໃນຄວາມຈະແຈ້ງຢູ່ true ແລະບໍ່ true ຈະດໍາເນີນການດໍາເນີນການຫນື່ງບ່ອນຫນື່ງໃນຄວາມຈະແຈ້ງຢູ່ true ພວກເຮົາຕ້ອງຂຽນການດໍາເນີນການດຽວໃນໜຶ່ງການໂດຍນຳມາດ້ວຍບັນປະໂຫຍດ "End If" ເພື່ອຢຸດການດໍາເນີນການດຽວນີ້:

if i=10 Then
   msgbox "Hello"
   i = i+1
end If

ໃນການດໍາເນີນການຂອງຄອບການດັ່ງກ່າວນີ້ ບໍ່ມີຄອບການ .else.. 语句. ພວກເຮົາພຽງແຕ່ດໍາເນີນການດໍາເນີນການຫນື່ງບ່ອນໃນຄວາມຈະແຈ້ງຢູ່ true.

ຖ້າທ່ານຢາກເລືອກລະບຸກະສັດຫນື່ງທີ່ຢູ່ໃນຄວາມຈະແຈ້ງຢູ່ true ແລະບໍ່ true ຈະດໍາເນີນການດໍາເນີນການອື່ນໆແລ້ວ ຈະຕ້ອງໃຊ້ບັນປະໂຫຍດ "Else":

if i=10 then
   msgbox "Hello"
else
   msgbox "Goodbye"
end If

ຖ້າຄວາມຈະແຈ້ງຢູ່ true ຈະດໍາເນີນການດໍາເນີນການຂອງຄອບການທຳອິດ (ຖ້າ i ບໍ່ບໍ່ແມ່ນ 10).

If....Then.....Elseif

ຖ້າທ່ານຢາກເລືອກລະບົບລະບຸກະສັດຫນື່ງທີ່ຢູ່ໃນບັນນາທິການຈະດໍາເນີນການດໍາເນີນການໂດຍ if...then...elseif 语句:

if payment="Cash" then
   msgbox "ທ່ານຈະຈະຈະບັນຍັດເງິນສົດ!"
 elseif payment="Visa" then
   msgbox "ທ່ານຈະຈະຈະບັນຍັດທັນບີບຊາຍ."
 elseif payment="AmEx" then
   msgbox "You are going to pay with American Express."
 else
   msgbox "Unknown method of payment."
end If

Select Case

If you want to choose one of multiple pieces of code to execute, you can use the SELECT statement:

select case payment
 case "Cash"
   msgbox "You are going to pay cash"
 case "Visa"
   msgbox "You are going to pay with visa"
 case "AmEx"
   msgbox "You are going to pay with American Express"
 case Else
   msgbox "Unknown method of payment"
end select

ການດຳເນີນງານຂອງວິດໂຄດບົດກະຕຸ້ນ: ກໍາລັງພວກເຮົາຕ້ອງການມີການສາຍລາຍການພຽງຫນຶ່ງ (ປະຈຸບັນແມ່ນຄວາມປ່ຽນປ່ານ) ແລະການສາຍລາຍການຈະຖືກກວດສອບຄັ້ງດຽວ. ຫຼັງຈາກນັ້ນ ຄູ່ມືວິດໂຄດຈະຖືກປະກອບກັບຄວາມຂອງການສາຍລາຍການ ແລະຖືກປະກອບກັບຄູ່ມືຂອງ case ທີ່ມີຄວາມທຽບທັງໝົດ. ຖ້າມີການທຽບທັງໝົດ ວິດໂຄດທີ່ມີຄວາມທຽບຈະຖືກດຳເນີນວຽກ.

ການໄປຫາອານາວໜ້າ ສາຍລາຍການ VB
ການໄປຫາອານາວໜ້າ ຄຳກ່າວກ່ຽວກັບ VB

ການຈັດຕັ້ງຕາຕະລາງ