Biểu thức trong VBA Access

1. Biểu thức trong VBA Access là gì ?

Trong VBA (Visual Basic for Applications) trong Microsoft Access, biểu thức (expression) là một đoạn mã mà bạn có thể sử dụng để thực hiện phép toán, xử lý chuỗi, so sánh, hoặc lấy giá trị từ các trường dữ liệu. Biểu thức có thể được sử dụng trong các đối tượng như trường tính toán, hộp văn bản, hoặc trong các câu lệnh VBA.

Biểu thức còn gọi là biểu thức toán học.

2. Một số loại biểu thức trong VBA Access

    Biểu thức số học

Là biểu thức thực hiện các phép toán số học (cộng, trừ, nhân, chia).

Dim result As Double
result = 5 + 10 * 2  ' Kết quả là 25

Biểu thức chuỗi

Là biểu thức kết hợp các chuỗi hoặc xử lý các chuỗi.

Dim message As String
message = "Hello" & " " & "World"  ' Kết quả là "Hello World"

Biểu thức logic

Biểu thức này sử dụng các toán tử logic như And, Or, Not để kết hợp các điều kiện.

Dim isTrue As Boolean
isTrue = (5 > 3) And (2 < 4)  ' Kết quả là True

Biểu thức so sánh

Là biểu thức so sánh các giá trị với các toán tử như =, <, >, <=, >=, <> (khác).

Dim isEqual As Boolean
isEqual = (10 = 10)  ' Kết quả là True

Biểu thức với hàm trong VBA: Bạn có thể sử dụng các hàm tích hợp sẵn trong VBA để xử lý dữ liệu, như Len(), Mid(), IIf(), Date(), DateAdd(), v.v.

Dim result As String
result = Mid("Hello, World", 8, 5)  ' Kết quả là "World"

Biểu thức trong câu truy vấn SQL

Bạn cũng có thể sử dụng biểu thức trong các câu truy vấn SQL trong Access. Ví dụ:

    SELECT ProductName, Price * 1.1 AS NewPrice
    FROM Products;

    Câu truy vấn này tính giá mới của sản phẩm sau khi cộng thêm 10% vào giá gốc.

3. Cách sử dụng biểu thức trong VBA Access

   Trong các điều kiện IF

Bạn có thể sử dụng biểu thức trong các câu lệnh If để thực hiện kiểm tra điều kiện.

Dim x As Integer
x = 10
If x > 5 Then
    MsgBox "X lớn hơn 5"
End If

Trong biểu thức tính toán trường

Nếu bạn muốn tính toán một trường trong biểu mẫu hoặc báo cáo, bạn có thể sử dụng biểu thức trực tiếp.

Me.TotalPrice = Me.Quantity * Me.UnitPrice

Trong các hộp văn bản (TextBox)

Bạn có thể sử dụng biểu thức để tính toán và hiển thị kết quả trong các hộp văn bản trên biểu mẫu hoặc báo cáo.

Me.Total = Me.Price * Me.Quantity

Sử dụng hàm IIf (Điều kiện)

Hàm IIf giúp bạn kiểm tra điều kiện và trả về giá trị khác nhau tùy theo điều kiện.

    Dim result As String
    result = IIf(5 > 3, "True", "False")  ' Kết quả là "True"