vb.net - VB 2012 TextBox.Clear() not working -

-

i'm working on encryption program , uses "pin" calculate stuff encryption. have textbox user can insert "pin". i'd prevent people entering numbers. added on keypress event:

    if not char.iscontrol(e.keychar)          if not char.isnumber(e.keychar)             msgbox("invalid character", , "warning!")             textbox3.clear()         end if     end if

it shows msgbox , doesn't write textbox until close th emsgbox. typed character appears in textbox. when write 1 works same before, replaces last character instead of writing one. there i'm missing because looks bug me?

set es_number windows style textbox:

public class form1      public const gwl_style integer = (-16)     public const es_number integer = &h2000      public declare function getwindowlong lib "user32" alias "getwindowlonga" _         (byval handle intptr, byval nindex integer) integer      public declare function setwindowlong lib "user32" alias "setwindowlonga" _         (byval handle intptr, byval nindex integer, byval dwnewlong integer) integer      public sub setnumbersonlytextbox(byval tb textbox)         setwindowlong(tb.handle, gwl_style, getwindowlong(tb.handle, gwl_style) or es_number)     end sub      private sub form1_load(sender system.object, e system.eventargs) handles mybase.load         setnumbersonlytextbox(textbox3)     end sub  end class

textbox es_number window style


Comments

Post a Comment

Popular posts from this blog

Perl - how to grep a block of text from a file -

-
it can in xml or text format. how in general grep block of text in perl? <track type="ws"> <range> <rangestart>0</rangestart> <rangeend>146.912</rangeend> <locationindex>0</locationindex> <propertyindex>0</propertyindex> </range> </track> <track type="ps" id="1"> <range> <rangestart>0</rangestart> <rangeend>146.912</rangeend> <locationindex>1</locationindex> <propertyindex>1</propertyindex> </range> </track> i want grep type="ps" , till </range> . one solution open file, read line line , match block. open(fh, "file.txt"); foreach $line (<fh>) { if ($line =~ m/type="cc"(.*?)<\/range>/) { print $1; } } but there more optimal solution without reading file line l
Read more

delphi - How to remove all the grips on a coolbar if I have several coolbands? -

-
Image
if set mycoolbar.fixedorder true,only grip on first band hidden. well,if use delphi 7 create vcl forms application,then put coolbar on , create 3 coolbans hold other controls,only grip , top coolbands can hidden setting mycoolbar.fixedorder:=true. i've uploaded picture make things clear. you got fixedorder property wrong. fixed property not allow bands rearranged if set true . setting property of coolbar true keep user changing bands order @ runtime, user can still move , resize bands. can give advice can do, actual solution problem, well, have wait answer. my advice use 3 coolbars in row , setting "fixedorder" property true , bandborderstyle bsnone . way grip hidden on of them. about property, it's not bug of ide, actual preference of property.
Read more

javascript - Animating array of divs; only the final element is modified -

-
this baffling me @ moment. i'm experienced programmer looking throw bit of surprise fiancee on countdown page our wedding. desired effect simulated confetti falling behind main page. setup follows: i have array of divs in javascript. each div absolutely positioned on page. have interval set updates every 50 or milliseconds. on each tick, run loop on array of divs, , calculations , update positions. problem problem having, however, though can see divs created, stored array, , modified (in case, each has slight randomized rotation) during initialization phase, once tick update position starts, div stored in whatever last slot of array gets position updated. tried hard-coding each div index testing purposes, strictly last element update position. upon printing current "left" , "top" style values each div before , after calculations shows value has been changed, no visible change noticeable. here's basic code: javascript var container;
Read more