Đánh giá chủ đề:
  • 0 Votes - 0 Average
  • 1
  • 2
  • 3
  • 4
  • 5
Dùng biến mảng như thế nào
#1
Thưa các bác, em có các table khác nhau là: table1, table2, table3....
Em muốn dùng mảng để câu lệnh như sau nó ngắn lại thì viết thế nào ạ?

Mã:
If TableExists("table1") = True Then
DoCmd.DeleteObject acTable, "table1"
End If

If TableExists("table2") = True Then
DoCmd.DeleteObject acTable, "table2"
End If

If TableExists("table3") = True Then
DoCmd.DeleteObject acTable, "table3"
End If
..................................................

Em cám ơn các bác!
Chữ ký của meohenmiao Xin chào, mình là meohenmiao, Tham gia http://thuthuataccess.com/forum từ ngày 15-02 -12.
Reply
Những người đã cảm ơn
#2
Mã:
[code]Dim i as Integer
Dim n as Interger
n= 3 ' thay số n bằng 1 số bất kỳ thể hiện phần đuôi tên bảng
For i=1 to n
If TableExists("table" & i ) = true Then
DoCmd.DeleteObject acTable, "table" &i
End If
Next i


Chữ ký của Noname 020
ღღღღღTài sản của Noname (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
Sad [Help] Tạo menu bằng Macro để mở các file trong HDD mà sử dụng thường xuyên nghesysay 0 506 10-06-14, 11:14 AM
Bài mới nhất: nghesysay
  Access: Help Phân quyền người dùng sử dụng các tính năng trên Menu bienxanhlunglinh 12 7,628 08-03-14, 11:36 PM
Bài mới nhất: MatTroiNguQuen

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ơ