1.如何向任务栏中的任务再添加下一级任务？
此主题相关图片如下：qq图片20160908100731.png
Dim bm As WinForm.TopicPage = fll.Pages("部门村居")
bm.Links.Clear
For Each bmmc As String In DataTables("自定义字段").GetComboListString("名称","类别 = '部门村居'","_identify").split("|")
Dim kg As String = new String ("",16-bmmc.Length*2) '定义kg的空格字符串,长度为16-部门名称的长度*2
bm.Links.Add(bmmc,bmmc & kg & "(" & DataTables("员工资料").sqlCompute("count(_identify)","部门村居 = '" & bmmc & "'") & "人)" )
Next
只能实现添加村居，村居下面还有组，列名为“组别”，请问如何添加？
2.
此主题相关图片如下：qq图片20160908110331.png
括号中的数字位数不一样，如何格式化成统一的对齐数字？
加好友 
发短信
Post By：2016/9/8 11:09:00 [显示全部帖子]
