Ik heb deze code:
Het probleem is dat het er zo uit ziet

Het staat niet netjes onder elkaar (top3 moet iets naar rechts).
Hoe kan ik dit oplossen?
Ik heb gezocht (msdn) op listview en report maar hier kon ik niks bruikbaars vinden.
code:
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
| 'Helpfullness
lbOutput.AddItem ""
Which = "Helpfullness <> ''"
iOut = GetInfo(Which)
iPercent = (iOut * 100) / iTotal
lbOutput.AddItem "Helpfullness: " & iOut & " " & Format(Round(iPercent, 2), "###0.00") & "%"
Which = "Helpfullness = 'N/A'"
iOut = GetInfo(Which)
iPercent = (iOut * 100) / iTotal
lbOutput.AddItem " N/A " & iOut & " " & Format(Round(iPercent, 2), "###0.00") & "%"
Which = "Helpfullness = 'POOR'"
iOut = GetInfo(Which)
iPercent = (iOut * 100) / iTotal
lbOutput.AddItem " POOR " & iOut & " " & Format(Round(iPercent, 2), "###0.00") & "%"
Which = "Helpfullness = 'FAIR'"
iOut = GetInfo(Which)
iPercent = (iOut * 100) / iTotal
lbOutput.AddItem " FAIR " & iOut & " " & Format(Round(iPercent, 2), "###0.00") & "%"
Which = "Helpfullness = 'AVERAGE'"
iOut = GetInfo(Which)
iPercent = (iOut * 100) / iTotal
iTop = iPercent
iTop2 = iOut
lbOutput.AddItem " AVERAGE " & iOut & " " & Format(Round(iPercent, 2), "###0.00") & "%"
Which = "Helpfullness = 'VERY GOOD'"
iOut = GetInfo(Which)
iPercent = (iOut * 100) / iTotal
iTop = iTop + iPercent
iTop2 = iTop2 + iOut
lbOutput.AddItem " VERY GOOD " & iOut & " " & Format(Round(iPercent, 2), "###0.00") & "%"
Which = "Helpfullness = 'EXCELLENT'"
iOut = GetInfo(Which)
iPercent = (iOut * 100) / iTotal
iTop = iTop + iPercent
iTop2 = iTop2 + iOut
lbOutput.AddItem " EXCELLENT " & iOut & " " & Format(Round(iPercent, 2), "###0.00") & "%"
lbOutput.AddItem " TOP 3 " & iTop2 & " " & Format(Round(iTop, 2), "###0.00") & "%" |
Het probleem is dat het er zo uit ziet
Het staat niet netjes onder elkaar (top3 moet iets naar rechts).
Hoe kan ik dit oplossen?
Ik heb gezocht (msdn) op listview en report maar hier kon ik niks bruikbaars vinden.