ชุมชนคนรักภาษาเบสิค - Visual Basic Community

 ลืมรหัสผ่าน
 ลงทะเบียน
ค้นหา
ดู: 41|ตอบกลับ: 0

[vb6] - ชนิดตัวแปรที่เก็บค่าได้มากกว่า 255 ตัวอักษร

[คัดลอกลิงก์]

14

กระทู้

48

โพสต์

336

เครดิต

Full Member

Rank: 3Rank: 3

เครดิต
336
โพสต์ เมื่อวานซืน 10:17 | ดูโพสต์ทั้งหมด |โหมดอ่าน

แก้ไขครั้งสุดท้ายโดย my2alee เมื่อ 2024-12-20 12:08

[vb6] - ชนิดตัวแปรที่เก็บค่าได้มากกว่า 255 ตัวอักษร

ผมดึงข้อมูลจากไฟล์ xxx.ini ข้อมูลค่าของคีย์ที่ดึงมาเก็บในตัวแปรมีความยาวมากกว่า 255 ตัวอักษร
ลองประกาศตัวแปรเป็นชนิด string หรือ Variant แล้วเพื่อรับค่ามาเก็บไว้ในตัวแปร แต่มันดึงมาได้แค่ 255 ตัวอักษร
ไม่ทราบว่าต้องประกาศชนิดตัวแปรแบบไหนครับ ถึงดึงออกมาได้ทั้งหมด

ที่ลองแล้ว Dim op1x AS String หรือ Dim op1x AS Variant

xxx.ini >>

[OP]
OP1='001','005','021', ......... ประมาณ 600-700 อักษรได้
แต่ลองดึงจากไฟล์ .txt สามารถดึงมาได้ครบ แต่ไม่สามารถแยกคีย์แบบ ini ได้  หรือคีย์มีข้อจำกัดครับว่ากำหนดค่าได้ไม่เกิน 255
[header]
key=value

ขอบคุณครับ


14

กระทู้

48

โพสต์

336

เครดิต

Full Member

Rank: 3Rank: 3

เครดิต
336
 เจ้าของ| โพสต์ เมื่อวานซืน 13:59 | ดูโพสต์ทั้งหมด

ได้แล้วครับ เผื่อใครติดปัญหา
https://www.tek-tips.com/threads/reading-from-ini-file.1530581/
อยู่ที่ฟังก์ชั่น

Public Function sGetINI(sINIFile As String, sSection As String, sKey _
                As String, sDefault As String) As String
    Dim sTemp As String * 255
    Dim nLength As Integer
    sTemp = Space$(255)
    nLength = GetPrivateProfileString(sSection, sKey, sDefault, sTemp, _
              255, sINIFile)
    sGetINI = Left$(sTemp, nLength)
End Function

เปลี่ยนจาก 255 เป็นค่าที่มากกว่า
ขออภัย! คุณไม่ได้รับสิทธิ์ในการดำเนินการในส่วนนี้ กรุณาเลือกอย่างใดอย่างหนึ่ง ลงชื่อเข้าใช้ | ลงทะเบียน

รายละเอียดเครดิต

ข้อความล้วน|อุปกรณ์พกพา|ประวัติการแบน|G2GNet.com  

GMT+7, 2024-12-22 14:06 , Processed in 0.385193 second(s), 4 queries , File On.

Powered by Discuz! X3.4, Rev.62

Copyright © 2001-2020 Tencent Cloud.

ตอบกระทู้ ขึ้นไปด้านบน ไปที่หน้ารายการกระทู้