تبدیل کدویژوال بیسیک به سی شارپ

[h.gheidrlou]

137444
سلام دوستان لطفا کد تبدیل شده به زبان سی شارپ را یکی بکمکم کنه
باتشکر فراوان

[h.gheidrlou]

Imports System.Data.SqlClient
Imports System.IO
Public Class Form1
Dim con As New SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirector y|\Database1.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True")
Dim com As New SqlCommand
Sub loadd()
con.Close()
con.Open()
Dim dta As New SqlDataAdapter("select * from daneshjoo", con)
Dim dtabel As New DataTable
dta.Fill(dtabel)
DataGridView1.DataSource = dtabel
con.Close()
End Sub
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
Dim dta As New SqlDataAdapter("select * from daneshjoo where nomreh=20 ", con)
Dim ds As New DataSet
Dim dtabel As New DataTable("daneshjoo")
dta.Fill(dtabel) 'ds.Tables(0).Rows.Clear()
ds.Tables.Add(dtabel)
StiReport1.Load("Report 1.mrt")
StiReport1.RegData(ds)
StiReport1.Dictionary.Synchronize()
StiReport1.Show()
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
loadd()
End Sub
End Class


این هم کدهای فوق

[vb341]

Imports System.Data.SqlClient
Imports System.IO
Public Class Form1
Dim con As New SqlConnection("Data Source=.\SQLEXPRESS;AttachDbFilename=|DataDirector y|\Database1.mdf;Integrated Security=True;Connect Timeout=30;User Instance=True")
Dim com As New SqlCommand
Sub loadd()
con.Close()
con.Open()
Dim dta As New SqlDataAdapter("select * from daneshjoo", con)
Dim dtabel As New DataTable
dta.Fill(dtabel)
DataGridView1.DataSource = dtabel
con.Close()
End Sub
Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
Dim dta As New SqlDataAdapter("select * from daneshjoo where nomreh=20 ", con)
Dim ds As New DataSet
Dim dtabel As New DataTable("daneshjoo")
dta.Fill(dtabel) 'ds.Tables(0).Rows.Clear()
ds.Tables.Add(dtabel)
StiReport1.Load("Report 1.mrt")
StiReport1.RegData(ds)
StiReport1.Dictionary.Synchronize()
StiReport1.Show()
End Sub

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
loadd()
End Sub
End Class


این هم کدهای فوق

دوست عزیز این که همون کد وی بی هست
لطفا به دنبال راههای ساده نباشید . حداقل یه کتاب مختصر و ساده سی شارپ مطالعه کنید میتونید به راحتی معادل سی سارپ رو بنویسید . چون اینبار رو بهتون کمک میکنن . برای هر کد شما میخوای معادل رو بپرسی ؟

[h.gheidrlou]

شما اگر خیلی ناراحتی اصلا نیاز نیست توی سایت بگردی. من برای اموزش و ارائه مطلب پرسیدم شما نمیخواد اصلا جواب بدی. من خودم کد سی سارپ را بلدم

[h.gheidrlou]

137512
این هم برای دوستان عزیز