PCDVD數位科技討論區
PCDVD數位科技討論區   註冊 常見問題 標記討論區為已讀

回到   PCDVD數位科技討論區 > 其他群組 > 七嘴八舌異言堂
帳戶
密碼
 

  回應
 
主題工具
Basara
Golden Member
 
Basara的大頭照
 

加入日期: Jul 2000
您的住址: 北中南走透透
文章: 2,900
引用:
作者FollowTheRabbit
不瞞您說,我F大本尊的專長就是財經


那先把M.J.是哪一隊的搞清楚好不好?

另外也別自創英文人名。

還有『馨竹南書』,四個字就錯兩個,也太誇張了,

還是讀財經就可以不管中文英文?
     
      
__________________
人生幸福公式:H=f^4,食物、樂趣、朋友及家人


此文章於 2011-05-27 12:44 PM 被 Basara 編輯.
舊 2011-05-27, 12:42 PM #141
回應時引用此文章
Basara離線中  
FollowTheRabbit
*停權中*
 
FollowTheRabbit的大頭照
 

加入日期: Apr 2011
文章: 7
引用:
作者Basara
那先把M.J.是哪一隊的搞清楚好不好?

另外也別自創英文人名。

還有『馨竹南書』,四個字就錯兩個,也太誇張了,

還是讀財經就可以不管中文英文?

我不是讀財經的

show一下專業
-----------------------------------------------------------------------------------------------

procedure tsnout.calvalue;
var
bmon,bmon1,bmon2,bmon3,bmon4,bmon5:real;
begin
wwliout1.BeforeEdit:=nil;
bmon:=0;bmon1:=0;bmon2:=0;bmon3:=0;bmon4:=0;bmon5:=0;
wwliout2_1.Refresh;
wwliout2_1.Locate('num',wwliout1.fieldbyname('num').asstring,[]);
while (wwliout2_1.FieldByName('num').asstring=wwliout1.FieldByName('num').asstring) and (not wwliout2_1.Eof) do
begin
bmon:=bmon+(wwliout2_1qly.AsFloat+wwliout2_1qly1.AsFloat)*wwliout2_1unp.AsFloat;
bmon1:=bmon1+(wwliout2_1qly.AsFloat+wwliout2_1qly1.AsFloat)*wwliout2_1imp.AsFloat;
bmon2:=bmon2+(wwliout2_1qly.AsFloat+wwliout2_1qly1.AsFloat)*(wwliout2_1imp.AsFloat-wwliout2_1inp.AsFloat);
bmon4:=bmon4+(wwliout2_1qly.AsFloat+wwliout2_1qly1.AsFloat)*wwliout2_1inp.AsFloat;
wwliout2_1.Next;
end;
// 刷卡成本增加
wwlioutcas1.Refresh;
wwlioutcas1.Locate('num',wwliout1.fieldbyname('num').asstring,[]);
while (wwlioutcas1.FieldByName('num').asstring=wwliout1.FieldByName('num').asstring) and (not wwlioutcas1.Eof) do
begin
bmon3:=bmon3+round(wwlioutcas1car.AsFloat*wwlistoparcarf.AsFloat);
bmon5:=bmon5+round(wwlioutcas1car.AsFloat*wwlistoparhandf.AsFloat);
wwlioutcas1.Next;
end;
wwliout1.edit;
wwliout1tot.AsFloat:=bmon;
if wwlistoparche1.AsString='1' then
begin
wwliout1mon.AsFloat:=bmon1+bmon3;
// if bmon3>0 then wwliout1tax.AsFloat:=0;
end
else
begin
wwliout1mon.AsFloat:=bmon1;
if bmon3>0 then wwliout1tax.AsFloat:=bmon3;
end;
if bmon5>0 then wwliout1hand.AsFloat:=bmon5;

wwliout1mon1.AsFloat:=bmon2;
wwliout1inp.AsFloat:=bmon4;
wwliout1.post;
wwliout1.BeforeEdit:=wwliout1beforeedit;

end;
 

此文章於 2011-05-27 12:46 PM 被 FollowTheRabbit 編輯.
舊 2011-05-27, 12:45 PM #142
回應時引用此文章
FollowTheRabbit離線中  
Basara
Golden Member
 
Basara的大頭照
 

加入日期: Jul 2000
您的住址: 北中南走透透
文章: 2,900
引用:
作者FollowTheRabbit
我不是讀財經的

show一下專業
-----------------------------------------------------------------------------------------------

procedure tsnout.calvalue;
var
bmon,bmon1,bmon2,bmon3,bmon4,bmon5:real;
begin
wwliout1.BeforeEdit:=nil;
bmon:=0;bmon1:=0;bmon2:=0;bmon3:=0;bmon4:=0;bmon5:=0;
wwliout2_1.Refresh;
wwliout2_1.Locate('num',wwliout1.fieldbyname('num').asstring,[]);
while (wwliout2_1.FieldByName('num').asstring=wwliout1.FieldByName('num').asstring) and (not wwliout2_1.Eof) do
begin
bmon:=bmon+(wwliout2_1qly.AsFloat+wwliout2_1qly1.AsFloat)*wwliout2_1unp.AsFloat;
bmon1:=bmon1+(wwliout2_1qly.AsFloat+wwliout2_1qly1.AsFloat)*wwliout2_1imp.AsFloat;
bmon2:=bmon2+(wwliout2_1qly.AsFloat+wwliout2_1qly1.AsFloat)*...



這和小牛湖人罄竹難書有什麼關係?
__________________
人生幸福公式:H=f^4,食物、樂趣、朋友及家人

舊 2011-05-27, 12:49 PM #143
回應時引用此文章
Basara離線中  
BMC
*停權中*
 

加入日期: Feb 2011
文章: 65
引用:
作者FollowTheRabbit
我不是讀財經的

show一下專業
-----------------------------------------------------------------------------------------------

procedure tsnout.calvalue;
var
bmon,bmon1,bmon2,bmon3,bmon4,bmon5:real;
begin
wwliout1.BeforeEdit:=nil;
bmon:=0;bmon1:=0;bmon2:=0;bmon3:=0;bmon4:=0;bmon5:=0;
wwliout2_1.Refresh;
wwliout2_1.Locate('num',wwliout1.fieldbyname('num').asstring,[]);
while (wwliout2_1.FieldByName('num').asstring=wwliout1.FieldByName('num').asstring) and (not wwliout2_1.Eof) do
begin
bmon:=bmon+(wwliout2_1qly.AsFloat+wwliout2_1qly1.AsFloat)*wwliout2_1unp.AsFloat;
bmon1:=bmon1+(wwliout2_1qly.AsFloat+wwliout2_1qly1.AsFloat)*wwliout2_1imp.AsFloat;
bmon2:=bmon2+(wwliout2_1qly.AsFloat+wwliout2_1qly1.AsFloat)*...

變數名稱取得還真是專業
舊 2011-05-27, 12:55 PM #144
回應時引用此文章
BMC離線中  
oiqmlf
Major Member
 

加入日期: Jun 2010
您的住址: 台灣
文章: 109
籃球被電,現在轉型為財經大師了,這樣子的轉型在 pcdvd 上誠屬少見呀,大家要好好愛護他。
舊 2011-05-27, 12:59 PM #145
回應時引用此文章
oiqmlf離線中  
LW牛
Basic Member
 

加入日期: Jan 2009
文章: 24
引用:
作者FollowTheRabbit
不瞞您說,我F大本尊的專長就是財經


引用:
作者FollowTheRabbit
我不是讀財經的


先水忍~ 現在是哪一位在play阿

另外

把資深球迷放出來吧
NBA final還沒打勒~ 他還可以嘴砲兩星期
__________________
莫非定律:凡事只要有可能出錯,那就一定會出錯。
舊 2011-05-27, 01:07 PM #146
回應時引用此文章
LW牛離線中  
iabuw
Master Member
 
iabuw的大頭照
 

加入日期: Oct 2004
文章: 1,505
引用:
作者FollowTheRabbit
我不是讀財經的

show一下專業
-----------------------------------------------------------------------------------------------

procedure tsnout.calvalue;
var
bmon,bmon1,bmon2,bmon3,bmon4,bmon5:real;
begin
wwliout1.BeforeEdit:=nil;
bmon:=0;bmon1:=0;bmon2:=0;bmon3:=0;bmon4:=0;bmon5:=0;
wwliout2_1.Refresh;
wwliout2_1.Locate('num',wwliout1.fieldbyname('num').asstring,[]);
while (wwliout2_1.FieldByName('num').asstring=wwliout1.FieldByName('num').asstring) and (not wwliout2_1.Eof) do
begin
bmon:=bmon+(wwliout2_1qly.AsFloat+wwliout2_1qly1.AsFloat)*wwliout2_1unp.AsFloat;
bmon1:=bmon1+(wwliout2_1qly.AsFloat+wwliout2_1qly1.AsFloat)*wwliout2_1imp.AsFloat;
bmon2:=bmon2+(wwliout2_1qly.AsFloat+wwliout2_1qly1.AsFloat)*...


這跟Magic Johnson是魔術隊的有什麼關係

來人哪拜託把他拉回魔術強森是哪隊的話題

此文章於 2011-05-27 01:09 PM 被 iabuw 編輯.
舊 2011-05-27, 01:08 PM #147
回應時引用此文章
iabuw離線中  
FollowTheRabbit
*停權中*
 
FollowTheRabbit的大頭照
 

加入日期: Apr 2011
文章: 7
引用:
作者LW牛
先水忍~ 現在是哪一位在play阿

另外

把資深球迷放出來吧
NBA final還沒打勒~ 他還可以嘴砲兩星期

總冠軍關鍵是在第四戰

前面大家都是保留實力在互探虛實

那一場只要贏,根據我F大多年看球的眉角

八成以上會得總冠軍

另外, nowaysgi第一戰就會被打爆

夠pro的評論了吧

此文章於 2011-05-27 01:12 PM 被 FollowTheRabbit 編輯.
舊 2011-05-27, 01:10 PM #148
回應時引用此文章
FollowTheRabbit離線中  
rocolna
*停權中*
 

加入日期: Feb 2011
您的住址: 高雄
文章: 0
引用:
作者FollowTheRabbit
magic johnson是魔術隊的吧



.........資深球迷自曝其短
舊 2011-05-27, 01:12 PM #149
回應時引用此文章
rocolna離線中  
FollowTheRabbit
*停權中*
 
FollowTheRabbit的大頭照
 

加入日期: Apr 2011
文章: 7
引用:
作者rocolna
.........資深球迷自曝其短

他就是因為在魔術隊發光發熱
才被取名叫Magic
後來才被交易到湖人

understand?
舊 2011-05-27, 01:17 PM #150
回應時引用此文章
FollowTheRabbit離線中  


    回應


POPIN
主題工具

發表文章規則
不可以發起新主題
不可以回應主題
不可以上傳附加檔案
不可以編輯您的文章

vB 代碼打開
[IMG]代碼打開
HTML代碼關閉



所有的時間均為GMT +8。 現在的時間是06:37 AM.


vBulletin Version 3.0.1
powered_by_vbulletin 2025。