Søg
Avatar billede koldy Nybegynder
26. marts 2003 - 18:31 Der er 8 kommentarer og
1 løsning

Mystisk, kan ikke ændre en textbox, men kan godt en anden?.

har dette stykke kode

    If Key = 8 And Len(CalcResult.Text) > 0 Then
        tal = Len(CalcResult.Text) - 1
        test.Text = tal
        CalcText = Left((CalcResult.Text), tal)
        test.Text = CalcText
        CalcResult.Text = CalcText
    Else
og den køre fint nok, (Den udskriver rigtig nok i test.Text, men ikke i CalcResult.Text der laver den ingen ændringer hvorfor ?..
Avatar billede kabbak Professor
26. marts 2003 - 18:49 #1
mangler du ikke et punktum.
    Calc.Text = Left((CalcResult.Text), tal)
    CalcResult.Text = Calc.Text
Avatar billede kabbak Professor
26. marts 2003 - 18:52 #2
eller er CalcText en lokal variabel
Avatar billede koldy Nybegynder
26. marts 2003 - 19:12 #3
CalcResult.Text er mit textbox
Avatar billede koldy Nybegynder
26. marts 2003 - 19:13 #4
eller CalcResult er en textbox, og jeg skriver i Text
Avatar billede koldy Nybegynder
26. marts 2003 - 19:15 #5
eller ja CalcText er bare en variable, da jeg har prøvet at dele det ud.. dette stykke kode skulle kunne gøre det samme som det overståene
   
CalcResult.Text = Left((CalcResult.Text), Len(CalcResult.Text) - 1)

men det virker ikke
Avatar billede koldy Nybegynder
26. marts 2003 - 19:16 #6
her er den totale kode for den sub

Private Sub Form_KeyPress(OKey As Integer)
    'test.Text = OKey
    If OKey = 8 And Len(CalcResult.Text) > 0 Then
        CalcResult.Text = Left((CalcResult.Text), Len(CalcResult.Text) - 1)
    Else
        key = Chr(OKey)
    End If
    If IsNumeric(key) = True Then
        Num (key)
    End If
End Sub
Avatar billede koldy Nybegynder
26. marts 2003 - 19:19 #7
det sjove er at hvis Len(CalcResult.Text) = 1 så virker det fint..

og hvis jeg sætter CalcResult.Text over i en test textbox så for jeg det rigtig nok.
Avatar billede koldy Nybegynder
26. marts 2003 - 19:23 #8
men det virker bare ikke i CalcResult.Text
Avatar billede koldy Nybegynder
26. marts 2003 - 20:09 #9
har fundet fejlen..
Avatar billede Ny bruger Nybegynder

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.

Loading billede Opret Preview
Kategori
Programmeringssprog kurser
Kurser inden for grundlæggende programmering
Se alle Programmeringssprog kurser

Flere spørgsmål fra Visual Basic kategorien

Titel Indlæg Oprettet Seneste aktivitet
Send mail fra "Outlook New" via VBA i excel Af lonmat i Visual Basic 5 29/08/202512:28 04/09/202515:48
Klik Event i MS Project Af per2edb i Visual Basic 0 05/08/202510:10 -
VBA koder lagt i MS project kolonner Af per2edb i Visual Basic 0 16/05/202512:31 -
Foto fra Word eller Excel Af MSchlamovitz i Visual Basic 1 22/04/202514:55 25/04/202511:21
Proxy server.. Af SommerFyr i Visual Basic 12 10/07/202417:34 12/07/202414:34
Se alle spørgsmål i kategorien Opret spørgsmål

Log ind eller opret profil

Hov!

For at kunne deltage på Computerworld Eksperten skal du være logget ind.

Det er heldigvis nemt at oprette en bruger: Det tager to minutter og du kan vælge at bruge enten e-mail, Facebook eller Google som login.

Opret Log ind

Du kan også logge ind via nedenstående tjenester

Alle kategorier på Eksperten
Seneste spørgsmål Seneste aktivitet
I går 22:58 Kan man undgå at få vist referer når der klikkes på links Af Strawberry i Browsere
I går 12:21 Er det svindel eller fra Microsoft Af mort1 i Andet sikkerhed
15/0811:56 Er det muligt at lave sin egen webserver i boligforening? Af Strawberry i Cloudtjenester
14/0810:21 Ny printer, men hvilken Af mort1 i Printere
13/0819:41 USB på Linux Af Uvanga i Linux
White papers
Flere white papers »