Gini Bukan mksudnya y ? -------------------------------------------------------------
Const x = "Rental Charge " & _ "Period: Jan 1 '08 - Mar 31'08 " & _ "(340 sqm X 3 mths X Rp. 55,000,-) " & _ "(104.77 sqm X 3 mths X Rp. 30,000,-) " & _ "(174.02 sqm X 3 mths X Rp. 50.000,-)" Const y = "Rental Charge:" & _ "(1 year X US$ 2,750.00) " & _ "Period: Jan 18 '08 - Jan 17'09" Private Sub Form_Load() z = InStr(1, UCase(x), "PERIOD", vbTextCompare) MsgBox Mid(x, z, 31) z = InStr(1, UCase(y), "PERIOD", vbTextCompare) MsgBox Mid(y, z, 31) End Sub ------------------------------------------------------------- Regards, Uwan On 1/22/08, Rudi <[EMAIL PROTECTED]> wrote: > > kawan2 mohon solusinya, udah utak-utik tapi msh gagal maning-gagal > maning > > kasusnya spt ini : > > ada satu field keterangan dgn data spt ini > > kadang datanya spt ini : > > Rental Charge > Period : Jan 1'08 - Mar 31'08 > (340 sqm X 3 mths X Rp. 55,000,-) > (104.77 sqm X 3 mths X Rp. 30,000,-) > (174.02 sqm X 3 mths X Rp. 50.000,-) > > kadang datanya juga spt ini: > > Rental Charge : > (1 year X US$ 2,750.00) > Period : Jan 18'08 - Jan 17'09 > > yang mau ditanyakan, dengan pola data spt itu bgmn caranya kalo mau ambil > Period : Jan 18'08 - Jan 17'09 > > artinya hanya mengambil baris kalimat period sampe tanggal2nya nya aja > udah dicoba sih dgn cara replace, atau instr atau dgn kombinasi nya tapi > tetep mentok nih, > > mudah2an solusinya bisa dapet disini. atas tanggapanya makasih banyak. > > salam > flash > > __________________________________________________________ > Looking for last minute shopping deals? > Find them fast with Yahoo! Search. > http://tools.search.yahoo.com/newsearch/category.php?category=shopping > >
