ເນື້ອໃນ

# ຄຳສັ່ງ Print#

ສົ່ງອອກສະຕຣິງ ຫຼື ນິພົດຕົວເລກທີ່ລະບຸໄວ້ໄປຍັງໜ້າຈໍ ຫຼື ໄປຍັງໄຟລ໌ລຳດັບ (sequential file).

ໃຊ້ຄຳສັ່ງ Put# ເພື່ອຂຽນຂໍ້ມູນລົງໃນໄຟລ໌ບີນາຣີ ຫຼື ໄຟລ໌ແບບສຸ່ມ. ໃຊ້ຄຳສັ່ງ Write# ເພື່ອຂຽນຂໍ້ມູນລົງໃນໄຟລ໌ຂໍ້ຄວາມແບບລຳດັບທີ່ມີຕົວອັກສອນແຍກ.

### ໄວຍາກອນ:

    Print [#filenum,] expression1[{;|,} [Spc(number As Integer);] [Tab(pos As Integer);] [expression2[...]]

### ພາຣາມິເຕີ:

filenum: ນິພົດຕົວເລກໃດໜຶ່ງທີ່ປະກອບມີໝາຍເລກໄຟລ໌ທີ່ຖືກກຳນົດໂດຍຄຳສັ່ງ Open ສຳລັບໄຟລ໌ນັ້ນໆ.

expression: ນິພົດຕົວເລກ ຫຼື ສະຕຣິງໃດໜຶ່ງທີ່ຈະພິມອອກ. ສາມາດແຍກຫຼາຍນິພົດໄດ້ດ້ວຍເຄື່ອງໝາຍຈ້ຳຈຸດ (;). ຫາກແຍກດ້ວຍເຄື່ອງໝາຍຈຸດ (,), ນິພົດຈະຖືກຫຍໍ້ໜ້າໄປຍັງຕຳແໜ່ງແທັບຖັດໄປ. ບໍ່ສາມາດປັບຕຳແໜ່ງແທັບໄດ້.

number: ຈຳນວນຊ່ອງວ່າງທີ່ຈະແຊກໂດຍຟັງຊັນ Spc.

pos: ຊ່ອງວ່າງຈະຖືກແຊກຈົນກວ່າຈະຮອດຕຳແໜ່ງທີ່ລະບຸໄວ້.

ຫາກມີເຄື່ອງໝາຍຈ້ຳຈຸດ ຫຼື ເຄື່ອງໝາຍຈຸດ ປະກົດຢູ່ຫຼັງນິພົດສຸດທ້າຍທີ່ຈະພິມ, LibreOffice Basic ຈະເກັບຂໍ້ຄວາມໄວ້ໃນບັບເຟີພາຍໃນ ແລະ ເຮັດວຽກໂປຣແກຣມຕໍ່ໄປໂດຍບໍ່ພິມອອກ. ເມື່ອພົບຄຳສັ່ງ Print ອື່ນທີ່ບໍ່ມີເຄື່ອງໝາຍຈ້ຳຈຸດ ຫຼື ເຄື່ອງໝາຍຈຸດຢູ່ທ້າຍ, ຂໍ້ຄວາມທັງໝົດທີ່ຈະພິມຈະຖືກພິມອອກມາພ້ອມກັນໃນຄັ້ງດຽວ.

ນິພົດຕົວເລກຄ່າບວກຈະຖືກພິມໂດຍມີຊ່ອງວ່າງນຳໜ້າ. ນິພົດຄ່າລົບຈະຖືກພິມໂດຍມີເຄື່ອງໝາຍລົບນຳໜ້າ. ຫາກຄ່າຕົວເລກທົດສະນິຍົມເກີນຂອບເຂດທີ່ກຳນົດ, ນິພົດຕົວເລກນັ້ນຈະຖືກພິມໃນຮູບແບບເລກກຳລັງ (exponential notation).

ຫາກນິພົດທີ່ຈະພິມມີຄວາມຍາວເກີນກຳນົດ, ການສະແດງຜົນຈະຕັດຂຶ້ນແຖວໃໝ່ໂດຍອັດຕະໂນມັດ.

ທ່ານສາມາດແຊກຟັງຊັນ Tab ໂດຍໃສ່ໃນເຄື່ອງໝາຍຈ້ຳຈຸດ ລະຫວ່າງອາຄິວເມນ (arguments) ເພື່ອຫຍໍ້ໜ້າຜົນການສະແດງອອກໄປຍັງຕຳແໜ່ງທີ່ລະບຸ, ຫຼື ທ່ານສາມາດໃຊ້ຟັງຊັນ Spc ເພື່ອແຊກຈຳນວນຊ່ອງວ່າງຕາມທີ່ກຳນົດ.

### ຕົວຢ່າງ:

    Sub ExamplePrint
        Print "ABC"
        Print "ABC","123"
        i = FreeFile()
        Open "C:\Users\ThisUser\Temp.txt" For Output As i
        Print #i, "ABC"
        Close #i
    End Sub

    Sub ExamplePrint
        Print "ABC"
        Print "ABC","123"
        i = FreeFile()
        Open "~/temp.txt" For Output As i
        Print #i, "ABC"
        Close #i
    End Sub

ຫົວຂໍ້ທີ່ກ່ຽວຂ້ອງ

ຄຳສັ່ງ Close

ຄຳສັ່ງ Put#

ຄຳສັ່ງ Open

ຄຳສັ່ງ Write#

ກະລຸນາສະໜັບສະໜູນພວກເຮົາ!