Suganda Suganda

Suganda Suganda

  • NA
  • 24
  • 10.8k

Help to convert Microsoft.VisualBasic.Right to C# code

Mar 12 2018 7:10 PM
I have vb.net code, i try the code to C#. But microsoft.visualbasic.right not found in C# code. I don't know how to convert that. Can you help me to convert this code?
 
This is vb.net code
  1. Sub Autonumber()  
  2.         'Koneksi()  
  3.   
  4.         Dim _Urutan As String  
  5.         Dim _Hitung, _Cari As Long  
  6.   
  7.         CMD = New OdbcCommand("Select * from data where kode in " &  
  8.                                          "(select max(kode) from data)", CONN)  
  9.         RD = CMD.ExecuteReader  
  10.         RD.Read()  
  11.         If Not RD.HasRows Then  
  12.             _Urutan = "K" & "001"  
  13.         Else  
  14.             _Cari = Microsoft.VisualBasic.Right(RD.GetString(0), 3)  
  15.             If Microsoft.VisualBasic.Left(RD.GetString(0), 1) <> "K" Then  
  16.                 _Urutan = "K" & "001"  
  17.             Else  
  18.                 _Hitung = Microsoft.VisualBasic.Right(RD.GetString(0), 3) + 1  
  19.                 _Urutan = "K" & Microsoft.VisualBasic.Right("000" & _Hitung, 3)  
  20.             End If  
  21.         End If  
  22.         RD.Close()  
  23.         txtCode.Text = _Urutan  
  24.     End Sub  
This in c# code 
  1. public void Autonumber()  
  2.         {  
  3.             string _Urutan;  
  4.             long _Hitung, _Cari;  
  5.             CMD = new OdbcCommand("Select * from data where kode in " + "(select max(kode) from data)", CONN);  
  6.             RD = CMD.ExecuteReader();  
  7.             RD.Read();  
  8.             if (!RD.HasRows)  
  9.             {  
  10.                 _Urutan = "K" + "001";  
  11.             }  
  12.             else  
  13.             {  
  14.                 _Cari = Microsoft.VisualBasic.Right(RD.GetString(0), 3);  
  15.                 if (Microsoft.VisualBasic.Left(RD.GetString(0), 1) != "K")  
  16.                 {  
  17.                     _Urutan = "K" + "001";  
  18.                 }  
  19.                 else  
  20.                 {  
  21.                     _Hitung = Microsoft.VisualBasic.Right(RD.GetString(0), 3) + 1;  
  22.                     _Urutan = "K" + Microsoft.VisualBasic.Right("000" + _Hitung, 3);  
  23.                 }  
  24.             }  
  25.   
  26.             RD.Close();  
  27.             txtCode.Text = _Urutan;  
  28.         }  
 

Answers (3)