Fetstil Fetstil Kursiv Understrykning linje färgläggning tabellverk Punktlista Nummerlista Vänster Centrerat högerställt Utfyllt Länk Bild htmlmode
  • Forum & Blog
    • Forum - översikt
      • .Net
        • asp.net generellt
        • c#
        • vb.net
        • f#
        • silverlight
        • microsoft surface
        • visual studio .net
      • databaser
        • sql-server
        • databaser
        • access
        • mysql
      • mjukvara klient
        • datorer och komponenter
        • nätverk, lan/wan
        • operativsystem
        • programvaror
        • säkerhet, inställningar
        • windows server
        • allmänt
        • crystal reports
        • exchange/outlook
        • microsoft office
      • mjukvara server
        • active directory
        • biztalk
        • exchange
        • linux
        • sharepoint
        • webbservers
        • sql server
      • appar (win/mobil)
      • programspråk
        • c++
        • delphi
        • java
        • quick basic
        • visual basic
      • scripting
        • asp 3.0
        • flash actionscript
        • html css
        • javascript
        • php
        • regular expresssion
        • xml
      • spel och grafik
        • DirectX
        • Spel och grafik
      • ledning
        • Arkitektur
        • Systemutveckling
        • krav och test
        • projektledning
        • ledningsfrågor
      • vb-sektioner
        • activeX
        • windows api
        • elektronik
        • internet
        • komponenter
        • nätverk
        • operativsystem
      • övriga forum
        • arbete karriär
        • erbjuda uppdrag och tjänster
        • juridiska frågor
        • köp och sälj
        • matematik och fysik
        • intern information
        • skrivklåda
        • webb-operatörer
    • Posta inlägg i forumet
    • Chatta med andra
  • Konto
    • Medlemssida
    • Byta lösenord
    • Bli bonsumedlem
    • iMail
  • Material
    • Tips & tricks
    • Artiklar
    • Programarkiv
  • JOBB
  • Student
    • Studentlicenser
  • KONTAKT
    • Om pellesoft
    • Grundare
    • Kontakta oss
    • Annonsering
    • Partners
    • Felanmälan
  • Logga in

Hem / Forum översikt / inlägg

Posta nytt inlägg


Adressbok

Postades av 2002-09-15 00:24:00 - Mats Billert, i forum visual basic - allmänt, Tråden har 5 Kommentarer och lästs av 454 personer

Jag håller på att göra en adressbok. Ingen särskilt komplicerad.
Min fråga är:
Jag har en sökfunktion. Hur gör jag för att inte allt måste vara exakt lika när man söker efter ordet.

T.ex.:
Om man skrivit in en adress som "Backstigen 18" så vill jag att programmet ska hitta det även om man bara skriver "Backstigen" eller "Backstigen18".

Tacksam för svar


Svara

Sv: Adressbok

Postades av 2002-09-15 01:04:41 - Sven Åke Persson

Hej
Vilken typ av DataBasmotor använder du ?

Grundsvaret är att du skall använda LIKE 'Back*'

Sven


Svara

Sv: Adressbok

Postades av 2002-09-15 12:34:11 - Mats Billert

Förstår inte riktigt vad du menar databasmotor. Så här ser koden för sökningen ut:
Private Sub mnusöknamn_Click()
Dim sSökNamn As String
Dim iRäknare As Integer
sSökNamn = InputBox("Ange namn att söka efter", "Sökning")
If Not (sSökNamn = "") Then
sSökNamn = UCase(sSökNamn)
For iRäknare = 1 To iAntalPoster
Get #iFilNr, iRäknare, iAktuellPerson
If UCase(Trim(iAktuellPerson.Namn)) = sSökNamn Then
iPost = iRäknare
VisaPost
Exit Sub
End If
Next iRäknare
MsgBox ("Det fins ingen med det namnet i Adressboken")
End If
End Sub


Svara

Sv: Adressbok

Postades av 2002-09-15 12:40:46 - Fredrik Salomonsson

Hej.

[Jämföra strängar]

//fredda


Svara

Sv: Adressbok

Postades av 2002-09-15 12:49:23 - Sven Åke Persson

Hej
Testa den här ändringen

If UCase(Trim$(iAktuellPerson.Namn)) LIKE sSökNamn Then

Förresten varför håller du på och krånglar med UCase ??

Den här raden kan du ändra
If Not (sSökNamn = "") Then
Till
If sSökNamn <> "" Then


Eftersom du kör enl Random metoden kan du kolla mitt
uppskick Programarkivet:Enkel AdressBok Enkel DataBas

mvh
Sven


Svara

Sv: Adressbok

Postades av 2002-09-15 14:58:51 - Mats Billert

Tack för tipsen!

Anledningen till att jag kör med UCase är att de gör det i den bok jag läser om Visual Basic 6..


Svara

Nyligen

  • 09:09 Vill du köpa medicinska tester?
  • 12:47 Vem beviljar assistansen – kommune
  • 14:17 Någon med erfarenhet av hemstädnin
  • 14:14 Bör man använda sig av en båtförme
  • 14:12 Finns det någon intressant hundblo
  • 14:25 Tips på verktyg för att skapa QR-k
  • 14:23 Tips på verktyg för att skapa QR-k
  • 20:52 Fungerer innskuddsbonuser egentlig

Sidor

  • Hem
  • Bli bonusmedlem
  • Läs artiklar
  • Chatta med andra
  • Sök och erbjud jobb
  • Kontakta oss
  • Studentlicenser
  • Skriv en artikel

Statistik

Antal besökare:
Antal medlemmar:
Antal inlägg:
Online:
På chatten:
4 569 604
27 953
271 705
5 994
0

Kontakta oss

Frågor runt konsultation, rådgivning, uppdrag, rekrytering, annonsering och övriga ärenden. Ring: 0730-88 22 24 | pelle@pellesoft.se

© 1986-2013 PelleSoft AB. Last Build 4.1.7169.18070 (2019-08-18 10:02:21) 4.0.30319.42000
  • Om
  • Kontakta
  • Regler
  • Cookies