ເນື້ອໃນ

# ຟັງຊັນ FileAttr

ສົ່ງຄືນໂໝດການເຂົ້າເຖິງ ຫຼື ໝາຍເລກການເຂົ້າເຖິງໄຟລ໌ ຂອງໄຟລ໌ທີ່ຖືກເປີດດ້ວຍຄຳສັ່ງ Open. ໝາຍເລກການເຂົ້າເຖິງໄຟລ໌ແມ່ນຂຶ້ນກັບລະບົບປະຕິບັດການ (OSH = Operating System Handle).

ຫາກທ່ານໃຊ້ລະບົບປະຕິບັດການແບບ 32-Bit, ທ່ານຈະບໍ່ສາມາດໃຊ້ຟັງຊັນ FileAttr ເພື່ອຫາໝາຍເລກການເຂົ້າເຖິງໄຟລ໌ໄດ້.

ເບິ່ງຕື່ມ: Open

### ໄວຍາກອນ:

      FileAttr (Channel As Integer, Attributes As Integer)

### ປະເພດຄ່າທີ່ສົ່ງກັບ:

ຈຳນວນຖ້ວນ

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

Channel: ໝາຍເລກຂອງໄຟລ໌ທີ່ຖືກເປີດດ້ວຍຄຳສັ່ງ Open.

Attributes: ນິພົດຈຳນວນຖ້ວນທີ່ບອກປະເພດຂໍ້ມູນໄຟລ໌ທີ່ທ່ານຕ້ອງການໃຫ້ສົ່ງຄືນ. ຄ່າທີ່ເປັນໄປໄດ້ມີດັ່ງນີ້:

1: FileAttr ບອກໂໝດການເຂົ້າເຖິງຂອງໄຟລ໌.

2: FileAttr ສົ່ງຄືນໝາຍເລກການເຂົ້າເຖິງໄຟລ໌ຂອງລະບົບປະຕິບັດການ.

ຫາກທ່ານລະບຸພາຣາມິເຕີ attribute ເປັນຄ່າ 1, ຄ່າສົ່ງຄືນຈະເປັນດັ່ງນີ້:

1 - INPUT (ໄຟລ໌ເປີດສຳລັບການປ້ອນຂໍ້ມູນ)

2 - OUTPUT (ໄຟລ໌ເປີດສຳລັບການສະແດງຜົນ)

4 - RANDOM (ໄຟລ໌ເປີດສຳລັບການເຂົ້າເຖິງແບບສຸ່ມ)

8 - APPEND (ໄຟລ໌ເປີດສຳລັບການຂຽນຕໍ່ທ້າຍ)

32 - BINARY (ໄຟລ໌ເປີດໃນໂໝດບີນາຣີ).

### ລະຫັດຂໍ້ຜິດພາດ:

5 ການເອີ້ນໃຊ້ໂປຣຊີເຈີບໍ່ຖືກຕ້ອງ

52 ຊື່ໄຟລ໌ ຫຼື ເລກໄຟລ໌ບໍ່ຖືກຕ້ອງ

### ຕົວຢ່າງ:

    Sub ExampleFileAttr
        Dim iNumber As Integer
        Dim sLine As String
        Dim aFile As String
        aFile = "C:\Users\ThisUser\data.txt"
        iNumber = Freefile
        Open aFile For Output As #iNumber
        Print #iNumber, "This is a line of text"
        MsgBox FileAttr(#iNumber, 1), 0, "Access mode"
        MsgBox FileAttr(#iNumber, 2), 0, "File attribute"
        Close #iNumber
    End Sub

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

ຄຳສັ່ງ Close

ຟັງຊັນ FreeFile

ຄຳສັ່ງ Open

ຄຳສັ່ງ Print#

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