23. marts 2004 - 20:19Der er
11 kommentarer og 1 løsning
Tusindtalsseperator i textfelt
Hvordan kan jeg anvende automatisk tusindtals sperator i et tekstfelt mens brugeren indtaster i et tekstfelt?
Jeg øsnker altså at brugeren taster 1000000 ind i et tekstfelt, men allerede mens han taster skal den sætte "." ind (1.000.000), så man hele tiden kan følge med i hvad man taster.
Hvor svært kan det være.... :o) Super.. Tak for hjælpen... Læg lige et svar, så du kan få de meget fortjente point - hurtigt og præcist svar.. Takker... :o)
Jeg har faktisk testet det yderligere og desværre skaber det et problem, da den ikke laver tallet om til 500.000 men til 500,000 - og i beregninger tæller det kun for femhundrede og ikke femhundredetusinde.
Private Sub Text1_Change() Text1.Text = Format(Text1.Text, "##,##") Text1.SelStart = Len(Text1.Text) Label1.Caption = (Text1.Text) / 10 ' deviderer resultatet med 10 og viser det i Label1 End Sub
Fordi "," i vba, bliver omdannet til "." i tekstboxen, men det er decimaltegnet i amerika. Derfor er du nødt til at bruge"." i vba, det bliver vist som "," i tekstboxen, og det er amerikansk tusindtals adskiller.
Det virker endelig som det skal... Takekr for din indsats... :o)
Synes godt om
Ny brugerNybegynder
Din løsning...
Tilladte BB-code-tags: [b]fed[/b] [i]kursiv[/i] [u]understreget[/u] Web- og emailadresser omdannes automatisk til links. Der sættes "nofollow" på alle links.
Ny bruger
Nybegynder
Opret
Preview
