PDA

View Full Version : کمک برای تبدیل به کد c#



slashslash2009
سه شنبه 30 آبان 1391, 21:31 عصر
من این کد را دارم کارش اینه که از پورت سریال یک دستگاه کارت خوان (smart card) میخونه و مینویسه یعنی اطلاعات کارت رو هم میگیره و هم درون کارت درج میکنه
Dim i2 AsByte

Dim readcard AsString

Dim cr AsString

Dim cr2 AsString

Dim bufcard AsString * 1

Dim con AsByte

Dim i AsByte

Dim i5 AsByte

Dim MAN AsString

Dim cheker AsByte



Dim M AsByte





MSComm1.CommPort = Text1.Text

MSComm1.PortOpen = True

MSComm1.InputLen = 1





MSComm1.Output = Chr$(24)



MSComm1.Output = "180!1@"

MSComm1.Output = "182!1@"

MSComm1.Output = "184!1@"

MSComm1.Output = "186!1@"

MSComm1.Output = "188!1@"

MSComm1.Output = "190!1@"

MSComm1.Output = "192!1@"

MSComm1.Output = "194!1@"

MSComm1.Output = "196!1@"



MSComm1.Output = "198!1@"



MSComm1.Output = "#?"



Sleep 800



For i = 1 To 250

bufcard = MSComm1.Input

If bufcard = "$"Then'

Text121.Text = readcard

readcard = ""

bufcard = ""

ExitFor

EndIf

readcard = readcard + bufcard

Next i


البته این فکر کنم این تیکه کد واسه خوندن از کارت باشه دوستان اگر کسی میدونه چطوری به سی شارپ تبدیلش کنم مرسی با سریال پورت تا حالا کار نکردم

m.4.r.m
چهارشنبه 01 آذر 1391, 09:03 صبح
اول باید به vb.net تبدیل کنی بعد از وی بی دات نت به سی شارپ تبدیل کنی . موفق باشی

slashslash2009
چهارشنبه 01 آذر 1391, 18:17 عصر
بعد از اینکه به vb.net تبدیلش کردم چطور به سی شارپ تبدیلش کنم

SlowCode
چهارشنبه 01 آذر 1391, 19:06 عصر
کاری نداره کافیه به آخر هط سرط ; اضافه کنی و در بعضی جاها آکولاد بزاری{} تو کد vb.net رو بزار اینجا ما تبدیلش میکنیم به #C

amin32
چهارشنبه 01 آذر 1391, 20:35 عصر
بعد از اینکه به vb.net تبدیلش کردم چطور به سی شارپ تبدیلش کنم

سایتهای زیادی هستند که این کار رو انجام میدن. این یک نمونش:

http://www.developerfusion.com/tools/convert/vb-to-csharp/