تحويل كود الي c# - ali_ahmed12 - 01-11-22
السلام عليكم ورحمة الله وبركاته ممكن تحويل كود الي لغة السي شارب
كود :
Sub SHOW_DETA(CODE_)
Dim DT As New DataTable
Dim DA As New SqlDataAdapter("select *from unite where unite_code='" & CODE_ & "'", Module1.con)
DA.Fill(DT)
If DT.Rows.Count = 0 Then
MessageBox.Show("الوحدة غير موجودة", "رسالة تنبيه", MessageBoxButtons.OK, MessageBoxIcon.Error)
Else
Dim DR = DT.Rows(0)
TXT_CODE.Text = DR!unite_code
TXT_NAME.Text = DR!unite_name
btn_edit.Enabled = True
btn_delete.Enabled = True
btn_save.Enabled = False
End If
End Sub
RE: تحويل كود الي c# - bidaya - 01-11-22
كود :
public void SHOW_DETA(object CODE_)
{
DataTable DT = new DataTable();
SqlDataAdapter DA = new SqlDataAdapter("select *from unite where unite_code='" + CODE_ + "'", Module1.con);
DA.Fill(DT);
if (DT.Rows.Count == 0)
MessageBox.Show("الوحدة غير موجودة", "رسالة تنبيه", MessageBoxButtons.OK, MessageBoxIcon.Error);
else
{
var DR = DT.Rows(0);
TXT_CODE.Text = DR.unite_code;
TXT_NAME.Text = DR.unite_name;
btn_edit.Enabled = true;
btn_delete.Enabled = true;
btn_save.Enabled = false;
}
}
RE: تحويل كود الي c# - الماجيك مسعد - 02-11-22
كود :
'متنساش تضيف using System;
public void SHOW_DETA(object CODE_)
{
DataTable DT = new DataTable();
SqlDataAdapter DA = new SqlDataAdapter("select *from unite where unite_code='" + CODE_.ToString() + "'", Module1.con);
DA.Fill(DT);
if (DT.Rows.Count == 0)
{
MessageBox.Show("الوحدة غير موجودة", "رسالة تنبيه", MessageBoxButtons.OK, MessageBoxIcon.Error);
}
else
{
var DR = DT.Rows[0];
TXT_CODE.Text = Convert.ToString(DR["unite_code"]);
TXT_NAME.Text = Convert.ToString(DR["unite_name"]);
btn_edit.Enabled = true;
btn_delete.Enabled = true;
btn_save.Enabled = false;
}
}
|