2009-03-10 17 views
1

Hier ist mein Problem. Ich gebe einen Parameter ein, sagen wir es heißt ShapesSelected. ShapeSelected = ",Square, Triangle, Circle,".
Das Problem ist ShapeSelected könnte eine der Formen sein, so ist es nie static.Dynamische Spalten

Basis für diesen Parameter Ich möchte 3 Spalte rechts von einer Tabelle im Bericht hinzufügen. Ist das möglich? Ich habe begonnen, es in Custom Code in Report Properties zu codieren, aber ich bin fest, wie in der Spalte hinzuzufügen.

Public Function GetReportShapes(ByVal ShapesSelected As String)     
    Dim Shapes() As String 
    Dim result As String 
    Dim i As Integer 

    Entities = Split(ShapesSelected ,", ") 

    For i = 0 To UBound (Shapes) 
      Select case Shapes(i) 
       case "Square": 'add Square Column here 
        case "Rectangle": add Rectange Column here 
       case "Triangle": add Triangle Column here 
     End Select 
    Next i 

End Function 

Rendering So die Spalten wie folgt aus:

Square Triangle Circle 

Antwort

1

alle Fügen Sie die Spalten, die Sie brauchen, und die versteckte oder sichtbare Eigenschaft (I vergessen welche) mit vb Ausdrücke sie an und aus zu schalten.

Verwandte Themen