编译错误:没有为“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
加好友 
发短信
Post By：2018/9/17 9:52:00 [显示全部帖子]
