vb Number Length

-

 


NUMBER LENGTH

VB CODE IS -



Private Sub cmdCalculate_Click()

    Dim n As Long

    n = Val(txtNum.Text)

    

    Select Case n

    Case 0 To 9

        lblResult.Caption = "Single digit number"

        

    Case 10 To 99

        lblResult.Caption = "two digit number"


    Case 100 To 999

        lblResult.Caption = "Three digit number"


    Case 1000 To 9999

         lblResult.Caption = "Four digit number"


    Case 10000 To 99999

        lblResult.Caption = "Five digit number"


    Case Else

        lblResult.Caption = "More than Five digit number"

    End Select


End Sub


Comments

Post a Comment

Popular posts from this blog

Computer Mcq Part 1 (1-50)

-
Image
 MCQ ABOUT COMPUTER FROM 1 TO 50 1. An Optical Input Device that interprets pencil marks on paper media is______ a) O.M.R b) Punch card reader c) Optical scanners d) Magnetic tape Answer: A 2. A Billionth of a second is defined as a______ a) Millisecond b) Microsecond c) Nanosecond d) Picoseconds Answer: C 3. CD-ROM stands for______ a) Compactable Read Only Memory b) Compact Data Read Only Memory c) Compactable Disk Read Only Memory d) Compact Disk Read Only Memory Answer: D 4. The Name box on to the left of formula bar______ a) shows the name of workbook currently working on b) shows the name of worksheet currently working on c) shows the name of cell or range currently working on d) None of above Answer: C 5. By Formatting a cell in Currency format, you can specify ? a) Decimal Places  b) Currency Symbol c) Both 1 and 2 Options d) None of above  Answer: C 6. The slide that is used to introduce a topic and set the tone for the presentation is called
Read more

Computer MCQ Part 4 (151-200)

-
Image
 Computer MCQ for Practice 151. CorelDraw is a ______ based drawing application package. a) Photo paint b) Bitmap c) Vector d) Scalar Answer: C 152. ______tool removes overlapping segments in the objects. a) Knife b) Crop Tool c) Virtual Segment Tool d) Eraser Answer: C 153. Which submenu convert the .cdr file in .jpeg format? a) import b) filter c) export d) text Answer: C 154. Apply add perspective from ________ menu. a) Effects b) File c) Help d) Window Answer: A 155. Where we from insert the 'insert character' ? a) File b) Edit c) View d) Text Answer: D 156. CorelDraw is a ______ type of graphics software? a) Raster graphics b) Vector graphics c) Both of these d) None of these Answer: B 157. Shortcut key of zoom to page_______ a) Shift + F2 b) Shift + F3 c) Shift + F4 d) Shift + F5 Answer: C 158. Zoom to all objects, use_______ a) Shift + F2 b) F2 c) F4 d) F3 Answer: C 159. What is the shortcut key to align selected objects to the bot
Read more

Computer MCQ Part 3 (101-150)

-
Image
 ALL ABOUT COMPUTER MCQ 101. Which command brings you to the first slide in your presentation? a) Next slide button b) Page up c) Ctrl + Home d) Ctrl + End Answer: C 102. Which file starts MS Word? a) Winword.exe b) word.exe c) word2003.exe d) 2007.exe Answer: A 103. Which is not a computer classification? a) Mainframe b) Maxframe c) Mini d) Notebook Answer: B 104. Which language is directly understood by the computer without translation program? a) Machine language b) Assembly language c) High level language d) None of above Answer: A 105. Which menu provides you options like Animation Scheme, custom Animation, Slide Transition? a) Insert Menu b) Format Menu c) Tools Menu d) Slide Show Menu Answer: D 106. Which of the following features should you use while typing in the notes text box? a) Slide show  b) Insert c) Slide maser d) Zoom Answer: D 107. Which of the following is internal memory? a) Disks b) Pen Drives c) RAM d) CDs Answer: C
Read more