else數字貨幣

❶ 幫忙解下題

① ch[j]!='\0'
② ch[j]>='a' && ch[j]<='z'
③ ('a'-'A')
④ p=a
⑤ p
⑥ a[i]
⑦ max=person[i].age ;
⑧ %s %d

❷ select case when a.currencycode = 'USD' then '$' else '￥' end as '金額'怎麼把amount欄位加到貨幣符號

請問下，你是在專門用命令讀取資料庫，還是在寫程序？
要是專門用命令讀取資料庫的話，我還真不知道，請您再去網路，或者google一下，
要是寫程序的話，可以將此數據用字元串的形式存儲，
要是後頭要參與計算的話，這樣會很麻煩，建議還是存儲數字，你可以再建一個欄位，專門來存放「￥」，「$」，到時用的時候在前台拼接就行

❸ EXCEL表格匯總時貨幣怎樣自然生成大寫元角分整

=SUBSTITUTE(SUBSTITUTE(TEXT(TRUNC(FIXED(A1)),"[>0][dbnum2];[<0]負[dbnum2];;")&TEXT(RIGHT(FIXED(A1),2),"元[dbnum2]0角0分;;"&IF(ABS(A1)>1%,"元整",)),"零角",IF(ABS(A1)<1,,"零")),"零分","整")

自定義單元格格式為
[DBNum2][$-804]yyyy"年"mm"月"dd"日"

❹ 在Excel2000忠如何將數字轉換成人民幣大寫

我給你一個方法將此復制下來粘貼到Excel單元格內就可以了。
=IF(ROUND(A5,2)<0,"無效數值","人民幣"&IF(ROUND(A5,2)=0,"零元",IF(ROUND(A5,2)<1,"",TEXT(INT(ROUND(A5,2)),"[dbnum2]")&"元")&IF(INT(ROUND(A5,2)*10)-INT(ROUND(A5,2))*10=0,IF(INT(ROUND(A5,2))*(INT(ROUND(A5,2)*100)-INT(ROUND(A5,2)*10)*10)=0,"","零"),TEXT(INT(ROUND(A5,2)*10)-INT(ROUND(A5,2))*10,"[dbnum2]")&"角")&IF((INT(ROUND(A5,2)*100)-INT(ROUND(A5,2)*10)*10)=0,"整",TEXT((INT(ROUND(A5,2)*100)-INT(ROUND(A5,2)*10)*10),"[dbnum2]")&"分")))

還有以下方法：Excel將小寫金額轉換成人民幣的大寫金額

1、如何自定義：

打開EXCEL,新建一個文件Book1,按ALT+F11進入VBA編程環境,選中這個BOOK1文件,插入模塊,將下面的源代碼復制到右邊的模塊代碼區內,然後將此BOOK1保存,保存類型一定選載入宏,文件名嘛可自由發揮,我就填"中文大寫",確定OK!然後回到EXCEL,工具--載入宏-找到"中文大寫",打勾確定,我們這個自定義函數就可以象內置函數樣使用了!--->=rmbdx(123456.78),爽吧!

2、例子:

A、直接在函數內輸入數值的（請注意參數的用法，默認用法是不用輸入）
=rmbdx(123456.78)--->壹拾貳萬叄仟肆佰伍拾陸元柒角捌分
=rmbdx(123456.78,0)--->壹拾貳萬叄仟肆佰伍拾陸元柒角捌分
=rmbdx(123456.78,1)--->壹拾貳萬叄仟肆佰伍拾陸元柒角捌分
=rmbdx(56.78)--->伍拾陸元柒角捌分
=rmbdx(0.78)--->柒角捌分
=rmbdx(0.784)--->柒角捌分
=rmbdx(0.785,1)--->柒角玖分
=rmbdx(0.02,1)--->貳分
B、引用某單元格數值進行轉換的
假設你的D3單元格的數據（也可以是求和或其它公式得出的結果）需要轉換，大寫格式放在D4單元格，則D4輸入公式：=rmbdx(d3)即可
C、其它形如=rmbdx(SUM(C4:C6))的也可以，用法象內置函數，請靈活使用

3、源代碼：

Functionrmbdx(value,Optionalm=0)
』中文大寫源代碼,By對面男孩、redwin
』支持負數,支持小數點後的第三位數是否進行四捨五入處理
』默認參數為0,即不將小數點後的第三位數進行四捨五入處理
』2002-10-11--2002-10-13
OnErrorResumeNext
Dima
DimjfAsString』定義角分位
Dimj』定義角位
Dimf』定義分位
Ifvalue<0Then』處理正負數的情況
a="負"
Else
a=""
EndIf

IfIsNumeric(value)=FalseThen』判斷待轉換的value是否為數值
rmbdx="需轉換的內容非數值"
Else
value=Abs(CCur(value))
』當參數m不輸入(默認為0)或為0時,小數點後的第三數不進行四捨五入處理
』當參數m為1或其它數值時,小數點後的第三數進行四捨五入處理
Ifm=0Then
jf=Fix((value-Fix(value))*100)
value=Fix(value)+jf/100
Else』厘位進行四捨五入實踐很少用到,但還是要照顧到
value=Application.WorksheetFunction.Round(value,2)』-->這句是關鍵!只用round有bug
jf=Round((value-Fix(value))*100,0)
EndIf
Ifvalue=0Orvalue=""Then』當待轉換數值為0或空時,不進行轉換
rmbdx=""
Else
strrmbdx=Application.WorksheetFunction.Text(Int(value),"[DBNum2]")&"元"』轉換整數位
IfInt(value)=0Then
strrmbdx=""
EndIf
IfInt(value)<>valueThen
Ifjf>9Then』判斷小數位
j=Left(jf,1)
f=Right(jf,1)
Else
j=0
f=jf
EndIf

Ifj<>0Andf<>0Then』角分位都有時
jf=Application.WorksheetFunction.Text(j,"[DBNum2]")&"角"_
&Application.WorksheetFunction.Text(f,"[DBNum2]")&"分"
Else
』處理出現零幾分的情況
IfInt(value)=0Andj=0Andf<>0Then
jf=Application.WorksheetFunction.Text(f,"[DBNum2]")&"分"
Else
Ifj=0Then』有分無角時
jf="零"&Application.WorksheetFunction.Text(f,"[DBNum2]")&"分"
Else
Iff=0Then』有角無分時
jf=Application.WorksheetFunction.Text(j,"[DBNum2]")&"角整"
EndIf
EndIf
EndIf
EndIf
strrmbdx=strrmbdx&jf』組裝
Else
strrmbdx=strrmbdx&"整"
EndIf

rmbdx=a&strrmbdx』最後成型了,各位MM滿意了吧
EndIf
EndIf
EndFunction

❺ 在excel中怎麼把數字的金額轉換成中文大寫的例如：¥123.23，轉換成壹佰貳拾叄元貳角叄分

假如123.23在a1，在b1放大寫，則b1=IF(OR(A1<=0,COUNTBLANK(A1)),"",TEXT(INT(A1),"[dbnum2]")&IF(INT(A1)=A1,"元整","元")&IF(INT(A1)=A1,"",TEXT(--RIGHT(INT(A1*10)),IF(--RIGHT(INT(A1*100))>0,"[=0]零;[dbnum2]#角","[dbnum2]#角;;;"))&TEXT(--RIGHT(A1*100),"[dbnum2]#分;;;")))

❻ pascal幣值轉換（在10分鍾內速回）！！！

提供思路（數的讀法）供參考。
var
n:longint;
a:array[1..8]ofinteger;
b:array[1..8]ofstring;
i,k,m:integer;
s,st:string;

procereinsert(varm:integer;x:integer);
begin
ifm=0thena[1]:=xelsea[m+1]:=x;
inc(m);
end;

begin
{n:=91110800;}
readln(n);
m:=0;
b[1]:='';b[2]:='十';b[3]:='百';b[4]:='千';b[5]:='萬';
b[6]:='十';b[7]:='百';b[8]:='千';
whilen>0dobegin
insert(m,nmod10);
n:=ndiv10;
end;
s:='';
fori:=mdownto1dobegin
str(a[i]:0,st);
k:=length(s);
ifi<>5then
ifa[i]=0thenbegin
if(s,k-1,2)<>'零'thens:=s+'零';
endelses:=s+st+b[i];
ifi=5then
ifa[i]=0thenbegin
if(s,k-1,2)<>'零'thens:=s+'萬'
elses:=(s,1,k-2)+'萬';
endelses:=s+st+b[i];
end;
if(s,length(s)-1,2)='零'thens:=(s,1,length(s)-2);
writeln(s);
end.

❼ JQUERY 一個文本框，限制只能輸入百分比或者貨幣類型

<scripttype="text/javascript"src="js/jquery.1.8.3.min.js"></script>
<scripttype="text/javascript">
$(function(){
//文本框只能輸入數字(不包括小數)，並屏蔽輸入法和粘貼
$.fn.integer=function(){
$(this).css("ime-mode","disabled");
this.bind("keypress",function(e){
varcode=(e.keyCode?e.keyCode:e.which);//兼容火狐IE
if(!$.browser.msie&&(e.keyCode==0x8)){//火狐下不能使用退格鍵
return;
}
returncode>=48&&code<=57;
});
this.bind("paste",function(){
returnfalse;
});
this.bind("keyup",function(){
if(/(^0+)/.test(this.value)){
this.value=this.value.replace(/^0*/,'');
}
});
};

//文本框只能輸入數字(包括小數)，並屏蔽輸入法和粘貼
$.fn.number=function(){
$(this).css("ime-mode","disabled");
this.bind("keypress",function(e){
varcode=(e.keyCode?e.keyCode:e.which);//兼容火狐IE
if(!$.browser.msie&&(e.keyCode==0x8)){//火狐下不能使用退格鍵
return;
}
if(this.value.indexOf(".")==-1){
return(code>=48&&code<=57)||(code==46);
}else{
returncode>=48&&code<=57
}
});
this.bind("paste",function(){
returnfalse;
});
this.bind("keyup",function(){
if(this.value.slice(0,1)=="."){
this.value="";
}
});
this.bind("blur",function(){
if(this.value.slice(-1)=="."){
this.value=this.value.slice(0,this.value.length-1);
}
});
};
});
</script>

❽ word VBA解決數字變貨幣形式

如A1為數據,在B1中輸入下列公式
=IF(A1<0,"負","")&IF(TRUNC(ROUND(A1,2))=0,"",TEXT(TRUNC(ABS(ROUND(A1,2))),"[DBNum2]")&"圓")&IF(ISERR(FIND(".",ROUND(A1,2))),"",TEXT(RIGHT(TRUNC(ROUND(A1,2)*10)),"[DBNum2]"))&"角"&IF(ISERR(FIND(".0",TEXT(A1,"0.00"))),"","")&IF(LEFT(RIGHT(ROUND(A1,2),3))=".",TEXT(RIGHT(ROUND(A1,2)),"[DBNum2]")&"","")&"分"

❾ javascript有沒有提供將數字格式化為貨幣形式

<script>
function outputMoney(number)
{
number=number.replace(/,/g,"");
if (number=="") return "";
if(number<0)
return '-'+outputDollars(Math.floor(Math.abs(number)-0) + '') + outputCents(Math.abs(number) - 0);
else
return outputDollars(Math.floor(number-0) + '') + outputCents(number - 0);
}
function outputDollars(number)
{
if (number.length<= 3)
return (number == '' ? '0' : number);
else
{
var mod = number.length%3;
var output = (mod == 0 ? '' : (number.substring(0,mod)));
for (i=0 ; i< Math.floor(number.length/3) ; i++)
{
if ((mod ==0) && (i ==0))
output+= number.substring(mod+3*i,mod+3*i+3);
else
output+= ',' + number.substring(mod+3*i,mod+3*i+3);
}
return (output);
}
}
function outputCents(amount)
{
amount = Math.round( ( (amount) - Math.floor(amount) ) *100);
return (amount<10 ? '.0' + amount : '.' + amount);
}
</script>

補充：JavaScript一種直譯式腳本語言，是一種動態類型、弱類型、基於原型的語言，內置支持類型。它的解釋器被稱為JavaScript引擎，為瀏覽器的一部分，廣泛用於客戶端的腳本語言，最早是在HTML（標准通用標記語言下的一個應用）網頁上使用，用來給HTML網頁增加動態功能。

❿ 12個金幣,其中有個假幣,稱3次,怎樣稱

根據真假金幣的重量不同來解決方案.如果找出其中一個重量不一樣的,就是假幣.

分三組:每組四個,第一組編號1-4，第二組5-8，第三組9-12.
第一次稱：天平左邊放第一組，右邊放第二組。

A 第一種可能：平衡。則不同的在第三組。
接下來可以在左邊放第9、10、11號，右邊放1、2、3號三個正常的。
a.如果平衡，則12號是不同的;
b.如果左重右輕，則不同的在9、10、11號中，而且比正常球重。再稱一次：9放左邊，10放右邊，如果平衡，則11號是不同的；如果左重右輕，則9號是不同的，如果右重左輕，則10號是不同的。
c.如果左輕右重，道理同b

B 第二種可能：左重右輕，則不同的在1-8號中，但不知比正常的輕還是重。
第二次稱：左邊放1、2、5號，右邊放6、9、3號。
a.如果平衡。則不同的在4、7、8中。可以稱第三次：左邊放4、7，右邊放9、10。如果平衡，則8是不同;如果左重右輕，則4是不同；如果左輕右重，則7是不同。
b.仍然左重右輕。則不同的在位置沒有改變的1、2、6中。可以稱第三次：左邊放1、6，右邊放9、10。如果平衡，則2是不同; 如果左重右輕，則1是不同;如果左輕右重，則6是不同。
c：左輕右重。則不同的在5、3、中，因為只有它們改變了原來的位置。可以稱第三次：左放5，3，右放9，10。如果左輕右重，則5是不同，如果左重右輕，則3是不同。

C 第三種可能：左輕右重，道理同B

至此，不論發生任何情況，稱三次都可以找出不同，而且知道比正常的輕了還是重了。