ຄຳສັ່ງ 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