水晶報表公式編輯

2021-06-04 10:38:42 字數 1923 閱讀 9422

stringvar strx := "";

stringvar stry := "";

stringvar strz := "";

numbervar z;

strx:=totext();

stry:=totext();

mid(strx,1,length(strx)-instr(strx,".")-1)+"/"+ mid(stry,1,length(stry)-instr(stry,".")-1)

left(totext(),length(totext())-3) & "/" & left(totext(),length(totext())-3)

function vbcint( numbervar z)

stringvar strx:='';

numbervar i:=0;

strx:=totext(z);

i:=instr(strx,'.');

if i>0 then

mid(strx,1,length(strx)-instr(strx,".")-1)

else

strx

乙個水晶報表的數字轉換成中文大寫的公式!

trackback:

stringvar x;

stringvar xx := "";

numbervar z;

numbervar i;

x := totext();

x := left(x,length(x)-5); //這裡所減去的數字,是小數點後面的位數加1的值

//我這裡是儲存時保留小數點後4 位,所以只能精確到個位。

x := replace(x,",","");

z := length(x);

for i := z to 1 step -1 do

(select i

case 8 : if(mid(x,z-i+1,1)<>"0") then xx := mid(x,z-i+1,1) + "十"

case 7 : if(mid(x,z-i+1,1)<>"0") then xx := xx + mid(x,z-i+1,1) + "億" else xx := xx + "億"

case 6 : if(mid(x,z-i+1,1)<>"0") then xx := xx + mid(x,z-i+1,1) + "仟"

case 5 : if(mid(x,z-i+1,1)<>"0") then xx := xx + mid(x,z-i+1,1) + "佰"

case 4 : if(mid(x,z-i+1,1)<>"0") then xx := xx + mid(x,z-i+1,1) + "十"

case 3 : if(mid(x,z-i+1,1)<>"0") then xx := xx + mid(x,z-i+1,1) + "萬" else xx := xx + "萬"

case 2 : if(mid(x,z-i+1,1)<>"0") then xx := xx + mid(x,z-i+1,1) + "仟"

case 1 : if(mid(x,z-i+1,1)<>"0") then xx := xx + mid(x,z-i+1,1) + "佰"

);xx := replace(xx,"1","壹");

xx := replace(xx,"2","貳");

xx := replace(xx,"3","叄");

xx := replace(xx,"4","肆");

xx := replace(xx,"5","伍");

xx := replace(xx,"6","陸");

xx := replace(xx,"7","柒");

xx := replace(xx,"8","捌");

xx := replace(xx,"9","玖");

xx + "元整";

水晶報表公式組合,推試顯示報表

舉例 現在有3張表 student表 course表 class 表 學號 姓名 班級id id 學號 所修課程 班級id 名稱 001 peter jd001 1 001 英語 jd001 文科班 002 sam jd001 2 001 語文 jd002 理科班 003 tony jd001 3 ...

水晶報表 建立報表

水晶報表是乙個優秀的報表開發工具,本人在開發通用管理系統的時候,所有報表都使用水晶報表,其簡單 易用和強大的功能令筆者倍加喜愛,現將水晶報表使用手記呈現給大家。一 在使用自帶的水晶報表時,請註冊,否則只能使用30次 二 使用crystalreportviewer進行預覽 crystalreportv...

水晶報表 子報表

經過了一段時間對水晶報表的操作,我對其稍稍了解了一點點。這兩天,一直在為資料量太大而煩惱,我有六張表,其中一張關聯剩餘的五張表。想要顯示資料,結果,顯示不出來,即使我已經在鏈結裡面設定了左外連線。我知道這個是按照笛卡爾積相乘,所以資料會成倍的增加。所以,即使我改用直接連線資料庫的方式也行不通。就是p...