Jobs
Author: satish muranal Date Submitted: 10/28/2005 Category: Forms Compatibility: VB 6 This code has been accessed 3950 times.
Email Yourself this snippet:
1) add new form 2) add the listbox 3) add the textbox in textbox u can type anything (ex- bca) 4) add one command button to form then click on listbox and go the property of listbox (List property) and click on that list property and add their some fontnames like(Arial black,Arial, Bookman old style, comic sans ms, times new roman etc) then change the properties of controls objectname property settings command1 name cmdapply caption apply
Code
private sub cmdapply_click() text1.fontname = list1.text End sub
