Dim tmpString(7) As String
tmpString(0)= "| "
tmpString(1)= "|Berg "
tmpString(2)= "+-----+-----+-----+-----"
tmpString(3) ="|2m |70cm |23cm |13cm "
tmpString(4) ="|T |B |T |B |T |B |T |B "
tmpString(5)= "+--+--+--+--+--+--+--+--"
tmpString(6)= "+--------------------------------------------------------------------------------------------------------"
SBA.append(tmpString(6).substring2(0,varLenMax(0)+1)).append(tmpString(2))
SBA.append(tmpString(6).substring2(0,varLenMax(1)+1)).append(tmpString(2))
SBA.append(tmpString(6).substring2(0,varLenMax(2)+1)).append(tmpString(2)).append("+").append(CRLF)
SBA.append(tmpString(0).substring2(0,varLenMax(0)+1)).append(tmpString(3))
SBA.append(tmpString(0).substring2(0,varLenMax(1)+1)).append(tmpString(3))
SBA.append(tmpString(0).substring2(0,varLenMax(2)+1)).append(tmpString(3)).append("|").append(CRLF)
SBA.append(tmpString(1).substring2(0,varLenMax(0)+1)).append(tmpString(4))
SBA.append(tmpString(1).substring2(0,varLenMax(1)+1)).append(tmpString(4))
SBA.append(tmpString(1).substring2(0,varLenMax(2)+1)).append(tmpString(4)).append("|").append(CRLF)
SBA.append(tmpString(6).substring2(0,varLenMax(0)+1)).append(tmpString(5))
SBA.append(tmpString(6).substring2(0,varLenMax(1)+1)).append(tmpString(5))
SBA.append(tmpString(6).substring2(0,varLenMax(2)+1)).append(tmpString(5)).append("+").append(CRLF)