Calculator trên User Form (1 người xem)

[ongtrungducmx25]

ai biết cách làm Calculator, chỉ em với em muốn làm một máy tính để tính toán trong UseFrom cơ!

 

[Châu Bá Thông]

Mấy cái này có sẵn không xài! Tôi nghĩ những vấn đề như thế này không nhất thiết phải động não nhiều đúng không!? Ngay cả trong Window đã có công cụ calculator, ngay trong bảng tính excel đã có (có thể làm phép tính ngay trên sheet)! Vậy mục đích yêu cầu này để làm gì! Cho đẹp hay để luyện công!?

 

[ongtrungducmx25]

không mình muốn tính trên From cơ trong máy tính cũng có nhưng không đẹp lắm trong bảng tính thì có nhưng mình muốn làm để thử tính toán riêng cho dể ,mỗi lần tính toán kiểm tra lại thì phải vào start/Progame/Accessories/Calculator thì lâu phải mà không có tính thẩm mỹ nữa.

 

[tedaynui]

ai biết cách làm Calculator, chỉ em với em muốn làm một máy tính để tính toán trong UseFrom cơ!

Chào bác Windows có sẵn sao ta lại phải viết chi cho khổ. Thật ra, không đơn giản đâu, bẫy lỗi tùm lum luôn đó. Ví dụ Định dạng số cho đẹp, Chỉ cho nhập số 0-9, ... Ta có thể gọi máy tính của Windows từ VBA như sau : Sub MayTinh() / Dim RetVal / RetVal = Shell("C:\WINDOWS\system32\calc.exe", 1) / End Sub / Bác test lại xem sao nhé. Thân TDN ======== Hôm nay lạ quá không cách nào đưa vào tag code hay php được; mà cũng không xuống dòng được Bác thông cảm, code xuống dòng tại dấu gạch chéo (/)

 

[ndu96081631]

Chào bác Windows có sẵn sao ta lại phải viết chi cho khổ. Thật ra, không đơn giản đâu, bẫy lỗi tùm lum luôn đó. Ví dụ Định dạng số cho đẹp, Chỉ cho nhập số 0-9, ... Ta có thể gọi máy tính của Windows từ VBA như sau : Sub MayTinh() / Dim RetVal / RetVal = Shell("C:\WINDOWS\system32\calc.exe", 1) / End Sub / Bác test lại xem sao nhé. Thân TDN ======== Hôm nay lạ quá không cách nào đưa vào tag code hay php được; mà cũng không xuống dòng được Bác thông cảm, code xuống dòng tại dấu gạch chéo (/)

Giúp thầy Phước 1 tay:

Sub MayTinh()
  Dim RetVal
  RetVal = Shell("C:\WINDOWS\system32\calc.exe", 1)
End Sub

Hỏi thêm 1 câu nữa:
Nếu muốn lấy kết quả trên Calculator thì làm thế nào?

 

[OverAC]

Chào bác,
Đọc câu hỏi của bác em nghĩ ngay tới google. Và em đã google cụm từ "Source code Calculator VB"
Kết quả em có cái này.
Nếu bác không thích có thể google thêm. Thân.
OverAC

http://www.engin.umd.umich.edu/CIS/course.des/cis400/vbasic/vbcalc.html

Và rất nhiều nữa.

 

[rollover79]

Muốn gọi Calculator của Window, nhấn phím Window+R(Run), gõ vào Calc. Muốn copy hay paste ở đây thì dùng menu Edit.

 

[ndu96081631]

Muốn gọi Calculator của Window, nhấn phím Window+R(Run), gõ vào Calc. Muốn copy hay paste ở đây thì dùng menu Edit.

Ai dza... Hỏng phải thế
- Ta gọi Calulate từ Excel
- Tính toán xong, lấy kết quả cũng bằng Excel luôn ---> Không Copy hay Edit gì cả
Không biết có được không nhỉ?

 

[rollover79]

Ai dza... Hỏng phải thế
- Ta gọi Calulate từ Excel
- Tính toán xong, lấy kết quả cũng bằng Excel luôn ---> Không Copy hay Edit gì cả
Không biết có được không nhỉ?

Chưa hiểu ý của bạn. Gọi bằng Excel thì ok rồi, nhưng còn vụ lấy kết quả bằng excel thì chưa được thông cho lắm. Khi nào thì lấy? Dựa vào sự kiện nào? Làm sao biết người dùng tính toán xong và làm sao biết lấy kết quả nào?

 

[ndu96081631]

Chưa hiểu ý của bạn. Gọi bằng Excel thì ok rồi, nhưng còn vụ lấy kết quả bằng excel thì chưa được thông cho lắm. Khi nào thì lấy? Dựa vào sự kiện nào? Làm sao biết người dùng tính toán xong và làm sao biết lấy kết quả nào?

Thì vậy
- Tôi cũng không biết sẽ lấy kết quả bằng sự kiện gì!
- Tôi cũng không biết làm thế nào để xác định người dùng đã tính toán xong!
Chỉ hỏi để tham khảo ---> Vì biết đâu có người đã từng làm

 

[sealand]

Trong phần mềm kế toán Bravo viết trên VS Fox cũng sử dụng máy tính của Wind. Khi enter thì kết quả sẽ Paste vào ô đang làm việc. Như vậy, nó lấy được kết quả của máy tính giống như dùng lệnh copy rồi paste

 

[BNTT]

Gửi các bạn cái này xem chơi...

Trong file này tôi có sử dụng phần ClassModule của anh Tuân (tuanvnuni).

Chú thích thêm (trong file quên nói):

• Nút mũi tên là để thụt lui lại một chữ số
• Nút CE là để xóa nguyên một con số (nhưng phép tính với con số đó vẫn bảo lưu)
• Nút C là để xóa hẳn một phép tính