Hej har problem med att skriva punkt i en textbox som skickar värdet till en PLC. Av någon anledning så tar den bara bort punkten. Om jag skriver 1.2 t.ex. så ändrar den till 12. Kan någon se vad jag gör för fel här? Här är koden som jag fått hjälp med härifrån innan:


Private Sub lblKlosslangd_keypress(ByVal KeyAscii As Long)
'Normalt bör du tillåta dessa tecken tillsammans med siffror
'BackSpace, Tab, Enter, Komma, Minustecken, Punkt och 0 - 9
Select Case KeyAscii
Case 8, 9, 13, 44, 45, 46, 48 To 57
' Tillåt
'här byter du sida på 44 och 46 efter önskemål ,komma(,) punkt(.)
If KeyAscii = 46 Then KeyAscii = 44
Case Is = 22 'användaren klistrar in Ctrl+V
If IsNumeric(Clipboard.GetText) Then _
lblKlosslangd.Text = Replace(Clipboard.GetText, ",", ".")
Clipboard.Clear()
Case Else
KeyAscii = 0
End Select
End Sub



Private Sub lblKlosslangd_TextChanged(ByVal sender As Object, ByVal e As System.EventArgs) Handles lblKlosslangd.TextChanged
'Klosslängd - SKRIV
If (lblKlosslangd.Text <> "") Then
VarKlosslangd = CLng(lblKlosslangd.Text)
Call TcClientSync.WriteVar(".HMI_lrKlossmm", VarKlosslangd)
lblKlosslangd.Text = CStr(VarKlosslangd)
End If
End Sub

Du gör ju en CLng() alltså konverterar talet till Long Integer (dvs heltal)

oj då. vilken miss. Jag använder nu decimal istället och det fungerar perfekt. tack för hjälpen. :)