for each myControl in form1.controls
   dim pos1 as integer=instr(leng+2,myControl.id,"-")
   if left(myControl.id,leng+1)=str1 and pos1=0 then myControl.visible=true
   next
  else
   Sender.ImageUrl="close.gif"
   for each myControl in form1.controls
   dim str0 as string=myControl.id
   if left(myControl.id,leng+1)=str1 then
   dim dTable as table
   dtable=ctype(myControl,table)
   if dtable.controls.count>0 then
   dim rowControl as control
   for each rowControl in dtable.controls
   dim drow as tablerow
   drow=ctype(rowControl,tablerow)
   if drow.controls.count>0 then
   dim cellControl as control
   for each cellControl in drow.controls
   dim dcell as tablecell
   dcell=ctype(cellControl,TableCell)
   if dcell.controls.count>0 then
   dim imageControl as control
   for each imageControl in dcell.controls
   dim dimage as imageButton
   dimage=ctype(imageControl,imageButton)
   dimage.ImageUrl="close.gif"
   next
   end if
   next
   end if
   next
   end if
   myControl.visible=false
   end if
   next
  end if
  End Sub
  
  
  
 &n

上一页  [1] [2] [3] [4] [5] [6] [7] [8] [9] [10]  ... 下一页  >> 

在google里搜索更多用ASP.NET在同一网页中显示主从关系表的相关数据

	Web www.51ec.org

上一篇信息学院： 在Visual C# .NET中建立平滑的进度条…

下一篇信息学院： 用IE的Web服务建立ASP.NET应用程序