Keskustelu: Ohjelmointikysymykset: VB6: Copu/paste textboxiin (vb)

Onko textboxissa jokin asetus, kun en saa siinä toimimaan normaaleita näppäinkomentoja ctrl+c ja ctrl+v?
Vai pitääkö noidenkin toiminnot ***kele koodata omiin ohjelmiin?

Mulla ne ainakin toimii. Mikä vb-versio?

Mikä VB-versio. Ainakin 5.0 Pro ja 6.0 Pro toimii ilman mitään virityksiä. Siis maalaan alueen Text1:ssä, painan Ctrl+C, klikkaan Text2 haluttuun kohtaan ja painan Ctrl+V

VB:n versio on 6 pro.
En saa sitä millään toimimaan :(

Pitää sen verran kertoa lisää, että joissakin ohjelmissa se toimii, joissakin ei.
Siksi kysyinkin onko se jokin ominaisuus kohta, kun tuossa yhdessä ohjelmassani se ei toimi?
Eli olenko vahingossa asettanut jonkin asetuksen väärin textboxeista?

No voi pelle.
Olen asettanut Keyasciit kyseisille textboxeille, joka tuon näyttää estävän.

Public Function GetKey(KA As Integer) As Integer
   Select Case KA
   Case 44, 46: GetKey = 44
   Case 48: GetKey = 48
   Case 49: GetKey = 49
   Case 50: GetKey = 50
   Case 51: GetKey = 51
   Case 52: GetKey = 52
   Case 53: GetKey = 53
   Case 54: GetKey = 54
   Case 55: GetKey = 55
   Case 56: GetKey = 56
   Case 57: GetKey = 57
   Case vbKeyBack: GetKey = 8
   Case 8: GetKey = 8
   Case Else: GetKey = 0
   End Select
End Function

Onko tietoa mitkä olisi keyascii määritykset copu/pastelle?

Hmm, siis Asc(Ctrl+C)=3 ja Asc(Ctrl+V)=22 mutta tajusinko oikein?

Joo. noita juuri tarkoitin.
En itse noita löytänyt MSDN:stä vasta kuin äsken. Taisin etsiä aikaisemmin väärillä hauilla.

Olen siis luonut textboxin, josta haluan estää muut kuin numeeriset syötöt. olisiko muita asioita, joita tulisi ottaa huomioon (vapauttaa toimintoja) kuin copy/paste?

Esim. tällä koodilla ainakin Copy/Paste toimii:

m = "0123456789," + Chr(8) + Chr(3) + Chr(22)
If InStr(m, Chr(KeyAscii)) = 0 Then KeyAscii = 0

Chr(8) on Backspace eli korjausnäppäin
(kooditagi vei pari merkkiä mukanaan, miksiköhän ??)

Backspace näyttää toimivan ilman että sille keuasciita laittaisi.

Laitoitko koovi samalle riville kuin kooditagin?
Muistaakseni kooditagit pitää aina olla omilla riveillään muuten se napsasee merkkejä pois.

Oli joo, siksipä sitä ihmettelin. Piti laittaa vielä yksi tyhjä rivi väliin.