在这一句
Row1=ds1.Tables("dept").Rows(0)
之后执行:DropDownList4.DataBind()

解决方案 »

  1.   

    Dim Row1 As DataRow 
    Row1=ds1.Tables("dept").Rows(0) 
    '''''dropdownlist4.selecteditem.text=row1("dp_name") 
    '''''dropdownlist4.selecteditem.value=row1("dp_id") dropdownlist4.SelectedItem.Selected = falsedropdownlist4.Items.FindByText( row1("dp_name").ToString() ).Selected = true;
      

  2.   

    zhq2000(俗子) 谢谢你帮我搞定它!!!
    以后还请多多指教!!
    小妹在此谢过!!
      

  3.   

    对了,zhq2000(俗子) ,请问可不可以解释一下
    dropdownlist4.SelectedItem.Selected = false 
    dropdownlist4.Items.FindByText( row1("dp_name").ToString() ).Selected = true
    后一句话的意思???
      

  4.   

    DropDownList的成员Items 的类型是 ListItemCollection , 
    它的方法中有两个用于定位项的方法: 
    function FindByText( ItemText As string ) As ListItem 
    这个方法是通过列表项的Text属性的值来定位(查找)。 function FindByValue( ItemValue As string ) As ListItem 
    这个方法则是通过列表项的value属性的值来定位(查找)。 dropdownlist4.Items.FindByText( row1("dp_name").ToString() ).Selected = true 
    就是找到列表项中Text值等于 row1("dp_name")的值的那一项,并且选中它! 
    其实可以分解为: 
    Dim item As ListItem = dropdownlist4.Items.FindByText( row1("dp_name").ToString() ) 
    item.Selected = true 有一点要注意的是,由于 DropDownList 中的项只能是单选,所以在通过Selected属性选中项时,一定要先将前一个被选中的项的selected设为false,否则将会出错;但是,通过DropDownList.SelectedIndex来选中项时不会发生这种错误!