MyCity » Visual Studio -> Visual Basic » MSHFlexGrid

MSHFlexGrid

Napisano na dan: 27.1.2007

MSHFlexGrid

Idi na vrh

Poslao: 26 Feb 2007 22:09
Idi na vrh
offline
  • Pridružio: 03 Okt 2006
  • Poruke: 30

Posto je vec otvorena ova tema da postavim jedno pitanje. Radi se o pretrazivanju MSHFlexGrida.
Ovaj kod koristim za pretrazivanje po stringu. Sada mi je potrebno da pretrazivanje bude samo po celobrojnim vrednostima.
Private Sub cmdPronadjiBroj_Click() Dim i, j As Integer         MSHFlexGrid1.FillStyle = flexFillRepeat     MSHFlexGrid1.Col = 0     MSHFlexGrid1.Row = 0     MSHFlexGrid1.ColSel = MSHFlexGrid1.Cols - 1     MSHFlexGrid1.RowSel = MSHFlexGrid1.Rows - 1     MSHFlexGrid1.CellFontBold = False     MSHFlexGrid1.FillStyle = flexFillSingle     For i = 0 To MSHFlexGrid1.Cols - 1         For j = 1 To MSHFlexGrid1.Rows - 1                             If InStr(MSHFlexGrid1.TextMatrix(j, i), Label1.Caption) Then                             MSHFlexGrid1.Col = i                 MSHFlexGrid1.Row = j                 MSHFlexGrid1.CellFontBold = True             End If         Next j     Next i    End Sub
Kada bolduje trazeni broj to uradi u svim kolonama. Medju njima su i r/b,ukupno,datum - to su prve 3 kolone, a to ne bi trebalo da bude boldovano.
Kako iz pretrazivanja izuzeti te prve 3 kolone?
Uz to postoji jos jedan problem: kada je u labeli jednocifren broj (po kome se pretrazuje) tada mi bolduje sve brojeve koji sadrze taj broj, a ne samo trazeni broj. Mislim da je to zbog toga sto pretrazuje po stringu.
Ako neko moze da pomogne unapred mu zahvaljujem.

Dopuna: 26 Feb 2007 22:09

problem je resen



Registruj se da bi učestvovao u diskusiji. Registrovanim korisnicima se NE prikazuju reklame unutar poruka.
Poslao: 27 Feb 2007 21:07
Idi na vrh
offline
  • Pridružio: 28 Jun 2004
  • Poruke: 990
  • Gde živiš: Kucura

Ih' bre neda nam ni da odgovorimo, da se pokazemo pametni Mr. Green salim se...

Nego ako si resio napisi kako, podeli to sa ostalima Wink



Poslao: 25 Mar 2007 16:51
Idi na vrh
offline
  • Pridružio: 03 Okt 2006
  • Poruke: 30

Ako nekoga interesuje evo resenje:
Private Sub cmdPronadjiBroj_Click() Dim i, j As Integer         MSHFlexGrid1.FillStyle = flexFillRepeat     MSHFlexGrid1.Col = 0     MSHFlexGrid1.Row = 0     MSHFlexGrid1.ColSel = MSHFlexGrid1.Cols - 1     MSHFlexGrid1.RowSel = MSHFlexGrid1.Rows - 1     MSHFlexGrid1.CellFontBold = False     MSHFlexGrid1.FillStyle = flexFillSingle     For i = 3 To MSHFlexGrid1.Cols - 1 '***************IZUZIMANJE PRVE TRI KOLONE         For j = 1 To MSHFlexGrid1.Rows - 1                     If MSHFlexGrid1.TextMatrix(j, i) = Label1.Caption Then '***************POREDJENJE PO SADRZAJU                             MSHFlexGrid1.Col = i                 MSHFlexGrid1.Row = j                 MSHFlexGrid1.CellFontBold = True             End If         Next j     Next i End Sub

MyCity » Visual Studio -> Visual Basic » MSHFlexGrid

Ko je trenutno na forumu
 

Ukupno su 5290 korisnika na forumu :: 89 registrovanih, 3 sakrivenih i 5198 gosta   ::   [ Administrator ] [ Supermoderator ] [ Moderator ] :: Detaljnije

Najviše korisnika na forumu ikad bilo je 20624 - dana 04 Apr 2026 04:18

Korisnici koji su trenutno na forumu:
Korisnici trenutno na forumu: 015, 357magnum, 9191vs, Ailton, aleksmajstor, alex71, Apok, aramis s, Bo96, Bojan198527, bokicacar, Boris90, Brankojle, BSD, Cavendish, coaa, crazydkure, debeli, delboy, dexteroza, Djokislav, djordjemiklusev, draganl, foksmolder, goxin, Hippolyte Mondain, Igorkg77, igorkozar83, istina, janbo, jarovitt, Jezekijel, jodzula, Jovan1983, Kajzer Soze, Kalem, Kaplar2, Koplje, Lap720, Lazur_01, ljubo70, mercedesamg, milenko crazy north, Milometer, mino bosanac, miodrag, Mis uz pusku, MK10, Moldovan, nekdo, nesa1962, OKT, Paki, Paklenica, Panter, Papadubi, peradetlić, Petarvu, PITT, Pururin, repac, Robin, rovac, S-G, SANDRO1973, sekretar, shone34, Sir Budimir, sistem22, Snorks, starlights, Stevan Visoki, styg, tamno.nebo, tanakadzo, The_new_Statesman, Tihi86, tomigun, Username1000, Vaske8990, Velizar Laro, VJ, vlvl, Volfero, W123, Wrangler, zillbg, Zoran1959, zuxbg