کجای این کد بهترین کد هست؟نقل قول:
نوشته شده توسط 09111111111
فکر می کنم این کد
With TextBox1
.Text = .Text.Substring(0, .Text.Length - 1)
End With
هم تا حدی بدرد بخوره نه؟
دوستان عزیز کدها رو تست کردم و کد بالا بهترین کدی بود که می شد استفاده کرد اما وقتی textbox خالی می شد error می داد کد کامل رو براتون می زارم
این کد فقط می تونه از آخر پاک کنه اگه کابر بخواد از وسط پاک کنه چی؟
من با C# نوشتم کاملا هم کار می کنه خودت به vb تبدیل کن
public Form1()
{
InitializeComponent();
foreach (Control item inthis.Controls)
{
item.Enter+=newEventHandler(Control_Enter);
item.Leave += newEventHandler(Control_Leave);
}
}
privatevoid button1_Click(object sender, EventArgs e)
{
SendKeys.Send("\b");
}
privatevoid Control_Enter(object sender, EventArgs e)
{
Control cont = sender asControl;
if (LeavedControl != null && cont.Name == "button1")
{
this.LeavedControl.Focus();
}
}
Control LeavedControl;
privatevoid Control_Leave(object sender, EventArgs e)
{
this.LeavedControl = sender asControl;
}
پاسخ با نقل قول