Trả về một biến _ thể (số _nguyên) cho biết kết quả của một biểu thức chuỗi.
Cú pháp
Strcomp ( string1, string2 [, so sánh ] )
Cú pháp hàm Strcomp có các đối số sau đây:
|
Đối số |
Mô tả |
|
chuỗi_1 |
Bắt buộc. Bất kỳ biểu thức chuỗi hợp lệ nào. |
|
chuỗi_2 |
Bắt buộc. Bất kỳ biểu thức chuỗi hợp lệ nào. |
|
so_sánh |
Tùy chọn. Xác định kiểu so sánh chuỗi. Nếu so sánhtham đối là null, lỗi xảy ra. Nếu so sánh được bỏ qua, tùy chọn so sánh thiết đặt sẽ xác định kiểu so sánh. |
Thiết đặt
Các thiết đặt so sánh đối số là:
|
Hằng số |
Giá trị |
Mô tả |
|
vbBinaryCompare |
0 |
Thực hiện so sánh nhị phân. |
|
so sánh vbtext |
1 |
Thực hiện so sánh văn bản. |
|
vbDatabaseCompare |
2 |
chỉMicrosoft Office Access 2007. Thực hiện so sánh dựa trên thông tin trong cơ sở dữ liệu của bạn. |
Giá trị trả về
Hàm Strcomp có các giá trị trả về sau:
|
If |
Trả về strcomp |
|
string1 nhỏ hơn string2 |
-1 |
|
string1 bằng string2 |
0 |
|
string1 lớn hơn string2 |
1 |
|
string1 hoặc string2 là null |
Null |
Ví dụ về truy vấn
|
Biểu thức |
Kết quả |
|
CHỌN ProductSales. ProductID, StrComp (ProductID, "PRO_XYZ10") như ComparisonResult từ ProductSales; |
Trả về các giá trị từ trường "ProductID", so sánh các giá trị trong "ProductID" với "PRO_XYZ1" và trả về kết quả trong sánh theo cột. "ProductID" bằng "PRO_XYZ10", hàm StrComp sẽ trả về 0. Nếu "ProductID" nhỏ hơn "PRO_XYZ10", hàm StrComp sẽ trả về-1. Nếu "ProductID" lớn hơn "PRO_XYZ10", hàm StrComp sẽ trả về 1. Nếu một trong hai "ProductID" hoặc "PRO_XYZ10" là NULL, hàm StrComp sẽ trả về NULL. |
Ví dụ về VBA
Lưu ý: Các ví dụ sau thể hiện cách sử dụng hàm này trong mô-đun Visual Basic for Applications (VBA).
Ví dụ này sử dụng hàm Strcomp để trả về kết quả so sánh chuỗi. Nếu đối số thứ ba là 1, thì một so sánh văn bản được thực hiện; Nếu đối số thứ ba là 0 hoặc bỏ qua, một so sánh nhị phân được thực hiện.
Dim MyStr1, MyStr2, MyComp
MyStr1 = "ABCD": MyStr2 = "abcd" ' Define variables.
MyComp = StrComp(MyStr1, MyStr2, 1) ' Returns 0.
MyComp = StrComp(MyStr1, MyStr2, 0) ' Returns -1.
MyComp = StrComp(MyStr2, MyStr1) ' Returns 1.
