把ameng_2002的代码翻译成VB的: if (e.Item.ItemIndex>=0) Then Dim mycheckbox As CheckBox Dim mytextbox As TextBox mycheckbox = CType(e.Item.FindControl("checkboxid"),CheckBox) mytextbox = CType(e.Item.FindControl("textboxid"),TextBox) mycheckbox.Attributes.Add("onclick","if(this.checked)document.all."+mytextbox.ClientID+".disabled=true"); End If
private void DataGrid1_ItemDataBound(object sender, System.Web.UI.WebControls.DataGridItemEventArgs e)
{
if(e.Item.ItemIndex>=0)
{
CheckBox mycheckbox=(CheckBox)e.Item.FindControl("checkboxid");
TextBox mytextbox=(TextBox)e.Item.FindControl("textboxid");
mycheckbox.Attributes.Add("onclick","if(this.checked)document.all."+mytextbox.ClientID+".disabled=true");
}
}
Dim mytextbox As TextBox
mycheckbox = CType(e.Item.FindControl("checkboxid"),CheckBox)
mytextbox = CType(e.Item.FindControl("textboxid"),TextBox)
mycheckbox.Attributes.Add("onclick","if(this.checked)document.all."+mytextbox.ClientID+".disabled=true"); End If