フィールドが空の場合に改行を削除するレポートビルダーの式

Question

オンラインフォームを使用してSQL Serverに送信されたデータに基づいてレポートを作成しています。 1つのセクションは、必要なサービスを示すチェックボックスのリストです。レポートビルダーでフィールドを連結して1つの列にする式を作成しました。レポーターで簡単に読むために、キャリッジリターン+（VbCrLf）を追加することにしました。

=フィールド！Service1.Value +（VbCrLf）+ Service2.Value +（VbCrLf）+ Service3.Value +（VbCrLf）+ Service4.Value ETC。等。

すべてのフィールドでキャリッジリターンが発生するため、1番目、8番目および12番目のサービスが選択されていると大きなギャップが生じる可能性があります。

フィールドがNULLまたは空白の場合、式でVbCrLfを無視する方法はありますか？あるいは、より良い解決策を提案することもできます。

Answer 1

1. 新しい行を追加する前に、それぞれの値をテストするために、インラインIFを使用して行うことができますビューの境界線の外にあるデザインサーフェスを右クリックし、[レポートのプロパティ]をクリックします。
2. コードをクリックします。
3. カスタムコードでコード

を入力します。次のように

Public Function ConcatFields(ByVal s As String) As String 
    If String.IsNullOrEmpty(s) Then 
     Return "" 
    End If 
    Return s + Environment.NewLine 
End Function 

は次に、関数を呼び出します。

=Code.ConcatFields(Fields!Service1.Value) + Code.ConcatFields(Service2.Value) + Code.ConcatFields(Service3.Value) + Code.ConcatFields(Service4.Value) ETC. ETC. 

Answer 2

MTの最初の反応は、ここでの問題は、あなたの3つの空の値がまだ2つの新しい行を生成することである置き換える機能で式全体をラップし、単一のもの

=replace(Fields!Service1.Value + (VbCrLf) + Service2.Value + (VbCrLf) + 
Service3.Value + (VbCrLf) + Service4.Value,Vbcrlf+VbCrLf,VbCrLf) 

で2連続でのvbCrLfを交換しましたそれは、2または3回を適用するように、あなたは巣の機能を置き換えることができるのいずれか、またはあなたがデザインV IN

=Fields!Service1.Value + iif(Service2.Value is nothing or Service2.Value = "","",VbCrLf) + Service2.Value + iif(Service3.Value is nothing or Service3.Value = "","",VbCrLf) etc etc