Em đang làm dề tài tốt nghiệp dùng vi xu ly dể hiển thi LCD va đồng hồ thời gian thực nhưng có phần giao tiếp với PC phai dung phần mềm Visual Basic để viết chương trinh giao tiếp với PC nhưng em chưa hiểu rõ lắm về vấn dề này mong các anh chỉ giúp với. Xin cảm ơn các anh nhiều. Thank
Thông báo
Collapse
No announcement yet.
Giao tiếp máy tinh dung visual basic ( IC 89C52)
Collapse
X
-
Bạn xem tài liệu này sẽ rõ. Đây là tài liệu của một bạn nào đó đã đưa lên, tôi up lại để bạn tham khảo. Tài liệu rất đầy đủ và chi tiết.
Chúc bạn thành công!Attached FilesMột bông hồng cho những ai đang còn mẹ,
Đang còn mẹ để lòng vui sướng hơn ..
-
Luồn này khá hay sao hơn một năm rồi ko thấy các cao thủ post bài tiếp vậy?
Các bác cao thủ trở lại hâm nóng chủ đề này đi.
Hình như để tạo giao diện điều khiển ta có thể dùng visual C++ thay cho VB được phải ko các bác?Phần mềm nào tiện lợi hơn nhỉ?
Thanks!
Comment
-
Đề bài của mình chỉ là gửi số 0 > 9 ra 8051 thôi, ko có nhận dữ liệu, chỉ xuất thôi nha.
Vừa tập viết VB6, đưa lên mọi người test giùm nha.
Private Sub cmdClear_Click()
Text1.Text = ""
End Sub
Private Sub cmdExit_Click()
MSComm1.PortOpen = False
End
End Sub
Private Sub cmdSent_Click()
MSComm1.Output = Text1.Text
End Sub
Private Sub Form_Load()
MSComm1.Settings = "9600,n,8,1"
MSComm1.InputMode = 1
MSComm1.PortOpen = True
End Sub
Comment
-
Cái này không có kiểm tra kí tự thì làm sao biết gửi từ 0 đến 9, gõ chữ a thử rồi gửi đi xem nào. Hehe.
Technical sale at WT Microelectronics S'pore
Hỗ trợ dự án sử dụng các hãng Texas Instrument, STMicro, Freescale, Fairchild, International Rectifier, Ublox, Lumiled, Maxim
Liên hệ: 0915.560.511 hoặc ngo.haibac@wtmec.com
Comment
-
Đã thay đổi, thêm vào đièu kiện 0 > 9, nhưng sao nó ko hiện Msgbox nhỉVì em mới học VB sáng nay nên mọi người test giùm nha. Chỉ sợ Syntax hok có đúng.
Private Sub cmdSent_Click()
Dim txt As Integer
If txt < 0 And txt > 9 Then
MsgBox ("Chi dc nhap so tu 0 > 9")
End If
MSComm1.Output = Text1.Text
End Sub
Comment
-
Mình lập trình Asembly cho 89S52 và dùng VB, nếu bạn cần có thể liên hệ với mình, hy vọng chương trình của mình sẽ giúp bạn có cái nhìn tốt hơn, dễ dàng hơn khi tiếp cận với vấn đề : Giao tiếp giữa 8051 với máy tính - Thời gian thực DS1307- Đo và điều khiển nhiệt độ LM35, ADC...
PC,files của mình bị virus nên không gửi qua mail được. Files Mediafire thì lỗi, mình chỉ Send được khi Chat thôi.
http://dientuvietnam.net/forums/showthread.php?t=23938
LBF anhduc_dtvn@yahoo.comanhduc
Comment
-
Bạn chú ý, khi minh gửi dữ liệu từ PC xuống thì nó là mã ASCII. Ví dụ bạn gửi số 1 thì 8051 nhận được là số 49 Dec, tức 30 Hexa,vvv...
Mình không làm như bạn ở câu lệnh này: MSComm1.InputMode = 1 (Binary)
Mình dùng MSComm1.InputMode = 0 (Text)
Nó có 1 số ưu điểm mà mình sẽ nói đến sau, vì giờ cũng muộn rồi mà.
* LBF *anhduc
Comment
-
Em cũng đang làm cái này, em có vấn đề nhỏ,mong các bác chỉ giáo
data của em truyền lên PC từ vi điều khiển nó có 4 byte liên tiếp, em muốn truyền hết lên PC rồi mỗi byte đưa vào 1 textbox, nhưng mỗi lần truyền chỉ được 1 byte, em không làm thế nào lập trình để mỗi byte hiện lên trên 1 Textbox đc, vì nếu gõ lại lệnh dùng đến MSComm1.Input hay dùng vòng lặp thì khi chạy với vdk nó báo lỗi luôn, chắc là khi đó nó không biết giá trị đầu vào đưa vào đâu.
Ai có kinh nghiệm xử lý cái này hay có thủ thuật nào chỉ giáo cho e với
Private Sub MSComm1_OnComm()
Dim j As String
If MSComm1.CommEvent = comEvReceive Then
j = MSComm1.Input 'Nhan chuoi du lieu to VCOM
Text1.Text = j
End If
End Sub
Comment
-
Nguyên văn bởi hoanganh1001 Xem bài viếtmình đang làm một bài tập liên quan đên giao tiếp giữa máy tính với vda6p5bang VB ,cụ thể là con 89c51rd2xx
các bạn cho mình hỏi.
có cách nào có thể lấy dữ liệu từ con 89c51 về máy tính ko.
và có bạn nào có mạch giao tiếp mày tính với 89c51rd2xx bằn VB KO.
Code:MAIN: lcall setting NHAN: LCALL NUTNHAN JNB RI,TRUYEN MOV A,SBUF CLR RI LCALL SOSANH TRUYEN: lcall nutnhan JNB TI,NHAN CLR TI MOV SBUF,A jnb ti,$ clr ti ljmp thoat SETTING: MOV TMOD,#20H MOV SCON,#50H ;TRUYEN 8 BIT DU LIEU,NO PARITY MOV TH1,#(-3) ;TOC DO 9600 SETB TR1 setb es setb ea RET
Hiện mình đang có 2 nút nhấn, muốn đếm 2 giá trị từ 2 nút nhất vào vdk và đưa lên máy tính, nhưng nghẹt nỗi mình chưa biết cách đếm như thế nào, mình chỉ biết có 2 chân là P3.2 và P3.3 đùng để đếm vào, nhưng chưa biết dùng lệnh ra sao. Bác nào có code mẩu ko, cho e tham khảo với
Comment
-
Tài liệu này có ích đấy.
Comment
Bài viết mới nhất
Collapse
-
bởi sikodo.tanhỐng nhựa là vật liệu được sử dụng phổ biến trong các hệ thống đường ống, mang lại nhiều ưu điểm vượt trội so với các loại vật liệu truyền thống như kim loại. Trong số các loại ống nhựa, 3 dòng sản phẩm UPVC SCH40, UPVC SCH80...
-
Channel: Quảng cáo
hôm nay, 08:46 -
-
bởi sikodo.tanhỐng nhựa là vật liệu được sử dụng phổ biến trong các hệ thống đường ống, mang lại nhiều ưu điểm vượt trội so với các loại vật liệu truyền thống như kim loại. Trong số các loại ống nhựa, 3 dòng sản phẩm UPVC SCH40, UPVC SCH80...
-
Channel: Quảng cáo
hôm nay, 08:39 -
-
bởi sikodo.tanhỐng nhựa là vật liệu được sử dụng phổ biến trong các hệ thống đường ống, mang lại nhiều ưu điểm vượt trội so với các loại vật liệu truyền thống như kim loại. Trong số các loại ống nhựa, 3 dòng sản phẩm UPVC SCH40, UPVC SCH80...
-
Channel: Quảng cáo
hôm nay, 08:38 -
-
Trả lời cho Hỏi về thay màn hình laptopbởi HTTTTHHồi tôi mới vào nghề, 1980, TV đèn điện tử chân không còn là phổ biến.
TV nhà bác tôi bị pan có hình mất tiếng. Tôi thấy 1 cái đèn bị bạc đầu, biết là nó hư, rút ra thấy nó có mã là 16A8 và nó có 9 chán.
Tôi cũng có cả chục...-
Channel: Thiết bị điện tử cá nhân
Hôm qua, 21:02 -
-
bởi afrendlyXin chào mọi người. Mình có laptop cũ hỏng màn hình mà bỏ thì uổng. Mình tháo ra thì thấy mã màn LTD133EV3D. Mình tìm trên mạng khó mua đúng loại. Mình tìm hiểu thì loại màn này 40pin. Vậy cho mình hỏi nếu mình mua màn 40pin khác cùng kích thước thì lắp vào được không? Xin cảm ơn.
...-
Channel: Thiết bị điện tử cá nhân
Hôm qua, 16:32 -
-
Trả lời cho Xóa ngay và luônbởi nguyendinhvanNó không quạn trọng lắm đâu.
Nó không đóng góp được vào sự phát triển khoa học kỹ thuật điện tử của ... abc
Nó không phải là phương tiện công nghệ thông tin để kết nối liên kết giữa các ... abc
Nó chỉ là một sản...-
Channel: Thông báo
25-07-2024, 00:07 -
-
Trả lời cho Có nên xóa nick lão Nguyên Đinh Vặn không???bởi vi van phamHết say chưa? Uống 3 giờ rượu nồng độ cồn cao, đốt cháy được, không xỉn mới lạ.
Bà xã Nhathung bế nhathung vào phòng ngũ đó. Làm gì có chuyện trẻ eo ngang rốn già leo đến nách. Đinh vặn và Teo hẳn biết chuyện này cưởi cho đấy....-
Channel: Tâm tình dân kỹ thuật
20-07-2024, 20:55 -
-
Trả lời cho Có nên xóa nick lão Nguyên Đinh Vặn không???bởi nhathung1101Tại em quên đeo kính. Giờ xem lại mới thấy là cô ấy ôm eo bác.
Mà lạ nhỉ! Hồi trẻ eo chỉ ngang rốn, giờ eo nó leo lên đến nách......-
Channel: Tâm tình dân kỹ thuật
19-07-2024, 15:08 -
-
Trả lời cho Xóa ngay và luônbởi nhathung1101Thì nổi lềnh phềnh từ lâu rồi mà.
Mấy ku người Mỹ (Đình), Pháp (Vân), Đức (Phổ) là tham gia nhiệt tình lắm...
Nhưng sợ nhất mấy ku hàng xóm, bên kia Hà Khẩu hay Ka Long.-
Channel: Thông báo
18-07-2024, 21:48 -
-
Trả lời cho Xóa ngay và luônbởi nguyendinhvanChả lẽ ĐTVN nổi tiếng world rồi hay sao ?...
-
Channel: Thông báo
18-07-2024, 20:38 -
Comment