แสดงกระทู้

This section allows you to view all posts made by this member. Note that you can only see posts made in areas you currently have access to.


Messages - UnKnown

หน้า: [1] 2 3 4 ... 14
1
1.ตั้งค่า Format เป็น 000

2.ตัวอย่างวิธีทำปุ่มค้นหา Multiple Field search box บนหน้าฟอร์มครับ

3
>ถ้าให้ qurey ออกเลขรอคำแนะนำจากท่านอื่นนะครับ
>บนหน้าฟอร์มใช้ชุดคำสั่งออกเลข(เลขที่ออกฝังตัวบันทึกลงตาราง)ลองดูกระทู้นี้ครับ https://www.thai-access.com/index.php?topic=1181.msg5215#msg5215

4
วิธีทำให้ qurey ใส่หมายเลขเรียงอัตโนมัติลองดูกระทู้นี้ครับ https://www.thai-access.com/index.php?topic=1434.msg6261#msg6261
ว่าแต่อันไหนคือชนิดของพัสดุที่จะนำมาเรียงครับนี่ :question:

หรือว่าจะให้ qurey ออกเลขแยกตามหน่วยงานที่เบิกครับ เช่น คลังเบิกครั้งที่1,2,3,... ช่างเบิกก็นับแยกครั้งที่1,2,3,...

5
ที่เมนูด้านบน Design -> Property Sheet แถบด้านขวาจะเปลี่ยน ทีนี้ในส่วนของ Data -> Record Source ก็จะสามารถเลือกข้อมูลมาได้ทั้งจาก Table,Query,หรือจะทำ Query ขึ้นใหม่ใช้เองได้เหมือนทำหน้าฟอร์มครับ

6
ผมคิดว่าการทำ UNION Query นั้นจะเป็นเพียงการรวมข้อมูลในหลายๆตารางมาแสดงเท่านั้นทำให้แก้ไขไม่ได้ครับ
>> https://stackoverflow.com/questions/1261959/how-do-i-make-an-editable-union-query link

ปล.เท่าที่ผมทราบ+หาดูมาให้นะ

7
ห้อง MS Access / : ความเข้าใจ .Tag code vb access
« เมื่อ: 17 ก.ย. 63 , 11:13:59 »
.Tag ในกรณีของผมเอามาใช้ในการจัดกลุ่มโดยในหน้า Property -> Ohter จะมีให้ใส่ Tag อยู่
ตัวอย่างผมมี combo box อยู่หลายตัวแต่เมื่อใช้คำสั่งนี้อยากให้มีผลเฉพาะตัวที่กำหนด Tag "B1" ใว้เท่านั้น

อ้างถึง
Private Sub CleanAllFieldsButton_Click()
Dim ctl As Control
    For Each ctl In Me.Controls
    Select Case ctl.ControlType

    Case acComboBox And ctl.Tag = "B1"
           ctl.Value = Null

    End Select
   Next

    Set ctl = Nothing
End Sub

8
เจอเว็บ https://www.utteraccess.com/topics/1454249# link เขาทำใว้ครับ

ปล.Pick Date ... ของไฟล์นี้จะไม่สามารถใช้งานได้บน 2007 ขึ้นไปเพราะ Access ตัดไลบารี่ MSCAL.OCX ออกครับ https://www.thai-access.com/topic_post.asp?CategoryID=1&TopicID=3078

9
Map Google Drive in Windows (ตัวอย่างเขาเพิ่มเป็นไดรฟ์ I)

หมายเหตุ ทุกเครื่องที่ลงโปรแกรมแล้วเชื่อมต่อจะเห็นข้อมูลใน Google Drive เหมือนทำ map network drive


10
กำหนด Format ครับ
" รายการนำเข้า จำนวน"& Format([txtจำนวนเงิน], "Standard") &" บาท"

โค๊ด: [Select]
Format (210.6, "#,##0.00")
Result: '210.60'

Format (210.6, "Standard")
Result: '210.60'

Format (0.981, "Percent")
Result: '98.10%'

Format (1267.5, "Currency")
Result: '$1,267.50'

11
ห้อง MS Access / : สร้างฟอร์มรับสินค้า
« เมื่อ: 05 ก.ย. 63 , 14:02:30 »
*อย่าตั้งกระทู้ซ้ำครับ

อ้างถึง
Private Sub Inhouse_AfterUpdate()
Me.Customer = DLookup("[cus]", "[Raw Material]", "Code='" & [Inhouse] & "'")
Me.List = DLookup("[name]", "[Raw Material]", "Code='" & [Inhouse] & "'")
End Sub
Inhouse และ Customer กับ List รูปแบบของข้อมูลเป็นอย่างไร และมันเป็นเลข-ตัวอักษรตายตัวหรือ+1ขึ้นไปเลื่อยๆ?
ผมใช้ DLookup ไม่เป็นรอท่านอื่นครับ

อ้างถึง
Sub Inhouse_AfterUpdate()
Dim cal1
cal1 = Nz([Insupkg], 0) / Nz([Intotalcanned], 0)
Me.Intotalcanned = Nz([cal1], 0) + 0
End Sub
Dim cal1 As Variant หรือ As String กำหนดด้วยครับ

12
เครื่อง Access Runtime ตั้งค่า Trusted Locations หรือยังครับ :question:

เว็บนี้มีโปรแกรมให้ไม่ต้องแก้ registry เอง / โหลด->แตกไฟล์วางใว้ที่เดียวกับไฟล์ access -> ติดตั้ง / แล้วลองเปิดใหม่ดูครับ
https://www.accessribbon.de/en/?Trust_Center:Trusted_Locations link

13
อ้างถึง
1. มีวิธีให้ Query แล้ว table ยังอยู่ใน back end ไหมครับ
จะให้ Front End ไปสร้าง table ใน back end นี่คงจะไม่ได้ แต่ถ้าเมื่อสร้างเสร็จแล้้วค่อยส่งเทเบิ้ลดังกล่าวให้ไปอยู่ back end น่าจะได้ครับรอท่านอื่นมาแนะนำอีกที :yuush:

อ้างถึง
2. เหตุที่ต้องทำอย่างนี้เพราะต้องเอา Query Union กับ table ข้อมูลมาแมตกันครับ มีวิธีที่ดีกว่านี้ไหมครับ
แม้เทเบิ้ลจะอยู่กันคนล่ะที่แต่ก็สามารถเอามา Union กันได้ไม่ใช้เหรอครับ :question:

14
ห้อง MS Access / : รวมฟิวส์ Text
« เมื่อ: 31 ส.ค. 63 , 15:24:27 »
เท่าที่ทราบคือไม่ว่าจะใช้เงื่อนไขไหนก็ต้องพิมพ์เสร็จหรือ Enter ก่อนข้อมูลที่อื่นถึงจะอัพเดทครับ / จะให้เป็นแนวว่าระหว่างพิมพ์ช่องหนึ่งอยู่แล้วให้อีกช่องอัพเดทแบบ Realtime ทันทีเลยทั้งที่ยังไม่ตกลงคงจะไม่มีนะครับ

15
1.ชุดคำสั่งทำให้ข้อความขึ้นบรรทัดใหม่ = Chr(13) & Chr(10)   :love:
ขอบคุณวิธีจาก https://stackoverflow.com/questions/14619671/how-to-make-2-lines-in-a-text-box-in-microsoft-access-2010 link

2.ชุดคำสั่งเลือกข้อความทั้งหมดแล้วก็อบปี้   :enjoying:
โค๊ด: [Select]
    Me.textbox1.SetFocus
    DoCmd.RunCommand acCmdCopy

16
สวัสดีครับ เนื่องด้วยผมจะทำฟอร์มรับค่าต่างๆแล้วเขียนโค้ดโปรแกรมออกมาใส่ใว้ใน Text Box นะครับ
1.อยากสอบถามว่าต้องเขียนคำสั่งอย่างไรให้ข้อความขึ้นบรรทัดใหม่แทนที่จะต่อกันไปยาวๆนะครับ
จาก
โค๊ด: [Select]
{111..{222...{333...}}}เป็น
โค๊ด: [Select]
{111
...
{222
...
{333
...
}
}
}

2.เขียนปุ่มคำสั่งทำอย่างไรให้เลือกข้อความทั้งหมดบน Text Box และสั่ง Copy แทนที่เราจะไป Ctrl-A , Ctrl-C ครับ :prettiness:

ปล.Text Box สามารถมีจำนวนตัวอักษรเกิน 255 ได้ใหมครับ? (ไม่ได้มีการบันทึกค่าลงในตารางใดๆ)

หน้า: [1] 2 3 4 ... 14