PDA

View Full Version : تبدیل کد VB.net به VB



ehsanocx
سه شنبه 18 خرداد 1389, 10:19 صبح
با سلام.
دوستان کسی می تونه این کد هارو به زبان vb تبدیل کنه؟ این کد هارو با VB.Net نوشته شده:

(MSComm1.Output = "AT" & Chr(13) & Chr(10
(MSComm1.Output = "AT+CMGF=1" & Chr(13) & Chr(10
(MSComm1.Output = "AT+CSCA=" & Chr(34) & "09350001400" & Chr(34) & Chr(13) & Chr(10
Recieved = ""
IsPrint = True
(MSComm1.Output = "AT+CMGS=" & Chr(34) & Text2.Text & Chr(34) & Chr(13
(MSComm1.Output = Text3.Text & Chr(26

ehsanocx
سه شنبه 18 خرداد 1389, 10:23 صبح
اینم کد Vb.Net :

((SerialPort1.Write("AT" & Chr(13) & Chr(10
((SerialPort1.Write("AT+CMGF=1" & Chr(13) & Chr(10
((SerialPort1.Write("AT+CSCA=" & Chr(34) & "09350001400" & Chr(34) & Chr(13) & Chr(10
(System.Threading.Thread.Sleep(500
()SerialPort1.ReadExisting
Recieved = ""
IsPrint = True

((SerialPort1.Write("AT+CMGS=" & Chr(34) & TextBox2.Text & Chr(34) & Chr(13
(System.Threading.Thread.Sleep(500
((SerialPort1.Write(TextBox3.Text & Chr(26

کد های تایپیک 1 به زبان vb هست. می خوام بدونم کد های vb.net رو درست به زبان vb تبدیل کردم؟ دوستان می تونن یه نظری بدن و اگر اشتباه تبدیل کردم اصلاح کنن؟

ehsanocx
سه شنبه 18 خرداد 1389, 10:25 صبح
توی جای تایپیک ها اشتباه شده. کد vb,net رو به کد vb تبدیل کردم ببینید درست تبدیل کردم اگر اشتباه اصلاحش کنید با تشکر .

ehsanocx
سه شنبه 18 خرداد 1389, 17:08 عصر
دوستان کسی بلد نیست؟ کسی نمیتونه کمکم کنه؟