以文本方式查看主题 - Foxtable(狐表) (http://foxtable.net/bbs/index.asp) -- 专家坐堂 (http://foxtable.net/bbs/list.asp?boardid=2) ---- 请教:向AddPanelGroup动态添加项目报错 (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=124948) |
-- 作者:bahamute -- 发布时间:2018/9/17 9:52:00 -- 请教:向AddPanelGroup动态添加项目报错 编译错误:没有为“Public Function Add(id As String, Title As String, content As
String, [image As String = ""], [href As String = ""]) As
wPanel”的参数“content”指定参数。 With wb.AddPanelGroup("","pg2","文字组合列表") For i As Integer = 0 To ary2.length -1 Dim s As String = ary2(i) Dim file As String = files(i) With .Add("pn" & i,s.SubString(s.LastIndexOf("\\")+1,"www") \'带有子链接 \'.AddFoot("文档日期:file.LastWriteTime") \'.AddFoot("|点此下载","\'" & newpath & "/" & s.SubString(s.LastIndexOf("\\")+1) & "\'") End With Next End With |
-- 作者:有点甜 -- 发布时间:2018/9/17 9:56:00 -- With .Add("pn" & i,s.SubString(s.LastIndexOf("\\")+1),"www") \'带有子链接 |