กระทู้เก่าบอร์ด อ.Yeadram
1,034 4
URL.หัวข้อ /
URL
จะเปลี่ยนมุมมองซับฟอร์มที่แสดงอยู่ให้เป็นแบ Data S
คือผมมี Sub Form ที่แสดงอยู่เป็นแบบ Single Form แต่ผมต้องการสร้างปุ่มเพื่อ Switch ให้มันแสดงเป็นแบบ data sheet ต้องเขียน code อย่างไรครับ
4 Reply in this Topic. Dispaly 1 pages and you are on page number 1
2 @R05873
โอ้ได้ความรู้ใหม่ ขอบคุณ อ.yeadram มากครับ
3 @R05893
พอดีสิ่งที่ผมต้องการมันสนับสนุนกันกับอีกกระทู้นึงครับ
http://www.thai-access.com/yeadram_view.php?topic_id=1384 ผมเลยใช้วิธี Set DefaultView ตอนสร้าง Form ไปเลย
ครับวิธีการก็ทำเหมือนกับ code ของคุณ Yeadram เลย...
แต่ใจจริงก็ยังอยากรู้นะครับว่ามันจะมี code ที่ switch ได้เลยหรือเปล่าโดยไม่ต้อง เปิดปิด form (เหมือนกับที่คลิ๊กปุ่มบน toolbar)
http://www.thai-access.com/yeadram_view.php?topic_id=1384 ผมเลยใช้วิธี Set DefaultView ตอนสร้าง Form ไปเลย
ครับวิธีการก็ทำเหมือนกับ code ของคุณ Yeadram เลย...
แต่ใจจริงก็ยังอยากรู้นะครับว่ามันจะมี code ที่ switch ได้เลยหรือเปล่าโดยไม่ต้อง เปิดปิด form (เหมือนกับที่คลิ๊กปุ่มบน toolbar)
4 @R05894
พอดีสิ่งที่ผมต้องการมันสนับสนุนกันกับอีกกระทู้นึงครับ
http://www.thai-access.com/yeadram_view.php?topic_id=1384 ผมเลยใช้วิธี Set DefaultView ตอนสร้าง Form ไปเลย
ครับวิธีการก็ทำเหมือนกับ code ของคุณ Yeadram เลย...
แต่ใจจริงก็ยังอยากรู้นะครับว่ามันจะมี code ที่ switch ได้เลยหรือเปล่าโดยไม่ต้อง เปิดปิด form (เหมือนกับที่คลิ๊กปุ่มบน toolbar)
http://www.thai-access.com/yeadram_view.php?topic_id=1384 ผมเลยใช้วิธี Set DefaultView ตอนสร้าง Form ไปเลย
ครับวิธีการก็ทำเหมือนกับ code ของคุณ Yeadram เลย...
แต่ใจจริงก็ยังอยากรู้นะครับว่ามันจะมี code ที่ switch ได้เลยหรือเปล่าโดยไม่ต้อง เปิดปิด form (เหมือนกับที่คลิ๊กปุ่มบน toolbar)
Time: 0.3274s
Private Sub Command122_Click()
Dim tbView As Integer
Dim fmn As String
tbView = Me.Child0.Form.DefaultView
If tbView = 2 Then tbView = 1 Else tbView = 2
fmn = Me.Child0.Form.Name
Me.Child0.SourceObject = ""
DoCmd.OpenForm fmn, acDesign
Forms(fmn).DefaultView = tbView
DoCmd.Close acForm, fmn, acSaveYes
Me.Child0.SourceObject = fmn
End Sub