这里我还是不太明白,我按照你给的代码测试了一下,会把这个列里面的3个图片名称依次显示,但是我是想通过代码实现把图片显示出来
Select
Case e.Path
Case
"test.htm"
Dim wb As New weui
wb.AddForm("","form1","test.htm")
With wb.AddInputGroup("form1","ipg1","客户资料")
.AddInput("姓名","姓名","text").value = "舒淇"
.AddInput("地点","地点","text").Value = "蒙古草原"
.AddInput("日期","日期","date").value = #10/12/2012#
With .AddUploader("up1","",True)
.AllowAdd = False
'关闭文件上传功能
.AddImage("./images/001.jpg")
.AddImage("./images/002.jpg")
.AddImage("./images/003.jpg")
.AddImage("./images/004.jpg")
.AddImage("./images/005.jpg")
.AddImage("./images/006.jpg")
.AddImage("./images/007.jpg")
.AddImage("./images/008.jpg")
.AddImage("./images/009.jpg")
.AddImage("./images/010.jpg")
.AddImage("./images/011.jpg")
.AddImage("./images/012.jpg")
End
With
End
With
e.WriteString(wb.Build) '生成网页
End
Select
但是他是依次显示的,这里该怎么操作呢