Làm thế nào để nhập dữ liệu trên form bằng công thức

[hoangminhtien]

Em có 1 form nhập dữ liệu. ở text box Text0 nếu em nhập là số thì nhập dữ liệu vào table. Bây giờ em muốn ở text box này nếu em nhập là công thức thì text box trả về giá trị của công thức sau đó nhập vào table. Ví dụ nếu em nhập là 100 thì giá trị nhập trong table sẽ là 100. nếu em nhập trong text box =1+1 thì trong giá trị nhập trong table sẽ là 2. các bác hướng dẫn em cách làm với nhé! Cám ơn các bác!

 

[sealand]

Bạn dùng hàm Eval để trả về giá trị. Khi nhập bạn phải kiểm tra không cho nhập các ký tự không có trong công thức

 

[hoangminhtien]

Cám ơn bác SEALAND. Bác có thể hướng dẫn cụ thể cho em được không ạ?

 

[sealand]

Mình xem ví dụ của bạn rồi. Việc nhập công thức vào ô Bound là không được vì nó phụ thuộc định dạng của field (Long Integer thì sao nhập được text)
Bạn ẩn text0 và thêm 1 textbox tên là Text3 nhưng Unbound (Không gắn vào đâu cả) và viết code như sau thì OK, nhập công thức nó sẽ định trị cho Text0:

Private Sub Text3_LostFocus()
Text0 = Eval(Text3)
End Sub


P/S: Mình gửi thêm ví dụ (Lưu ý nhập công thức nhưng không có dấu bằng)