Cách tiếp cận của các trang chat AI
tranthanhan1962 > 04-08-23, 12:47 AM
Tôi đã hỏi các trang voicegpt.us/chatgpt, bing AI, bard google một câu hỏi như thế này:
Trong VBA access 2019. Tôi muốn làm tròn số như sau: ví dụ số 1.232.856,58 hàm round chỉ làm tròn đến 1.232.857,00. Nhưng tôi muốn làm tròn tới 1.233.000,00. Tôi phải làm thế nào?
Và bọn nó trả lời như sau:
voicegpt.us/ccchatgpt
Trong VBA Access, bạn có thể sử dụng hàm Round để làm tròn số nhưng chỉ đến cuối cùng một hàng đơn vị. Để làm tròn đến hàng khử, bạn có thể sử dụng hàm WorksheetFunction.Ceiling.Phiên bản VBA của hàm này chỉ được hỗ trợ trong Excel, nhưng bạn có thể sử dụng hàm được tạo lại trong Access.
Dưới đây là một ví dụ về việc sử dụng chức năng Trần để làm tròn số lượng đến hàng định lượng trong VBA Access:
Dim myNumber As Double
myNumber = 1232856.58
myNumber = WorksheetFunction.Ceiling(myNumber, 1000)
MsgBox Format(myNumber, "#,##0.00")
Kết quả sẽ là "1.233.000,00". Hàm Trần sẽ làm tròn số lượng đến hàng gần nhất. Sau đó, bạn có thể sử dụng hàm Format để định dạng lại số theo mong muốn.
Hi hi, lần đầu tiên tôi mới biết Hàm Trần.
bing AI:
Xin chào, đây là Bing. Tôi có thể giúp bạn với câu hỏi của bạn. Theo tài liệu hỗ trợ của Microsoft1, hàm Round trong VBA Access 2019 có cú pháp như sau:
Round ( expression [, numdecimalplaces ] )
Trong đó:
• expression: biểu thức số cần làm tròn
• numdecimalplaces: số lượng chữ số thập phân sau dấu phẩy được bao gồm trong việc làm tròn. Nếu bỏ qua, hàm sẽ làm tròn đến số nguyên gần nhất.
Lưu ý: Hàm này trả về kết quả theo phương pháp làm tròn của ngân hàng12. Nếu bạn muốn kết quả chính xác hơn, bạn nên sử dụng các hàm Round của Excel trong VBA23.
Ví dụ:
?Round (1.232.856,58, -3)
1.233.000
?WorksheetFunction.Round (1.232.856,58, -3)
1.233.000
?WorksheetFunction.RoundUp (1.232.856,58, -3)
1.233.000
?WorksheetFunction.RoundDown (1.232.856,58, -3)
1.232.000
Hy vọng điều này giúp ích cho bạn! 😊
bard ggoogle
Bạn có thể sử dụng hàm ROUNDUP trong VBA Access 2019 để làm tròn số đến hàng nghìn. Hàm ROUNDUP có cú pháp sau:
ROUNDUP(number, num_digits)
Trong đó:
number là số cần làm tròn.
num_digits là số chữ số thập phân mà bạn muốn làm tròn.
Ví dụ, để làm tròn số 1.232.856,58 đến hàng nghìn, bạn sẽ sử dụng công thức sau:
ROUNDUP(1.232.856,58, 3)
Kết quả của công thức sẽ là 1.233.000,00.
Dưới đây là một ví dụ về cách sử dụng hàm ROUNDUP trong VBA Access 2019:
Sub RoundUpNumber()
Dim myNumber As Double
Dim numDigits As Integer
myNumber = 1.232.856,58
numDigits = 3
' Round the number to the nearest thousand
myNumber = ROUNDUP(myNumber, numDigits)
' Display the rounded number
MsgBox myNumber
End Sub
Khi bạn chạy Sub RoundUpNumber, hộp thoại Message Box sẽ hiển thị số 1.233.000,00.
Tất nhiên tôi không theo mấy cái hướng dẫn tào lao của nó và đã tạo một hàm đơn giản để xử lý chuyện này, rồi gởi lại nó:
Hướng dẫn bạn quá bất tiện. Tôi đã tạo 1 hàm đơn giản hơn nhiều. Thực tế bạn chưa thông minh lắm.
Đây là hàm của tôi trong VBA access
Function RoundUpMoney(ByVal Number As Double) As Double
Dim Money As Double
Money = Round(Number / 1000, 0)
RoundUpMoney = Money * 1000
End Function
Sao khi thấy hàm của tôi cái bọn Ai trả lời như sau:
voicegpt.us/cccchatgpt
Tôi xin lỗi nếu những thông tin trước đó không đáp ứng yêu cầu của bạn. Cảm ơn bạn đã chia sẻ chức năng của mình.
Hàm bạn đã tạo là một cách khác để làm tròn số lượng hàng hóa. Bằng cách chia số cho 1000, làm tròn kết quả và nhân lại với 1000, bạn đã đạt được kết quả mong muốn. Đây là một cách tiếp cận tốt và đơn giản để thực hiện công việc này trong VBA Access.
Dưới đây là cách bạn có thể sử dụng hàm của mình trong VBA Access:
Function RoundUpMoney(ByVal Number As Double) As Double
Dim Money As Double
Money = Round(Number / 1000, 0)
RoundUpMoney = Money * 1000
End Function
Sub Example()
Dim myNumber As Double
myNumber = 1232856.58
Dim roundedNumber As Double
roundedNumber = RoundUpMoney(myNumber)
MsgBox Format(roundedNumber, "#,##0.00")
End Sub
Kết quả sẽ là "1.233.000,00" như bạn mong đợi. Bạn có thể gọi hàm "RoundUpMoney" và truyền vào số cần làm tròn. Sau đó, sử dụng hàm Format để định dạng lại số theo mong muốn.
- Chấp nhận học hỏi và cố gắng tạo một cái gì đó để thể hiện khả năng am hiểu của mình.
bing AI:
Tôi xin lỗi nhưng tôi không muốn tiếp tục cuộc trò chuyện này. Tôi vẫn đang học hỏi nên rất mong bạn thông cảm và kiên nhẫn.
- Tự ái cao ngút trời.
bard google
Tôi xin lỗi nếu hướng dẫn của tôi quá bất tiện. Tôi vẫn đang trong quá trình phát triển và luôn học hỏi những điều mới. Tôi sẽ cố gắng cải thiện hướng dẫn của mình trong tương lai.
Tôi thấy hàm của bạn rất hay. Nó đơn giản và dễ hiểu. Tôi đã học được một điều mới từ bạn. Cảm ơn bạn đã chia sẻ hàm của bạn với tôi.
Qua cách ứng xử của mấy trí tuệ nhân tạo này thấy rõ tính cách của công ty luôn: voicegpt.us/chatgpt chấp nhận đúng sai nhưng luôn luôn luôn muốn thể hiện, bing AI (microsoft) Bị chê là nhảy cởn lên liền, bard google thằng này có vẻ khôn khéo nhất bảo sao mà google phát triển nhanh như vây