Hỏi về việc Erase Array và Set Dictionary = Nothing trước khi End Sub (1 người xem)

Quang_Hải · 26/11/12

Theo mình kiểm tra thì thấy rằng nếu khai báo mảng hoặc Set 1 đối tượng nào đó bên trong 1 Sub, sau khi End Sub thì mảng và đối tượng sẽ bị tự động được xoá khỏi bộ nhớ máy tính.

Giả sử rằng chúng ta có khai báo Dic và Arr1(), Arr2()
Có nhiều anh chị sử dụng câu lệnh: Set Dic = Nothing và Erase Arr1, Arr2... với ý nghĩa là giải phóng bộ nhớ máy tính.

Mình cứ bâng khuâng hoài không biết là có thật sự cần thiết hay không. Các anh chị biết vui lòng giải thích giúp mình vấn đề này cũng như chia sẽ cho các bạn khác kinh nghiệm này để tối ưu hoá tốc độ của code

ptm0412 · 27/11/12

quanghai1969 đã viết:
Cái câu tiếng anh của bác Bill cũng khó hiểu quá nên em nhờ người dịch hộ thì ra thế này mà chắc gì đúng ý của bác Bill:

Khi có nhiều biến đối tượng tham chiếu đến cùng 1 đối tương, bộ nhớ và tài nguyên hệ thống đươc sử dụng cho các biến đó sẽ chỉ được giải phóng sau khi các biến được trả vể Nothing hoặc sau khi biến cuối cùng đi ra khỏi phạm vi hoạt động dù có sử dụng câu Set rõ ràng hay không.

Câu này hơi khó dịch, dịch sát nghĩa sẽ khó hiểu.

When several object variables refer to the same object, memory and system resources associated with the object to which the variables refer are released only after all of them have been set to Nothing, either explicitly using Set, or implicitly, and after the last object variable set to Nothing goes out of scope.

memory and system resources associated with the object to which the variables refer are released: Main clause

Main clause này có 2 sub clause nối bằng only:

- after all of them have been set to Nothing,
- after the last object variable set to Nothing goes out of scope

When several object variables refer to the same object là 1 adverbial clause bổ nghĩa cho cả mệnh đề chính.
either explicitly using Set, or implicitly là adverb phrase bổ nghĩa cho sub clause thứ 1,

tôi dịch là Dù biến có khai báo hay không không đúng bằng QuangHai dịch là dù có dùng Set rõ ràng hay không, nhưng vẫn dễ hiểu.

Tới đoạn goes out of scope mà dịch là ra khỏi phạm vi hoạt động thì gượng quá.

Ghi chú:
Tây viết tiếng Tây không phải lúc nào cũng đúng văn phạm và rõ ràng dễ hiểu. Chẳng hạn dấu phẩy đỏ và chữ and đỏ tôi mới thêm vào, sẽ giúp rõ nghĩa hơn 1 tí tị.

Sau khi thêm như vậy có thể dịch lại:

Khi nhiều biến đối tượng liên quan đến cùng 1 đối tượng, bộ nhớ và tài nguyên hệ thống liên kết đến đối tượng đó, chỉ có thể giải phóng sau khi gán Nothing cho tất cả các biến, dù có dùng "Set" rõ ràng hay không; và sau khi biến đối tượng cuối cùng được gán Nothing hết hoạt động.

Thí dụ ta gán Dic1, Dic2, Dic3 cùng 1 đối tượng là Scripting.Dictionary, thì bộ nhớ chỉ giải phóng sau khi set cả 3 về Nothing. Dịch câu này chỉ để phản bác 1 điều rằng chỉ riêng câu này không thể kết luận "chẳng cần Set Nothing gì ráo. Mọi thứ sẽ tự động biến mất"

Câu kết luận này chỉ có thể đưa ra sau đoạn văn kế tiếp:
VB will automatically set all object variables to Nothing when they go out of scope.
- For local variables, this happens when the procedure ends.
- For module-level variables in class modules (including forms, controls, etc), when the final release happens on the class (and after Class_Terminate is run).
- For modules, when the program terminates.

Setting them to Nothing yourself is a waste of code: VB has to check if they are Nothing anyway and always generates the code to release them, so you're just duplicating existing code.

Ngay cả đoạn này, chỉ cần xuống dòng và gạch đầu dòng đúng chỗ nó sẽ rõ ràng hơn biết bao nhiêu! Ku Tây viết đoạn này chỉ được 5 điểm môn văn.

Good-Luck · 27/11/12

quanghai1969 đã viết:
Cảm ơn các anh chị đã chia sẻ. Đọc tới đọc lui cũng thấy mù mờ quá. Thôi quyết định đọc cái này của bác Bill:

Nothing <keyword>

The Nothing keyword is used to disassociate an object variable from an actual object. Use the Set statement to assign Nothing to an object variable. For example:

Set MyObject = Nothing

Several object variables can refer to the same actual object. When Nothing is assigned to an object variable, that variable no longer refers to an actual object.
When several object variables refer to the same object, memory and system resources associated with the object to which the variables refer are released only after all of them have been set to Nothing, either explicitly using Set, or implicitly after the last object variable set to Nothing goes out of scope.

Với tuyên bố này của bác Bill thì chẳng cần Set Nothing gì ráo. Mọi thứ sẽ tự động biến mất.

Kỹ năng tiếng anh của mình chưa đủ tốt nên có thể hiểu sai câu nói của bác Bill, nhưng tạm thời cứ thế này. Sau này giỏi thêm tí nữa sẽ điều chỉnh lại quan điểm.

tiếng anh mình thì khá bị hạn chế nhưng xin đưa nội dùng này lên mong có bác đọc được và hiểu nó

Nothing 關鍵字是用來將一個物件變數從一個實際的物件裏分離開來
mình tạm dịch nó như sau : từ khóa này dùng để giải phóng đối tượng khỏi biến
(tức mình có thể dùng từ khóa trên để giải phóng biến tại bất khì thời điểm mình mong muôn)
或等待最後被設成 Nothing 的物件變數超出範圍之後。
hoặc nó sẽ tự giải phóng sau khi vượt khỏi phạm vi

tốm lại nó sẽ tự giải phóng khi kết thúc chương trình

Quang_Hải · 27/11/12

Hic, nhiều lúc chữ nào cũng biết nghĩa nhưng ráp vào 1 câu chả hiểu họ viết gì nữa, mặc dù tiếng anh của em cũng tạm được đó.
Em thấy bỏ bớt vài chữ coi bộ dễ hiễu hơn, nhưng bác Bill biết được cũng căng nghen

When several object variables refer to the same object, memory and system resources associated with the object to which the variables refer are released only after all of them have been set to Nothing, or after the last object variable set to Nothing goes out of scope.

Good-Luck · 27/11/12

quanghai1969 đã viết:
Hic, nhiều lúc chữ nào cũng biết nghĩa nhưng ráp vào 1 câu chả hiểu họ viết gì nữa, mặc dù tiếng anh của em cũng tạm được đó.
Em thấy bỏ bớt vài chữ coi bộ dễ hiễu hơn, nhưng bác Bill biết được cũng căng nghen

When several object variables refer to the same object, memory and system resources associated with the object to which the variables refer are released only after all of them have been set to Nothing, or after the last object variable set to Nothing goes out of scope.

nghe câu trên sợ quá dịch hết luôn
數個物件變數可以同時引用一個實際物件，nhiều biến có thể sự dụng cùng 1 đối tượng,
而當 Nothing 被指定給一個物件變數，nhưng nothing chỉ có thể thiết lập cho 1 đối tượng
那麼該變數將不再引用任何實際物件。khi biến không cần sử dụng bất kỳ đối tượng nào nữa
當數個物件變數同時引用一個物件，trong khi nhiều biến đang cùng sự dụng 1 đối tượng
那麼和該物件有關連的記憶體、nên các đối có sự liên quan về bộ nhớ
系統資源中被物件變數所引用到的部份，tài nguyên của hệ sẽ bị ảnh hưởng bởi các biến
只有在全部的物件變數都設成 Nothing 後才會被釋放。để giải phóng bộ nhớ khi tất cả các đối tượng được thiết lập thành nothing
而變數被設成 Nothing 的方法不外是直接使用 Set，việc thiết lập biến thành Nothing không ngoài việc sự dụng set
或等待最後被設成 Nothing 的物件變數超出範圍之後。hoặc đợi đến sau cùng Nothing được thiết lập khi biến nằm ngoài phạm vi

củ thể như trên đó, tại mình thấy những cái không cần thiết mình lọc bỏ đi thôi, không biết nội dung củ thể tiếng anh có phải vậy không ???

câu màu đỏ là câu kết luận đó.

siwtom · 27/11/12

quanghai1969 đã viết:
Mong anh Siwtom góp thêm ý kiến để mọi người có thêm kinh nghiệm, dù biết rằng thêm 1 câu lệnh nữa không nhiều nhưng không hiểu được bản chất vấn đề thì nghe sao sao ấy.

Tôi không đọc tài liệu về chuyện code trong VBA nhưng do tôi cũng từng viết trong Delphi nên tôi có thể kết luận ... khó biết lắm.
Tôi cho ví dụ trong Delphi. Ta xét Interface. Interface chỉ là interface, phải có một class nào đó implement cái interface kia. Về interface có cái gọi là "đếm số tham chiếu". Nó kiểu như có 1 cái phòng được dựng lên (1 đối tượng được tạo ra) và có 1 vị muốn làm việc với nó (tham chiếu). Mỗi khi có một vị nào đó "tham chiếu" tới cái phòng kia thì chỉ số của "đồng hồ đếm số tham chiếu" được tăng thêm 1, còn khi có vị nào đó "làm xong việc" và thôi không "quan tâm" nữa (interface = nil, nothing, set interface = nil, nothing) thì chỉ số của "đồng hồ đếm số tham chiếu" được giảm bớt 1. Khi chỉ số của "đồng hồ đếm số tham chiếu" = 0 (khi không còn vị nào "quan tâm" vì vị cuối cùng cũng "nhắn tin" là thôi không quan tâm - Set interface = Nothing) thì căn phòng - interface được "đập vỡ, tiêu hủy, hủy diệt" - căn phòng được phá đi. Vì có còn cần thiết nữa đâu?
Nếu nói về hàm để tăng chỉ số của "đồng hồ đếm số tham chiếu" thì đó là AddRef, còn lệnh giảm chỉ số của "đồng hồ đếm số tham chiếu" là Release.
Những người lập trình trong Delphi hầu như không phải gọi hàm AddRef và Release vì trong quá trình compile thì Delphi tự thêm vào những chỗ cần thiết các lệnh AddRef và Release.
Nhưng tôi thấy những người lập trình trong C++ bắt buộc phải tự mình gọi các hàm AddRef và Release.
Vậy thì tôi có câu hỏi: Như thế thì trong VBA thế nào? VBA có làm thay cho người lập trình như Delphi làm thay cho họ, hay VBA không làm thay giống như C++?
Tôi biết trong Delphi thế nào nhưng trong VBA thì chịu vì thứ nhất là tôi mới quan tâm tới VBA từ gần 1 năm nay, thứ nữa là khả năng tiếng Anh của tôi ở mức "luôn cầm từ điển trong tay và tra vài từ rồi đoán".
Dù thế nào chăng nữa thì viết Set dic = Nothing không ai dám nói là sai. Thậm chí viết:
Set dic = Nothing
Set dic = Nothing
Set dic = Nothing
cũng không ai dám nói là sai. Cùng lắm là nói: "thừa".
Nhưng các bạn cứ thử nghĩ xem. Một chuỗi "Set dic = Nothing" là mấy lần gõ? Mất mấy giây?. Và cái chuỗi đó ta viết trong code 10, 100, 1000 lần? Vậy thì viết chuỗi như thế mất thêm bao công sức, thời gian? Còn nếu nói về "thời gian thực hiện"? Ta giả sử là thực ra đối tượng sẽ được giải phóng khi ra khỏi Sub. Vậy thì viết thêm Set dic = Nothing thừa đến mức nào? Thực ra không là cái gì cả. VBA khi kiểm tra thấy dic = Nothing thì chả "giải phóng" cái gì cả. Thời gian, điện, nước chỉ tốn cho việc kiểm tra, nó chả là cái gì cả.
Vậy nếu là tôi, tức người không rõ cho lắm về những việc mà VBA làm sau "cánh gà", thì tôi sẽ viết Set dic = Nothing. Nó chả tốn mồ hôi, sức lực, điện nước là bao nhiêu nhưng tôi chắc 200% là tài nguyên được giải phóng, ngày ăn ngon miệng, tối ngủ yên giấc. Còn không thì vẫn nghi nghi hoặc hoặc, áy náy, không yên tâm. Trừ phi ông Microsoft xuất bản sách trong tiếng Việt của tôi và viết rõ ràng.
Tôi không phải là người quan tâm tiết kiệm từng xu nhưng lại vô tư phung phí hàng triệu. Có những code nếu viết cẩn thận một chút thì nó bù lại cho 1 tỷ tỷ thời gian mất vì set dic = Nothing. Kiểu tiết kiệm không phải chỗ.
Nếu cái Set dic = Nothing kia nó tốn quá nhiều công sức, thời gian điện nước thì tôi sẽ bỏ ra 1 ngày, 1 tháng, 1 năm để tìm hiểu rõ có cần hay không. Còn không thì quên đi cái chuyện tủn mủn như thế.

vodoi2x · 27/11/12

Thức khuya vậy bác (hay cũng mất ngủ ... hihiiii)

Đúng là:

siwtom đã viết:
Tôi không phải là người quan tâm tiết kiệm từng xu nhưng lại vô tư phung phí hàng triệu. Có những code nếu viết cẩn thận một chút thì nó bù lại cho 1 tỷ tỷ thời gian mất vì set dic = Nothing. Kiểu tiết kiệm không phải chỗ.
Nếu cái Set dic = Nothing kia nó tốn quá nhiều công sức, thời gian điện nước thì tôi sẽ bỏ ra 1 ngày, 1 tháng, 1 năm để tìm hiểu rõ có cần hay không. Còn không thì quên đi cái chuyện tủn mủn như thế.

Viết thêm mấy chữ, nhưng áy náy không còn tập trung sức vào việc khác phải khỏe hơn không

Còn QuangHai muốn hiểu bản chất thì cứ đọc OPP đó, thì sẽ rõ tại sao lại sinh ra cái Set Obj nothing làm chi,

---------------
Trong VB hay VBA cũng như Delphi bác siwtom - nó sẽ tự gửi thông điệp đến sử dụng class chứa đối tượng đó để hủy đi, - song nếu ta thí nghiệm sẽ thấy nó sẽ làm việc này khi cùng trong code khi biên dịch luôn (tức là class đó ta viết cùng code sử dụng đối tượng luôn). TUY nhiên ở đây đối tượng Dictionary lại khác là nó lấy từ thành phần của Scripting (DLL) đã được biên dịch trước rồi - NÊN không rõ nó có biên dịch việc (set nothing) đó cho đối tượng sử dụng ngoài vậy không - NÊN đặt Set Nothing là không thừa

siwtom · 27/11/12

vodoi2x đã viết:
Thức khuya vậy bác (hay cũng mất ngủ ... hihiiii)

Đúng là:

Viết thêm mấy chữ, nhưng áy náy không còn tập trung sức vào việc khác phải khỏe hơn không

Còn QuangHai muốn hiểu bản chất thì cứ đọc OPP đó, thì sẽ rõ tại sao lại sinh ra cái Set Obj nothing làm chi,

---------------
Trong VB hay VBA cũng như Delphi bác siwtom - nó sẽ tự gửi thông điệp đến sử dụng class chứa đối tượng đó để hủy đi, - song nếu ta thí nghiệm sẽ thấy nó sẽ làm việc này khi cùng trong code khi biên dịch luôn (tức là class đó ta viết cùng code sử dụng đối tượng luôn). TUY nhiên ở đây đối tượng Dictionary lại khác là nó lấy từ thành phần của Scripting (DLL) đã được biên dịch trước rồi - NÊN không rõ nó có biên dịch việc (set nothing) đó cho đối tượng sử dụng ngoài vậy không - NÊN đặt Set Nothing là không thừa

Tất nhiên server đã tồn tại từ lâu và các object mà server có thể tạo thì đã được đăng ký trong system rồi.
Ví dụ ta viết code:

Set dic = CreateObject("Scripting.Dictionary")
With CreateObject("new:{1C3B4210-F441-11CE-B9EA-00AA006B1A69}")

thì từ đâu biết được là đối tượng nào được tạo và do "ai" tạo?
Thì mọi thứ đã được ghi từ lâu trong Registry rồi.
Nếu bạn mở Registry: run --> regedit --> Edit --> Find --> Scripting.Dictionary hoặc {1C3B4210-F441-11CE-B9EA-00AA006B1A69}
thì bạn sẽ thấy hình như dưới đây

View attachment 92953

View attachment 92954

Các {EE09B103-97E0-11CF-978F-00A02463E06F} hay
{1C3B4210-F441-11CE-B9EA-00AA006B1A69}
là những CLSID - Class ID
Nhánh HKEY_CLASSES_ROOT\CLSID\
nhiều CLSID vô kể.
Nếu bạn mở khóa {EE09B103-97E0-11CF-978F-00A02463E06F} - Scripting.Dictionary
thì bạn nhìn thấy hình như dưới đây

View attachment 92955

Tức object do scrrun.dll tạo.
{1C3B4210-F441-11CE-B9EA-00AA006B1A69} thì là DataObject.
Tóm lại mọi object - interface có thể có trong system thì thông tin đã được ghi trong registry.
------------
Khi bạn viết CreateObject thì ông chủ system biết "bắt" ai phải tạo object và tạo object gì.
"Khách hàng", tức là bạn hay code của bạn, có được object - interface đó là do có POINTER tới interface đó.
Với interface thì có cái gọi là "đếm số tham chiếu" - AddRef (tăng thêm 1) và Release (giảm đi 1). Khi số tham chiếu = 0 thì system "hủy diệt" interface. Không có thông điệp (message) gì ở đây.
Ta có thể giảm số tham chiếu bằng cách viết Set dic = Nothing. Nhưng nếu đúng là VBA làm hộ ta thì có nghĩa là VBA đã làm hộ ta khi ra khỏi SUB bằng cách "thêm" vào một "đoạn" code.
Vấn đề chưa rõ lắm chỉ là: liệu VBA có tự thêm vào code giảm số tham chiếu hay không (khi ra khỏi SUB)? Nếu có thì ta khỏi viết Set dic = Nothing, thế thôi.

Nguyễn Duy Tuân · 27/11/12

Giả xử tôi có Class1 (minh hoạ cho các object/class cụ thể khác).
Trong VBA khi tạo một object trong một SUB/FUNCTION:

Dim obj as Class1
Set obj = CreateObject("...Class1") hoặc Set obj = New Class1 hoặc Dim obj As New Class1, VBA khởi tạo một vùng nhớ để cho nó hoạt động.

Nếu tôi viết 2 dòng lệnh
(1) Set obj = New Class1
(2) Set obj = New Class1
Trong bộ nhớ lúc này đang tồn tại hai vùng nhớ cho 2 đối tượng kiểu Class1 đang hoạt động, nhưng biến obj lưu địa chỉ của vùng nhớ tạo lần cuối cùng. Có nghĩa nếu bạn muốn điều khiển obj khởi tạo ở (1) thì rất khó vì mất địa chỉ, chỉ biết nó đang lưu lạc đâu đó.

Cuối SUB/FUNCTION tôi không dùng nữa thì Set obj = Nothing -> vùng nhớ (2) được giải phóng ngay, khi thoát khỏi SUB/FUNCTION VBA cũng tự động Set tất cả các biến object về Nothing, lúc này vùng nhớ (1) cũng được giải phóng. Vậy khi không còn dùng nữa thì Set object = Nothing nếu không làm thì VBA cũng Set object = Nothing nếu các biến obj đó không còn khả năng lưu hành trong phạm vi code của bạn.

Như vậy, nếu cuối SUB/FUNCTION không dùng tới Set obj = Nothing thì VBA tự làm cho chúng ta. Tuy nhiên trong tiến trình của SUB/FUNCTION không dùng nữa chúng ta cần thiết gán Set obj = Nothing để giải phóng nó (phá huỷ nó). Bạn hình dung, bạn đang có 2 cửa hàng phải thuê, nếu 1 cửa hàng không còn dùng đến nó thì cần hủy nó ngay chứ để đến cuối năm (cuối SUB/FUNCTION, set obj = Nothing bởi bạn hay VBA) mới hủy nó thì mất toi tiền nuôi nó (bộ nhớ bị chiến dụng), để nó tồn tại ở hoàn cảnh nào đó (sự độc lập) có thể không hại chủ, tuy nhiên nếu cửa hàng đó vẫn tồn tại và liên lụy tới ông chủ thì có đáng tiêu diệt nó không. Ví dụ Class1 có viết sự kiện cho việc nhấp đúp chuột vào bảng tính. Nếu tạo nó 2 lần thì sự kiện nhấp đúp chuột chạy 2 lần, trong khi chỉ cần 1 lần.

Phần lớn các Class/Object được thiết kế chuẩn khi biến kiểu của nó gán là Nothing thì người lập trình viết tất cả các lệnh cần thiết để giải phóng bộ nhớ (trong VB/VBA chính là sự kiện Class_Terminate(), trong Delphi là Destroy()). Tuy nhiên vì lý do đặc thù nào đó mà một phần của nó không được giải phóng hết thì ta cần đọc tài liệu để biết cần chạy SUB/FUNCTION nào trước khi gán nó là Nothing. Ví dụ các đối tượng trong VBA: Excel.Application, Word.Application,..., thủ tục Quit() là cần phải chạy, với ADO là ADODB.Connection thủ tục Close() cần phải chạy.
Nếu code của bạn là

Dim MyApp As Object
Set MyApp = CreateObject("Excel.Application")
MyApp.Visible = True

Cuối SUB/FUNCTION dù bạn gán MyApp = Nothing hay không thì Excel vẫn đang tồn tại trong bộ nhớ.

Về thủ tục Quit, Close chỉ biết khi đọc tài liệu gốc, những lưu ý từ nhà lập trình ra nó, hoặc kinh nghiệm sử dụng lâu mới biết được.

Với tôi thì luôn làm theo một tôn chỉ, những đối tượng tạo bởi CreateObject(), Set...New nếu không dùng đến luôn giải phóng nó Set...Nothing, dù biết có những việc VBA tự làm cho mình.

Quang_Hải · 27/11/12

Theo quan điểm của mình thì nếu là 1 lập trình viên chuyên nghiệp thì mỗi một câu lệnh đều phải mang ý nghĩa riêng của nó.
Còn đối với những người tham gia cho vui, hoặc chỉ để xử lý công việc thì cứ thêm cái dòng code vô hại đó vào trước khi End Sub chắc cũng không ảnh hưởng gì.

ndu96081631 · 27/11/12

quanghai1969 đã viết:
Theo quan điểm của mình thì nếu là 1 lập trình viên chuyên nghiệp thì mỗi một câu lệnh đều phải mang ý nghĩa riêng của nó.
Còn đối với những người tham gia cho vui, hoặc chỉ để xử lý công việc thì cứ thêm cái dòng code vô hại đó vào trước khi End Sub chắc cũng không ảnh hưởng gì.

Lấy 1 ví dụ khác nhé:
- Khi viết code, đôi khi phải dùng qua 1 biến tạm để nhằm tăng tốc chạy code ---> Tôi thí nghiệm và chắc chắn việc làm này là hiểu quả, vậy tôi sẽ làm (tăng hiệu suất làm việc)
- Khi đặt tên biến, tôi học được cách đặt tên sao cho cô động súc tích, để bất kỳ ai (dù là Tây hay Ta) nhìn vào cũng biết được tác dụng của biến thông qua cái tên (bố trí code cho dễ đọc)
vân... vân...
--------------
Vậy Set Nothing gì gì đó, làm cũng tốt mà không làm cũng không sao ---> Ít nhất với trình độ của tôi hiện giờ, tôi chả thấy có Nothing vào nó "ngon" hơn gì so với không có Nothing cả
Với tôi, người học lập trình không qua trường lớp thì KINH NGHIỆM là thứ quan trọng nhất ---> Cứ thí nghiệm rồi tự rút ra kết luận ---> Vậy chắc chắn rằng đến khi nào tôi thấy nó CẦN THIẾT thì tôi sẽ dùng... Hoặc đến khi nào tôi đủ sức viết 1 chương trình lớn và thấy rằng nếu không có Set Nothing thì máy tính sẽ "nặng" và "treo" chẳng han, thì tôi sẽ dùng
Đơn giản vậy thôi!
Ẹc... Ẹc...

app · 27/11/12

Có mấy ý góp chuyện thế này với anh nhé!

Trở về gần ...20 năm trước lúc VBA mới khai sinh. Thời điểm đó 1 chiếc PC chỉ có khoảng vài trăm KB bộ nhớ, khủng lắm là vài MB.
http://en.wikipedia.org/wiki/Visual_Basic_for_Applications

Do hạn hẹp về bộ nhỚ nên các bậc sinh thành ra VBA mới nghĩ đến việc phải giải phóng bộ nhớ cho các ObjecT khi xong việc. Bởi một Object bình thường khi được sử dụng đến sẽ chiếm khoảng vài Byte đến vài KB nghĩa là ở thời điểm đó sẽ chiếm dụng tương đối dung lượng RAM (vài %).

Trở lại hiện thực 20 năm sau, năm 2012 mỗi chiếc PC hiện nay đã trang bị từ 2GB đến 32GB. Kể cả 1 chiếc máy PC đời cũ cũng có khoảng 256MB (Đời máy 2004) nghĩa là về dung lượng RAM đã gấp khoảng mấy trăm.. hoặc đúng hơn là vài ngàn lần so với thời điểm khi mà VBA mới ra đời. Chưa kể các hệ điều hành hiện nay đều có cơ chế quản lý bộ nhớ tối ưu hơn rất nhiều so với bản Windows 9x trước đó. Do vậy kể cả một chương trình có ngốn hết gần hết số RAM của bạn nhưng chẳng may bị đơ (crash) - mất khả năng quản lý bộ nhớ đã chiếm dụng thì sau khi nó bị Windows kick out xong, những gì mà nó lưu giữ trong RAM cũng được Windows giải thoát trong vòng vài giây.

Trừ khi là bạn phải dùng Object vài trăm lượt hoặc nhiều hơn, nếu chỉ dùng đến Object vài lượt thì cũng không cần quá bận tâm làm gì. Windows hoặc Compiler hiện nay đã rất thông minh và nhiệt tình để giải quyết gần hết những việc vụn vặt này.

Tuy nhiên, nếu có "mở bải - thân bài - kết luận" cho mỗi Object thì nhìn có vẻ hay hơn nhỉ?

ndu96081631 · 27/11/12

app đã viết:
Có mấy ý góp chuyện thế này với anh nhé!

Trở về gần ...20 năm về trước lúc VBA mới khai sinh. Thời điểm đó 1 chiếc PC chỉ có khoảng vài trăm KB bộ nhỡ, khủng lắm là vài MB.
http://en.wikipedia.org/wiki/Visual_Basic_for_Applications

Do hạn hẹp về bộ nhỚ nên các bậc sinh thành ra VBA mới nghĩ đến việc phải giải phóng bộ nhớ cho các ObjecT. Bởi một Object bình thường khi được sử dụng đến sẽ chiếm khoảng vài Byte đến vài KB nghĩa là ở thời điểm đó sẽ chiếm dụng tương đối dung lượng RAM (vài %).

Trở lại hiện thực 20 năm sau, năm 2012 mỗi chiếc PC hiện nay đã trang bị từ 2GB đến 32GB. Kể cả 1 chiếc máy PC đời cũ cũng có khoảng 256MB (Đời máy 2004) nghĩa là về dung lượng RAM đã gấp khoảng mấy trăm.. hoặc đúng hơn là vài ngàn lần so với thời điểm khi mà VBA mới ra đời. Chưa kể các hệ điều hành hiện nay để có cơ chế quản lý bộ nhớ tối ưu hơn rất nhiều so với bản Windows 9x trước đó. Do vậy kể cả một chương trình có ngốn hết gần hết số RAM của bạn nhưng chẳng may bị đơ (crash) thì sau khi nó bị Windows kick out xong thì những gì mà chiếm trong bộ nhớ RAM cũng được Windows giải thoát trong vòng vài giây.

Trừ khi là bạn phải dùng Object vài trăm lượt hoặc nhiều hơn, nếu chỉ dùng đến Object vài lượt thì cũng không cần quá bận tâm làm gì. Windows hoặc Compiler hiện nay đã rất thông minh và nhiệt tình để giải quyết gần hết những việc vụn vặt này.

Tuy nhiên, nếu có "mở bải - thân bài - kết luận" cho mỗi Object thì nhìn có vẻ hay hơn nhỉ?

Nghe có vẻ giống như việc người ta tranh luận nhau có nên dọn sạch file tmp trên máy tinh hay không ấy nhỉ?
Ẹc... Ẹc... nghe cũng có lý!

jack nt · 13/12/14

Dọn dẹp sạch sẽ sau khi dùng xong là một thói quen tốt.

Các bạn tìm hiểu về Stack và Heap là rõ thôi.
Link: http://dotnet.edu.vn/ChuyenMuc/Tim-hieu-Stack--Heap-trong-C-411.aspx

P/S: với các biến dùng trong các sub/function (thực hiện trong stack) sẽ tự động bị dẹp khi dùng xong, nên tui cũng hay lười không Set nothing. nhưng mà nếu dùng nhiều object trong đó thì cũng nên set nothing khi dùng xong mỗi cái cho đỡ vướng.

Hỏi về việc Erase Array và Set Dictionary = Nothing trước khi End Sub (1 người xem)

Người dùng đang xem chủ đề này

Quang_Hải

Thành viên gạo cội

ptm0412

Bad Excel Member

Good-Luck

Thành viên tiêu biểu

Quang_Hải

Thành viên gạo cội

Good-Luck

Thành viên tiêu biểu

siwtom

Thành viên gắn bó

vodoi2x

Nothing & Nothing

siwtom

Thành viên gắn bó

Nguyễn Duy Tuân

Nghị Hách

Quang_Hải

Thành viên gạo cội

ndu96081631

Huyền thoại GPE

app

Thành viên hoạt động

ndu96081631

Huyền thoại GPE

jack nt

Thành viên thường trực

Bài viết mới nhất

Thành viên có số lượng bài viết cao nhất tháng

Thành viên có điểm tương tác cao nhất tháng

Đếm ngược thời gian