Kiểu dữ liệu số nguyên VBA | Hướng dẫn hoàn chỉnh để sử dụng Kiểu dữ liệu số nguyên trong VBA
Số nguyên là một kiểu dữ liệu trong VBA được cấp cho bất kỳ biến nào để giữ các giá trị nguyên, các giới hạn hoặc dấu ngoặc cho số của một biến số nguyên có thể giữ trong VBA tương tự như trong các ngôn ngữ khác, bất kỳ biến nào cũng được định nghĩa là số nguyên bằng cách sử dụng câu lệnh DIM hoặc từ khóa trong VBA.
Số nguyên VBA trong Excel
Kiểu dữ liệu rất quan trọng trong bất kỳ ngôn ngữ mã hóa nào vì tất cả khai báo biến phải được thực hiện theo kiểu dữ liệu gán cho các biến đó. Chúng ta có một số kiểu dữ liệu để làm việc và mỗi kiểu dữ liệu có những ưu và nhược điểm riêng đi kèm với nó. Khi chúng ta khai báo các biến, điều quan trọng là phải biết chi tiết về kiểu dữ liệu cụ thể. Đây là bài viết dành riêng cho kiểu dữ liệu "Số nguyên" trong VBA. Chúng tôi sẽ cho bạn thấy bức tranh toàn cảnh về kiểu dữ liệu "Số nguyên".
Kiểu dữ liệu số nguyên là gì?
Số nguyên là số nguyên có thể là số dương, số âm và số 0 nhưng không phải là số phân số. Trong ngữ cảnh VBA, “Số nguyên” là kiểu dữ liệu mà chúng tôi gán cho các biến. Nó là một kiểu dữ liệu số có thể chứa các số nguyên mà không có vị trí thập phân. Kiểu dữ liệu số nguyên 2 byte lưu trữ bằng một nửa của kiểu dữ liệu VBA LONG tức là 4 byte.
Ví dụ về kiểu dữ liệu số nguyên VBA trong Excel
Dưới đây là các ví dụ về kiểu dữ liệu số nguyên VBA.
Bạn có thể tải xuống Mẫu kiểu dữ liệu số nguyên VBA này tại đây - Mẫu kiểu dữ liệu số nguyên VBAVí dụ 1
Khi chúng ta khai báo một biến, cần phải gán một kiểu dữ liệu cho nó và số nguyên một trong số chúng thường được sử dụng bởi tất cả người dùng dựa trên các yêu cầu.
Như tôi đã nói với số nguyên chỉ có thể chứa các số nguyên, không chứa bất kỳ số phân số nào. Làm theo các bước dưới đây để xem ví dụ về kiểu dữ liệu số nguyên VBA.
Bước 1: Khai báo biến là Số nguyên.
Mã:
Sub Integer_Example () Dim k As Integer End Sub
Bước 2: Gán giá trị 500 cho biến “k”.
Mã:
Sub Integer_Example1 () Dim k As Integer k = 500 End Sub
Bước 3: Hiển thị giá trị trong hộp thông báo VBA.
Mã:
Sub Integer_Example1 () Dim k As Integer k = 500 MsgBox k End Sub
Khi chúng tôi chạy mã bằng phím F5 hoặc sau đó theo cách thủ công, chúng tôi có thể thấy 500 trong hộp thông báo.
Ví dụ số 2
Bây giờ tôi sẽ gán giá trị là -500 cho biến “k”.
Mã:
Sub Integer_Example2 () Dim k As Integer k = -500 MsgBox k End Sub
Chạy mã này theo cách thủ công hoặc nhấn F5 sau đó, nó cũng sẽ hiển thị giá trị -500 trong hộp thông báo.
Ví dụ # 3
Như tôi đã nói với VBA kiểu dữ liệu Integer chỉ có thể chứa số nguyên không phải số phân số như 25.655 hoặc 47.145.
Tuy nhiên, tôi sẽ cố gắng gán số phân số cho kiểu dữ liệu VBA Integer. Để biết ví dụ, hãy xem đoạn mã dưới đây.
Mã:
Sub Integer_Example3 () Dim k As Integer k = 85.456 MsgBox k End Sub
Tôi đã gán 85,456 cho biến “k”. Tôi sẽ chạy mã VBA này để xem kết quả là gì.
- Nó đã trả về kết quả là 85 mặc dù tôi đã gán giá trị của số phân số. Điều này là do VBA làm tròn số phân số thành số nguyên gần nhất.
- Tất cả số phân số nhỏ hơn 0,5 sẽ được làm tròn xuống số nguyên gần nhất. Ví dụ 2.456 = 2, 45.475 = 45.
- Tất cả số phân số lớn hơn 0,5 sẽ được làm tròn đến số nguyên gần nhất. Ví dụ 10,56 = 11, 14,789 = 15.
Để có một cái nhìn khác về số nguyên làm tròn, hãy để giá trị của “k” là 85,58.
Mã:
Sub Integer_Example3 () Dim k As Integer k = 85,58 MsgBox k End Sub
Khi tôi chạy mã này bằng phím F5 hoặc theo cách thủ công, nó sẽ trả về 86 vì bất kỳ thứ gì lớn hơn 0,5 sẽ được làm tròn thành số nguyên tiếp theo.
Hạn chế của kiểu dữ liệu số nguyên trong Excel VBA
Lỗi tràn: Kiểu dữ liệu số nguyên sẽ hoạt động tốt miễn là giá trị được gán nằm trong khoảng từ -32768 đến 32767. Thời điểm nó vượt qua giới hạn ở một trong hai bên, nó sẽ gây ra lỗi cho bạn.
Để biết ví dụ, hãy xem đoạn mã dưới đây.
Mã:
Sub Integer_Example4 () Dim k As Integer k = 40000 MsgBox k End Sub
Tôi đã gán giá trị 40000 cho biến “k”.
Vì tôi có đầy đủ kiến thức về Kiểu dữ liệu số nguyên nên chắc chắn tôi biết nó không hoạt động vì kiểu dữ liệu số nguyên không thể giữ giá trị lớn hơn 32767.
Hãy chạy mã theo cách thủ công hoặc thông qua phím F5 và xem điều gì sẽ xảy ra.
Giáo sư !!!
Tôi gặp lỗi là "Tràn" vì kiểu dữ liệu Số nguyên không thể chứa bất kỳ thứ gì nhiều hơn 32767 cho số dương và -32768 cho số âm.
Loại Lỗi không khớp: Dữ liệu số nguyên chỉ có thể chứa các giá trị số trong khoảng từ -32768 đến 32767. Nếu bất kỳ số nào được gán nhiều hơn các số này sẽ hiển thị lỗi Tràn.
Bây giờ tôi sẽ cố gắng gán giá trị văn bản hoặc chuỗi cho nó. Trong mã ví dụ dưới đây, tôi đã gán giá trị là “Xin chào”.
Mã:
Sub Integer_Example4 () Dim k As Integer k = "Xin chào" MsgBox k End Sub
Tôi sẽ chạy mã này thông qua tùy chọn chạy hoặc theo cách thủ công và xem điều gì sẽ xảy ra.
Nó hiển thị lỗi là "Loại không khớp" vì chúng tôi không thể gán giá trị văn bản cho biến "kiểu dữ liệu số nguyên".
