Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
[Help] Vẽ button lên form
#1
Mình có danh sách các bàn caffe, ban=(id,ten,khu_vuc)
Làm sao mình có thể vẽ danh sách bàn lên form, mỗi bàn là một button

Nhờ các bạn giúp đỡ.
Chữ ký của thucgia Hix, Access quả nhiên lợi hại !!!! http://vibigaba.esy.es/
ღღღღღTài sản của thucgia (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#2
(28-03-15, 12:31 AM)thucgia Đã viết: Mình có danh sách các bàn caffe, ban=(id,ten,khu_vuc)
Làm sao mình có thể vẽ danh sách bàn lên form, mỗi bàn là một button

Nhờ các bạn giúp đỡ.

Chưa rõ ý tưởng như thế nào, Post hình minh họa được không?

Vì không biết vẽ Button để làm cái gì!027
Chữ ký của maidinhdan * Để được hỗ trợ tốt nhất, nhấn vào link dưới đây để xem.
1. [Hướng dẫn] Kiểu file gửi lên để được giúp đỡ
2. [Hướng dẫn] Nội quy diễn đàn
3. [Hướng dẫn] Cách Đưa file và hình vào diễn đàn
4.[Hướng dẫn] Để xây dựng một ứng dụng hoàn hảo và lời cảm tạ
5. Cần tìm Demo hay ứng dụng sử dụng thanh tìm kiếm phía trên cùng, bên phải của diễn đàn.
* Nếu muốn cảm ơn, hãy nhấn nút thank, không cần viết thêm bài nào nửa.



ღღღღღTài sản của maidinhdan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#3
(28-03-15, 09:53 AM)maidinhdan Đã viết:
(28-03-15, 12:31 AM)thucgia Đã viết: Mình có danh sách các bàn caffe, ban=(id,ten,khu_vuc)
Làm sao mình có thể vẽ danh sách bàn lên form, mỗi bàn là một button

Nhờ các bạn giúp đỡ.

Chưa rõ ý tưởng như thế nào, Post hình minh họa được không?

Vì không biết vẽ Button để làm cái gì!027

Có lẽ là làm được rồi như hình dưới ấy bạn,
this is code
Mã:
Private Sub Command0_Click()
    Dim frm As Access.Form
    Dim strName As String
    
    Set frm = CreateForm
    
    frm.Visible = True
    frm.Caption = "Dynamic form"
    frm.AutoCenter = True
    
    Dim ctlLabel As Control, ctlText As Control
    Dim intDataX As Integer, intDataY As Integer
    Dim intLabelX As Integer, intLabelY As Integer
    intLabelX = 100
    intLabelY = 100
    intDataX = 1000
    intDataY = 100
    For i = 0 To 4

    Set ctlText = CreateControl(frm.Name, acCommandButton, , "", "", _
        intDataX, intDataY + 400 * i, 1200, 300)
    ctlText.Caption = "Ban " & i
    'Set ctlText = CreateControl(frm.Name, acTextBox, , "", "", _
    '    intDataX, intDataY + 1000)
    Next i
    
    
    'For x = 1 To iLoops
    'Set ctrl = CreateControl("frmYour_form ", acTextBox, acDetail, , "", 0 + (x * 300), 0, 300, 240)
    'ctrl.ControlName = "txtDynamic_control_" & x

    'DoCmd.Save acForm, " frmYour_form "
'Next x
    
    
    
    strName = frm.Name
    DoCmd.Close acForm, strName, acSaveYes
    DoCmd.Rename "frmNewName", acForm, strName
    DoCmd.OpenForm "frmNewName", , , , , acDialog
    DoCmd.DeleteObject acForm, "frmNewName"

End Sub

[Hình: dynamic_frm_access_vba.jpg]

Có lẽ phần ý tưởng chính đã thực hiện xong,
Bi giờ phải thêm cái này
tbl_ban=(id,ten,trang_thai,khu_vuc_id)
trang_thai={0,1} ' 0 : là bàn còn trống, 1: là bàn có khách , phải hiển thì bàn có khách có color active (Đỏ chẳng hạn)
và dĩ nhiên khi click vào bào trang_thai 0 thì : Tạo mới bàn, thêm món,
Còn khi click vào bàn trang_thai 1 thì : func: Thêm_món or Tính_Tiền .... Tính tiền rồi thì trả cái bàn này về trạng thái 0 (Trống)

Nhiêu khê quá phải không bạn ? ...trời ui còn phải add cái events vào cái button nữa
Chữ ký của thucgia Hix, Access quả nhiên lợi hại !!!! http://vibigaba.esy.es/
ღღღღღTài sản của thucgia (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#4
Xin lỗi bạn, ý tưởng này của bạn mình hiểu rồi nhưng quá sức cho mình để viết hàm hổ trợ cho bạn. Và nếu mình là nhà quản lý nhà hàng mình không biết muốn dùng ứng dụng này không vì rất nhọc nhằn trong việc nhập số liệu để quản lý nó. Và cùng khó hơn khi quản lý nhiều bàn ăn ( Giả sử nhà hàng có 500 bàn chẳng lẻ làm 500 command.)

Riêng mình có 1 ý tưởng nhỏ thôi ( giả sử nhà hàng mình có 200 bàn)
Thứ 1 : làm một form để nhập gồm ( Bàn số mấy; Tên món; Đã tính tiền)
Thứ 2 : làm 1 form nửa ( 200 cái label Yes/No ( giống On/Off), mỗi cái Yes/No đại diện cho 1 bàn) - Ở đây có thể sắp sếp theo Sơ đồ bàn theo như bên ngoài)

* Khi đã nhập ở bước 1 thì bàn số mấy đã sử dụng thì nó hiện Check vào là biết ( dùng hàm tham chiếu là xong)
...... và còn nhiều cái hay không nói hết được.

Cuối cùng, khi khách vào: hỏi còn bàn không?
- Tôi chỉ việc mở form bước 2 lên là thấy: Và tôi nói xin mời đi lối này.

Và thực tế ít ai dùng phần mền quản lý bàn ăn ở mức độ dưới 100 bàn để xác định xem trong nhà hàng mình còn bàn trống không.

Đó là vài lời chia sẽ. Hy vọng có cao thủ khác sẽ góp cùng ý tưởng này của bạn.

Thân ái!
Chữ ký của maidinhdan * Để được hỗ trợ tốt nhất, nhấn vào link dưới đây để xem.
1. [Hướng dẫn] Kiểu file gửi lên để được giúp đỡ
2. [Hướng dẫn] Nội quy diễn đàn
3. [Hướng dẫn] Cách Đưa file và hình vào diễn đàn
4.[Hướng dẫn] Để xây dựng một ứng dụng hoàn hảo và lời cảm tạ
5. Cần tìm Demo hay ứng dụng sử dụng thanh tìm kiếm phía trên cùng, bên phải của diễn đàn.
* Nếu muốn cảm ơn, hãy nhấn nút thank, không cần viết thêm bài nào nửa.



ღღღღღTài sản của maidinhdan (View All Items) ღღღღღ
Reply
Những người đã cảm ơn
#5
(29-03-15, 01:11 AM)maidinhdan Đã viết: Xin lỗi bạn, ý tưởng này của bạn mình hiểu rồi nhưng quá sức cho mình để viết hàm hổ trợ cho bạn. Và nếu mình là nhà quản lý nhà hàng mình không biết muốn dùng ứng dụng này không vì rất nhọc nhằn trong việc nhập số liệu để quản lý nó. Và cùng khó hơn khi quản lý nhiều bàn ăn ( Giả sử nhà hàng có 500 bàn chẳng lẻ làm 500 command.)

Riêng mình có 1 ý tưởng nhỏ thôi ( giả sử nhà hàng mình có 200 bàn)
Thứ 1 : làm một form để nhập gồm ( Bàn số mấy; Tên món; Đã tính tiền)
Thứ 2 : làm 1 form nửa ( 200 cái label Yes/No ( giống On/Off), mỗi cái Yes/No đại diện cho 1 bàn) - Ở đây có thể sắp sếp theo Sơ đồ bàn theo như bên ngoài)

* Khi đã nhập ở bước 1 thì bàn số mấy đã sử dụng thì nó hiện Check vào là biết ( dùng hàm tham chiếu là xong)
...... và còn nhiều cái hay không nói hết được.

Cuối cùng, khi khách vào: hỏi còn bàn không?
- Tôi chỉ việc mở form bước 2 lên là thấy: Và tôi nói xin mời đi lối này.

Và thực tế ít ai dùng phần mền quản lý bàn ăn ở mức độ dưới 100 bàn để xác định xem trong nhà hàng mình còn bàn trống không.

Đó là vài lời chia sẽ. Hy vọng có cao thủ khác sẽ góp cùng ý tưởng này của bạn.

Thân ái!

hi, cám ơn bạn góp ý tuy nhiên theo ý mính như thế này

1, Sự tiện dụng thì mình nghĩ là có đấy, khi view các bàn như vậy nhìn rất thực tế, mình thấy rất nhiều quán caa2fe phần mềm của họ điều có giao diện như trên
2, Về phần thiết kế thì mình tìm thấy một kỹ thuật rất hay để hôm nào tiện mình trình bày cho anh em xem chơi, nó gọi là array control simulate dùng cho Access rất hay (Bởi vì trong access không hổ trợ control array), chỉ cần thiết kế 1 cái thôi là không những 500 cái control mà 1000 cái nó cũng chạy ot ot luôn...Nhìn thấy thì phức tạp nhưng bạn chỉ cần khi click vào cái bàn nó lấy được bàn id là xong thôi.
3, Học thêm kỹ thuật form dynamic runtine luôn...
Chữ ký của thucgia Hix, Access quả nhiên lợi hại !!!! http://vibigaba.esy.es/
ღღღღღTài sản của thucgia (View All Items) ღღღღღ
Reply
Những người đã cảm ơn


Có thể liên quan đến chủ đề
Chủ đề: Tác giả Trả lời: Xem: Bài mới nhất
  [Thủ Thuật] Tạo thanh tiến trình trên Form (Progress bar) khi xử lý dữ liệu ongke0711 18 1,504 21-10-16, 10:17 PM
Bài mới nhất: ongke0711
  Tạo Form đăng ký tài khoản phuc_thanhtien 15 1,020 27-09-16, 12:19 AM
Bài mới nhất: maidinhdan
  [Help] lệnh tìm kiếm và hiển thị kết quả tìm kiếm trên form tvn_hut 12 1,014 25-06-16, 12:22 AM
Bài mới nhất: zinzin8x
  [Thủ Thuật] Tạo Form đánh giá 1 - 5 sao cho từng Record ongke0711 0 119 03-05-16, 06:51 PM
Bài mới nhất: ongke0711
  Cách Load lại Form sau khi nhấn nút Thêm, Sửa, Xóa! huynguyenbd 7 3,263 07-04-16, 08:28 PM
Bài mới nhất: ongke0711

Chuyển nhanh:


User(s) browsing this thread: 1 Guest(s)
Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ