[ali_ahmed12]

السلام عليكم ممكن تحويل كود تالي الي سي شارب دالة قمت بتحويله ومتغيرات 
لكن في sqldataadapter كيف اكتب نص اتصال له

كود :

Imports System.Data.SqlClient
Module Module1
   Public con As SqlConnection = New SqlConnection("server='" & My.Settings.server & "'; database='" & My.Settings.database & "';integrated security =true ")
   Public id, pwd, fullname, usertype As String
   Public Function CODE_GENE(TABLENAME, ID_) As Integer

       CODE_GENE = 0
       Dim DT As New DataTable
       Dim DA As New SqlDataAdapter("select *from " & TABLENAME & " ORDER BY " & ID_ & "", Module1.con)
       DA.Fill(DT)
       If DT.Rows.Count <> 0 Then
           Dim I = DT.Rows.Count - 1
           CODE_GENE = Val(DT.Rows(I).Item(ID_))
       End If
   End Function
End Module