主题：[求助]希望代码能简洁一点

我昨天折腾了图片控件，还是半成品。 估计是系统的bug 。图片会显示，但是不完美。

 

今天，我使用了图片浏览器控件，就是pictureviewer1 。  我使用了代码去除最下面的 增加，删除 ，打开，重连等按钮。

  代码如下：

 

    

Dim pv As WinForm.PictureViewer = e.Form.Controls("PictureViewer1")
pv.DeleteCommand.Visible = False
pv.openCommand.Visible = False

pv.Addcommand.visible = False
pv.fullviewcommand.visible = False
pv.managercommand.visible = False
pv.stretchcommand.visible = False
pv.updatecommand.visible = False
pv.saveascommand.visible = False
pv.deletecommand.visible = False
pv.clearcommand.visible = False
pv.connectcommand.visible = False

 

 

我现在想，这么多代码，能否简单一点啊。  这个也太长了。

 

这个只能一个个设置.

已经很简单了，其实不算长。

1、图片控件测试很正常啊；

 

2、可以用代码控制

 

Dim obj As object = e.Form.Controls("PictureViewer1").basecontrol.Controls(0)
'obj.SplitterDistance= obj.Height
obj.panel2.controls("FlowLayoutPanel2").Controls.clear

to 大红袍版主。

 图片控件测试是可以使用的，这个首先是没有疑问的。  但是 ，使用远程FTP服务器文件是有问题的 。   具体体现在这样子：

    第一步：  一条一条记录查看，有些有图片，有些没有显示。（更多的是没有图片）

    第二步：当没有图片时候，可以点击照片列（这样可以显示图片）。（照片列的列属性里面设置好fTP地址，根目录）

    第三步：点击其余记录。

    第四步：回到刚才图片控件的窗口。这样就显示出来了。

 

 

 反复这样。不可能就是我的巧合啊。

 

 那你就用PictureViewer1吧，能用就行。