กระทู้เก่าบอร์ด อ.สุภาพ ไชยา
326 2
URL.หัวข้อ /
URL
ถ้าเป็นแบบนี้จะต้องทำอย่างไร
สมมติ ผมมี Code Product 2 ตัวคือ 100034 และ 100034E ถ้าผมต้องการตัวเลขตัวสุดท้ายของข้อมูลซึ่งทำหน้าที่เป็นตัวบอกประเภทของข้อมูล คือ 4 ซึ่งเป็นคำตอบที่ผมต้องการ ผมจะต้องทำอย่างไรครับ และถ้าข้อมูลอีกตัวหนึ่งซึ่งมีตัว E อยู่ด้านหลังแต่คำตอบที่ต้องการก็คือ 4 เช่นกันผมจะต้องทำอย่างไรครับ ขอบคุณมากครับ
2 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R05417
ทำได้แล้วครับ ขอบคุณมากครับคุณ BADMan
Time: 0.1344s
เช่น
Dim DigiCount as Long
DigiCount = Len([Text0])
2. ถ้ามี 6 ตัวอักษร ก็หาเลข 4 ได้โดยใช้คำสั่ง Right()
3. ถ้ามี 7 ตัวอักษร ก็หาเลข 4 ได้โดยใช้คำสั่ง Mid()
Select Case DigiCount
Case 6
Msgbox Right([Text0],1)
Case 7
Msgbox Mid([Text0],6,1)
Case Else
Msgbox "Sorry.!!"
End Select