Thực tập tạo Form từ A->Z

[ThuNghi]

Qua tham khảo formNgay của Mr OkeBab, MaxSoCT của MVSON, tôi xin phép lập thêm đề tài này nhằm tham khảo cách tạo form, nhờ các bạn hướng dẫn.
Tôi có form theo file gồm có TBNgayHT, TBNgayCT, TBLoaiCT, TBSoCT, tôi muốn làm thế nào khi nhập xong các chỉ tiêu TBNgayHT, TBNgayCT, TBLoaiCT, theo form thì TBSoCT sẽ tự động update theo tiêu thức LoaiCT/Nam-ThangHT/Số tt tăng theo tháng.
Mong các bạn hỗ trợ.
Xin cám ơn.
Làm sao lấy MaxSoCT không phải dùng ct {max(if...))}
Đây là file học tập, mong các bạn nhiệt tình.

 

[ThuNghi]

Cám ơn Hiếu và Quốc Anh nhiều lắm
Nhờ Hiếu và Quốc Anh hòan thiện hộ form, dạo này hơi bận nên không reply. Mà tối thì không sáng suốt lắm.
Trên form: khi kiểm tra ngày CT <= Ngày HT, và sau khi LoaiCT nhập thì soCT tự động update theo tiêu thức trên (không quan tâm số CT gốc)
ie LoaiCT update => SoCT

 

[SoiBien]

Private Sub TBNgayCT_Change()
Dim i1 As Byte
Me.TBNgayCT.Value = ED(Me.TBNgayCT.Value)
i1 = InStr(1, Me.TBNgayCT.Value, "_")
If i1 = 0 Then i1 = 11
Me.TBNgayCT.selstart = i1 - 1
End Sub

Cách này không được hả bác ???
Thân!

Cái này thì khi xoá đi sẽ bị kẹt tại các dấu "/" + với không xoá ở giữa được.

Thân.

 

[ThuNghi]

Cám ơn!
Vậy QA cố gắng nhé, phải hòan thiện từ đầu. Sau này sẽ không cần quan tâm nữa.

 

[Mr Okebab]

Cái này thì khi xoá đi sẽ bị kẹt tại các dấu "/" + với không xoá ở giữa được.

Thân.

Vâng, quả đúng vậy, phải xóa lần lượt thôi.
Vậy thì phải sửa ở hàm ED thì đúng hơn.

Thân!

 

[SoiBien]

Vâng, quả đúng vậy, phải xóa lần lượt thôi.
Vậy thì phải sửa ở hàm ED thì đúng hơn.

Thân!

Đã điều chỉnh xong theo ý OB, bác ThuNghi xem nhé
Còn CTMax thì đã điều chỉnh (chạy theo CTMax2 nhưng thêm Optional NotSort, và thay vì vùng thì dùng vung as range, thì đổi dùng Optional Column as Integer vào thôi, mặc định là 5.

 

[Mr Okebab]

Cái Text ngày tháng vẫn thế bác ạ, mong xem lại nhé. (không xóa tháng được, phải xóa từ phải qua trái)
Thân!

 

[SoiBien]

Cái Text ngày tháng vẫn thế bác ạ, mong xem lại nhé. (không xóa tháng được, phải xóa từ phải qua trái)
Thân!

Vâng bác ạ, mới chỉ làm được cho nó vivu thôi còn cái vụ nhảy vô giữa này vẫn kẹt tiếp. Hức hức!!!!

Đang xem thêm!.

 

[ThuNghi]

Mong rằng hết tuần này, các bạn giúp mình thông qua phần này nhé.
Để còn sang V02.

 

[SoiBien]

Em nghĩ là mình cứ qua đoạn sau thôi anh, còn cái kia chỉ là chi tiết sau này nâng cấp, hì hì! vẫn nhập được đầy đủ, chỉnh sửa được.

 

[ThuNghi]

Tôi copy các form trên 4r và gắn vào form-V02, "tẩu hỏa" nhờ các bạn bổ sung thêm và hòan chỉnh.
1/ Nếu 1 SoCT có > 1 dòng (ie có 2 số tiền) nhập thì ?update
2/ Gắn hộ form bebe và sub Bebe của Hiếu vào trong TBMaKH, làm sao khi chọn MaKH trong BeBe, thì TBMaKH sẽ nhận giá trị đó. Khi kiểm tra mã KH nhập vào không đúng sẽ mở form Bebe. Còn nếu vẫn không có thì cho mở from dangkyKH (chưa làm).
4/ Cần sửa BS ngày CT phải >Ngày HT.
Trong file có sử dụng cách làm của 1 số bạn. Xin cám ơn.
Form kỳ này có thêm chọn theo mã KH và nhập số tiền > 1 dòng.

 

[tuanh1979]

Cảm ơn Bác Thunghi, mình đang làm về phần :
Khi kiểm tra mã KH nhập vào không đúng sẽ mở form Bebe. Còn nếu vẫn không có thì cho mở from dangkyKH (chưa làm).
bạn làm phần này đi, mình tìm mãi mà chẳng thấy có ví dụ nào về phần này cả. À bạn làm luôn cả phần này giúp minh nữa nhé:
Nếu không nhập tên khách hàng thì không cho cập nhât mà chuyển sang phím exit luôn, nếu nhập chưa đúng thì vẫn đứng tại ô KH chứ không chuyên sang ô tiếp mất công phải dùng chuột để trở về ô cũ. Thank bạn nhé

 

[SoiBien]

Tôi copy các form trên 4r và gắn vào form-V02, "tẩu hỏa" nhờ các bạn bổ sung thêm và hòan chỉnh.
1/ Nếu 1 SoCT có > 1 dòng (ie có 2 số tiền) nhập thì ?update
2/ Gắn hộ form bebe và sub Bebe của Hiếu vào trong TBMaKH, làm sao khi chọn MaKH trong BeBe, thì TBMaKH sẽ nhận giá trị đó. Khi kiểm tra mã KH nhập vào không đúng sẽ mở form Bebe. Còn nếu vẫn không có thì cho mở from dangkyKH (chưa làm).
4/ Cần sửa BS ngày CT phải >Ngày HT.
Trong file có sử dụng cách làm của 1 số bạn. Xin cám ơn.
Form kỳ này có thêm chọn theo mã KH và nhập số tiền > 1 dòng.

Bác xem lướt qua cái, nếu đúng ý thì em sẽ sắp xếp lại.

 

[ThuNghi]

Cám ơn nhiều nhé, sẽ xem qua ngay và reply. Tưởng quên chớ, sẽ chiêu đãi 1 chầu bia với những tiên nữ if OK. Vũ Ngọc pay.
Dạo này SoiBien, anhtuan1066, duongsatdn... họat động nhiều topic quá, làm ta thất nghiệp rồi.

 

[dgvacu]

Tôi sử dụng hàm thông thường trong excel thì tạm được,nhưng form,macro thì tôi chưa từng được học cũng như biết khái niệm. Tôi có hiểu được sơ đẳng về foxpro,viét được vài CT nhỏ...bạn nào co kiến thức macro,form excel chỉ cho tôi với,có tài liệu gửi cho tôi cám ơn trước nhiều nhé thư về dgvacu@yahoo.com

 

[SoiBien]

Cám ơn nhiều nhé, sẽ xem qua ngay và reply. Tưởng quên chớ, sẽ chiêu đãi 1 chầu bia với những tiên nữ if OK. Vũ Ngọc pay.
Dạo này SoiBien, anhtuan1066, duongsatdn... họat động nhiều topic quá, làm ta thất nghiệp rồi.

Anh xem file em làm lại nhé, còn cái vụ KTMST thì em không biết nên không tham gia được.

hì hì, vậy nhường lại cho anh, em bb!