vb example color picker from form

-

 COLOR PICK FROM FORM





CODE VIEW -


Private Sub Form_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single)
    If Button = vbRightButton Then
        PopupMenu mnuColors
    End If
End Sub


Private Sub mnuBlue_Click()
    Form1.BackColor = vbBlue
End Sub

Private Sub mnuGreen_Click()
    Form1.BackColor = vbGreen
End Sub

Private Sub mnuRed_Click()
    Form1.BackColor = vbRed
End Sub

Private Sub mnuWhite_Click()
    Form1.BackColor = vbWhite
End Sub

Private Sub mnuYellow_Click()
    Form1.BackColor = vbYellow
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