Chào mừng, Khách
Bạn cần phải đăng ký trước khi bạn có thể đăng trên trang web của chúng tôi.

Tên người dùng
  

Mật khẩu
  





Diễn đàn Tìm kiếm

(Tìm kiếm nâng cao)

Diễn đàn Thống kê
» Thành viên: 3,326
» Thành viên mới nhất: link2.leadtrave
» Các chủ đề diễn đàn: 8,669
» Các bài viết diễn: 38,015

Thống kê đầy đủ

Thành viên online
Hiện đang có 33 người dùng trực tuyến.
» 0 Thành viên | 30 Khách
AhrefsBot, Bing, Google

Chủ đề Mới nhất
[Góc thơ] THAO THỨC
Chuyên mục: Góc Thơ
Đăng bởi lần cuối: Nguyễn Thành Sáng
Hôm qua, 04:00 PM
» Bài trả lời: 867
» Lượt xem: 91,074
Nhờ phục hồi file .mdb (A...
Chuyên mục: Vấn đề chung
Đăng bởi lần cuối: Xuân Thanh
Hôm qua, 09:52 AM
» Bài trả lời: 8
» Lượt xem: 269
Hỏi về Copy File
Chuyên mục: Thủ thuật VBA
Đăng bởi lần cuối: Xuân Thanh
Hôm qua, 09:00 AM
» Bài trả lời: 5
» Lượt xem: 197
Xuất dữ liệu trong báo cá...
Chuyên mục: Report
Đăng bởi lần cuối: ongke0711
Hôm qua, 08:26 AM
» Bài trả lời: 2
» Lượt xem: 86
Tìm kiếm Record ngay khi ...
Chuyên mục: Forms
Đăng bởi lần cuối: ongke0711
Hôm qua, 08:04 AM
» Bài trả lời: 12
» Lượt xem: 1,336
chèn hình theo điều kiện
Chuyên mục: Forms
Đăng bởi lần cuối: ongke0711
22-03-19, 11:23 PM
» Bài trả lời: 24
» Lượt xem: 1,102
Cannot open any more data...
Chuyên mục: Query
Đăng bởi lần cuối: toidjtjmtoi
22-03-19, 12:25 PM
» Bài trả lời: 0
» Lượt xem: 44
Liên kết giữa 2 tabcontro...
Chuyên mục: Forms
Đăng bởi lần cuối: lmthu
22-03-19, 09:25 AM
» Bài trả lời: 1
» Lượt xem: 88
[Demo Phần 1] Tạo khóa bả...
Chuyên mục: Thư viện thủ thuật
Đăng bởi lần cuối: Minh Tiên
18-03-19, 11:32 AM
» Bài trả lời: 16
» Lượt xem: 2,036
DeMo tạo Key có bản quyền
Chuyên mục: Thư viện thủ thuật
Đăng bởi lần cuối: Minh Tiên
18-03-19, 11:31 AM
» Bài trả lời: 11
» Lượt xem: 593

 
  Hiện duy nhất một cửa sổ khi mở nhiều form
Viết bởi: Noname - 09-08-10, 01:43 AM - Chuyên mục: Thư viện thủ thuật - Bài trả lời (5)

Trích:
Các bạn giúp mình với, làm sao khi mở một From VD From này la From Main, trong From Main này có các Nút lệnh để mở các From khác. Thì làm sao khi mở một From khác thì trên Takbar không xuất hiện From này mà vẩn còn From Main hiện diện trên Taskbar. Vì nếu tôi mở nhiều Fron trên một chương trình thì Taskbar sẻ đầy.

Trích dẫn:Bạn chỉ cần vào Tools/options

Bỏ dấu check ở mục Windows on Taskbar. khi đó trên Task bar chỉ còn duy nhất 1 màn hình Access thôi, bạn thư nhé.
----------------------
sanyovietnam in MaNguon

Trích dẫn:Trích:
Nguyên văn bởi hungtano
Bổ sung :
Vì Access luôn chọn Check box Windows on Taskbar = True (default) nên nếu đem file mdb của bạn sang máy khác thì sẽ gặp lại trường hợp nhiều cửa sổ trên taskbar.
Cách tổng quát hơn :
Khi mở form Startup bạn thêm dòng lệnh :

Private Sub Form_Open(Cancel As Integer)
Application.SetOption "ShowWindowsInTaskbar", False
End Sub

In mục này

  Kiểm tra 1 form trong chương trình đã được mở hay chưa!
Viết bởi: Noname - 09-08-10, 01:39 AM - Chuyên mục: Forms - Bài trả lời (2)

Trong access, đôi khi bạn cần kiểm tra một form có đang load hay chưa để lấy về thông số, tránh động tác thừa vì đôi khi load lên một form dạng bảng, có nhiều đối tượng là rất lâu.
Function dưới đây sẽ giúp bạn giải quyết vấn đề đó một cách dễ dàng

Code:

Mã:
Function fIsLoaded(ByVal strFormName As String) As Boolean
'Giá trị trả về là 0 nếu chưa mở, -1 là đã mở rồi
    If SysCmd(acSysCmdGetObjectState, acForm, strFormName) <> 0 Then
        If Forms(strFormName).CurrentView <> 0 Then
            fIsLoaded = True
        End If
    End If
End Function
'****** Code End ********
===================================================
Cách 2:
Đơn giản hơn ta xét Function :

Mã:
If CurrentProject.AllForms("YourFormName").IsLoaded = True Then
do something
Else:
do something else
End If

In mục này

  Xuống dòng trong Msgbox
Viết bởi: Noname - 09-08-10, 01:36 AM - Chuyên mục: Thư viện thủ thuật - Bài trả lời (5)

Access 97 trở về trước khi xuống dòng dùng ký tự @. Access gần đây dùng vbCrLf để xuống dòng. Việc chủ động xuống dòng trong Msgbox giúp hiển thị thông báo rõ ràng hơn.

Mã:
MsgBox "1. Hello!" & vbCrLf & "2. Xin chào các bạn!" & vbCrLf & "3. Seeuagain!", vbInformation, "Message"

In mục này

  Export dữ liệu ra excel
Viết bởi: Noname - 09-08-10, 01:34 AM - Chuyên mục: Tương tác Chương trình ngoài - Bài trả lời (37)

Không phải mọi thứ Access đều có thể giúp được bạn, đôi khi phải vận dụng linh hoạt với Excel.
Câu lệnh Export một đối tượng Access ra Excel

Mã:
DoCmd.OutputTo Kiểu đối tượng, "tên đối tượng", "MicrosoftExcelBiff8(*.xls)", "", True, "", 0

Ví dụ bạn đẩy một query tên là DThutheothang ra excel:

DoCmd.OutputTo acQuery, "DThutheothang", "MicrosoftExcelBiff8(*.xls)", "", True, "", 0

Hoặc là:
Mã:
DoCmd.TransferSpreadsheet acExport, 8, "qryA", "c:\A.xls", False, ""

Trong trường hợp Export ra excel bị lỗi font Unicode. Bạn có thể tạo 1 macro với Action OutputTo

In mục này

  Convert Null thành zero
Viết bởi: Noname - 09-08-10, 01:31 AM - Chuyên mục: Thư Viện Hàm - Bài trả lời (5)

Khi bạn phải cộng trừ với 1 giá trị rỗng, lập tức sẽ bị báo lỗi dữ liệu. Nhất là trường hợp các bạn dùng left join sẽ bị cộng khi bên kia không tìm thấy khóa. Vì vậy một mẹo nhỏ là bạn tạo một hàm đển convert giá trị null thành số 0. Sau đó, mỗi khi cộng trừ nhân chia thì ta thêm trước field đó dòng NZ([field chứa giá trị])
Convert Null-Zero

Mã:
Trích:
Function NZ(anyValue As Variant) As Variant
NZ = IIf(IsNull(anyValue), 0, anyValue)
End Function

In mục này

Diễn Đàn Thơ Văn Thi Ẩm Lâu|Nhà Hàng Sông Thơ| PMA Nha Trang| Gỗ Acrylic Không Đường Line| Phần mềm quản lý bán hàng, công nợ- tồn kho- nhà phân phối