jawaban mas Purwedi tidak keliru. cuma memang tidak ada rumus IF 
yang di loop. mungkin kondisi waktu(time value) nya di masukkan ke 
sebuah tabel saja yang dijadikan master agar lebih flexibel,sehingga 
kita bisa menyelect berdasarkan lama waktunya. dengan cara ini kita 
bisa membuat sebuah fungsi yang flexibel dan tidak menuliskan 
terlalu banyak rumus.

contoh Table :

dengan keterangan per 30 menit tarif bertambah Rp.1000,-

lama    biaya
=====   =====
30      1000


semoga bermanfaat,


--- In [email protected], Rommy Zamanuddin 
<[EMAIL PROTECTED]> wrote:
>
> mohon maaf Pak Purwedi mungkin pertanyaan saya keliru, yg saya 
maksud  sama seperti destroyer_maniac. saya ingin koding yang lain 
yg pake  looping atau sejenisnya tetapi hasilnya sama dengan sintaks 
yang saya  kirimkan 
>   soalnya saya ingin sintaks yang lebih simple cuma logikanya 
belum kebayang
>   
>   Terima kasih atas bantuannya
>   
> Purwedi Kurniawan <[EMAIL PROTECTED]> menulis:      emang sama 
persis, cuma beda cara nulisnya, mas rommy kan cuma  minta sintaks 
lain yg lebih singkat biar gampang ngetiknya, that's  it :)
> 
>   On 4/4/06, destroyer_maniac <[EMAIL PROTECTED]> wrote:  pak 
purwedi itu sih sama aja sama rumus yang beliau tanyakan.
> 
> --- In   [email protected], "Purwedi Kurniawan"
> <purwedi.kurniawan@> wrote:
> >
> > kalau gini gimana?
> >
> > txtbiaya = iif(TimeValue(TxtTotalJam) <
> > TimeValue("0:30:00"),1000,iif(TimeValue(TxtTotalJam) >= 
TimeValue  
> ("0:30:00")
> > And TimeValue(TxtTJ) < TimeValue("1:00:00") ,1500,?))
> >
> > ganti tanda ? dg perhitungan kalau timenya lebih besar dari 1jam.
> > best regards
> > [wwn]
>   >
> > On 4/3/06, Rommy Zamanuddin <forgotten_part2@> wrote:
> > >
> > > Assalamualaikum Wr. Wb.
> > >
> > > gimana ya sintak menghitung total biaya  rental tetapi sintaks
> nya tidak  
> > > seperti di bawah ini soalnya  lumayan panjang diketiknya, ya
> kalo bisa pake
> > > looping atau sejenisnya gitu
> > >
> > > If TimeValue(TxtTotalJam) < TimeValue("0:30:00") Then  
> > >    TXTBiaya = 1000
> > > ElseIf TimeValue(TxtTotalJam) >= TimeValue("0:30:00") And
> TimeValue(TxtTJ)
> > > < TimeValue("1:00:00") Then
> > >    TXTBiaya = 1500  
> > > end if
> > >
> > > Terima Kasih sebelumnya atas bantuannya
> > >
>           
> 
>     Wahana Programmer Groups Links
>   
>   
>   
>     
> 
>                       
> 
>           SPONSORED LINKS    
>                                                         
Programmer                                          
Indonesia                                          Basic programming 
language                                                             
             Computer programming 
languages                                          Programming 
languages                                          Java programming 
language                                                             
                
>         
> ---------------------------------
>     YAHOO! GROUPS LINKS  
>   
>       
>     Visit your group "Programmer-VB" on the web.
>      
>     To unsubscribe from this group, send an email to:
>  [EMAIL PROTECTED]
>      
>     Your use of Yahoo! Groups is subject to the Yahoo! Terms of 
Service.  
>   
>       
> ---------------------------------
>   
>   
>           
> 
>               
> ---------------------------------
> Apakah Anda Yahoo!?
> Kunjungi halaman depan Yahoo! Indonesia yang baru!
>







Wahana Programmer Groups Links

<*> Untuk mengunjungi sponsor milis ini, klik link berikut:
    http://wahanaprogrammer.net

<*> Untuk menghubungi owner milis ini, kirim email ke:
    [EMAIL PROTECTED]

<*> Konsultasi pemrogramman bisa chat disini:
    Yahoo! Messenger: wahanaprogrammer
 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/Programmer-VB/

<*> To unsubscribe from this group, send an email to:
    [EMAIL PROTECTED]

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/
 



Kirim email ke