��P u b l i c C l a s s s e r i e s
P u b l i c I r a n g e ( 3 ) A s I n t e g e r
P r i v a t e S u b t r i g n _ C l i c k ( B y V a l s e n d e r A s O b j e c t , B y V a l e A s S y s t e m . E v e n t A r g s ) H a n d l e s M e . C l i c k
c a l c u l a t o r . t r i g f n . i n v . C h e c k e d = F a l s e
c a l c u l a t o r . S e l e c t ( )
E n d S u b
P u b l i c S u b t r i g n _ L o a d ( B y V a l s e n d e r A s S y s t e m . O b j e c t , B y V a l e A s S y s t e m . E v e n t A r g s ) H a n d l e s M y B a s e . L o a d
M e . B a c k C o l o r = c a l c u l a t o r . B a c k C o l o r
M e . L o c a t i o n = N e w S y s t e m . D r a w i n g . P o i n t ( c a l c u l a t o r . R i g h t , c a l c u l a t o r . B o t t o m - M e . H e i g h t - c a l c u l a t o r . m e m o r y f r m . H e i g h t - c a l c u l a t o r . t r i g f n . H e i g h t - c a l c u l a t o r . e n g f r m . H e i g h t )
M e . O w n e r = c a l c u l a t o r
E n d S u b
P r i v a t e S u b t r i g b u t _ C l i c k ( B y V a l s e n d e r A s S y s t e m . O b j e c t , B y V a l e A s S y s t e m . E v e n t A r g s ) H a n d l e s s a d d . C l i c k , s p r . C l i c k
c a l c u l a t o r . S e l e c t ( )
I f N o t c a l c u l a t o r . s = 0 T h e n
c a l c u l a t o r . s = 0
c a l c u l a t o r . e x p r e s s i o n . C l e a r ( )
c a l c u l a t o r . e x p r e s s i o n . S e l e c t ( )
E n d I f
c a l c u l a t o r . e x p r e s s i o n . P a s t e ( s e n d e r . t e x t )
c a l c u l a t o r . t r i g f n . i n v . C h e c k e d = F a l s e
E n d S u b
P r i v a t e S u b t r i g n _ P a i n t ( B y V a l s e n d e r A s O b j e c t , B y V a l e A s S y s t e m . W i n d o w s . F o r m s . P a i n t E v e n t A r g s ) H a n d l e s M e . P a i n t
M e . L o c a t i o n = N e w S y s t e m . D r a w i n g . P o i n t ( c a l c u l a t o r . R i g h t , c a l c u l a t o r . B o t t o m - M e . H e i g h t - c a l c u l a t o r . m e m o r y f r m . H e i g h t - c a l c u l a t o r . t r i g f n . H e i g h t - c a l c u l a t o r . e n g f r m . H e i g h t )
E n d S u b
P r i v a t e S u b s e l ( B y V a l s e n d e r A s O b j e c t , B y V a l e A s S y s t e m . E v e n t A r g s ) H a n d l e s s p r . C l i c k , M e . C l i c k , s a d d . C l i c k , I . C l i c k
I f c a l c u l a t o r . s = 0 T h e n
c a l c u l a t o r . e x p r e s s i o n . S e l e c t ( )
E n d I f
c a l c u l a t o r . c o m m e n t . T e x t = "