Function Kommatilpunktum(Indstreng As String) As String Dim i As Integer, Udstreng As String For i = 1 To Len(Indstreng) If Mid(Indstreng, i, 1) = "," Then Udstreng = Udstreng & "," Else Udstreng = Udstreng & Mid(Indstreng, i, 1) End If Next i Kommatilpunktum = Udstreng End Function
Jeg står med noget eksamsprojekt og havde travlt med at dokumentere et flow inden aflevering og havde ikke tid til megen kodning af småting.
Udeladelse af visse funktioner er et krav.
200 points pga jeg havde brug for et meget meget hurtigt svar :-)
Og det fik jeg jo.
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.