B4X FEED - [XLUtils] Creating Word without empty line | انجمن کاربردی (گروه آموزشی الغدیر)

practicalsoft · 2022-05-02T16:15:18+00:00

Hi All. I have the following code: B4X: Dim sb As StringBuilder sb.Initialize 'Giorno Dim TitleCellStyle As String = "color=black width=600 VerticalAlignment=center" Dim TitlePStyle As String = "[p alignment=center]" sb.Append($" [table Alignment=Left rows=${1} cols=1] this is the header row [row RepeatHeader=True] [cell ${TitleCellStyle}]${TitlePStyle}Dieta Diversa - Sabato 23 Aprile 2022[/p][/cell] [/row] "$) sb.Append("[/table]") 'Per Test Dim tipo As List tipo.Initialize tipo.Add("COLAZIONE") tipo.Add("SPUNTINO1") tipo.Add("SPUNTINO2") 'ciclo per Pranzo , spuntino, etc For ii = 0 To 2 'Tipo Pasto Dim TitleCellStyle As String = "color=green width=600 VerticalAlignment=center" Dim TitlePStyle As String = "[p alignment=left][color=black][b]" sb.Append($" [table Alignment=Left rows=${1} cols=1] this is... Read more ادامه مطلب...

practicalsoft

پرسنل مدیریت

مدیر کل انجمن

May 2, 2022

Hi All.
I have the following code:

B4X:

کد:

محتوای بلوک کدها در دسترس شما نیست. برای مشاهده بلوک کدها، وارد انجمن شوید یاثبت نام کنید

برای دیدن لینک ها باید ثبت نام کنید

اعلامیه حق چاپ

1. این انجمن تحت قوانین جمهوری اسلامی ایران اداره میشود؛
2. در موقع ثبت نام قوانین انجمن را پذیرفته اید اما پیشنهاد میشود قبل از هرگونه فعالیت قوانین را مرور بفرمایید؛
3. مسئولیت کلیه مطالب منتشر شده در این انجمن متعلق به نویسنده اصلی است که بیانگر دیدگاه های شخصی است و ربطی به این انجمن ندارد؛
4. بدون اجازه نویسنده این پست، سایر انجمن ها وبسایت و وبلاگها و افراد مجاز به استفاده، ونشر مجدد یا نقل قول از این مطالب نیستند، ودر این صورت تخلف تلقی می شود؛
5. برای نشر یا نقل مطالب این مقاله لطفا منبع و نویسنده اصلی را ذکر کنید. نویسنده اصلی و این انجمن حق نشر را برای خود محفوظ می دارد.
6. لطفا و حتما از ارسال مطالب تبلیغاتی و اسپم در انجمن خودداری فرمایید

B4X FEED [XLUtils] Creating Word without empty line

اطلاعات موضوع

practicalsoft