Solved

List all font in list box (VB6)

Posted on 1998-11-16
2
893 Views
Last Modified: 2013-12-03
I want to list all font available on computer in a list box! Please post your sample code! Need this for VB6
0
Comment
Question by:Acid_Buzz
2 Comments
 
LVL 2

Accepted Solution

by:
schild earned 200 total points
ID: 1445158
This is the needed code

********************************
    Dim Index As Integer
   
    For Index = 0 To Screen.FontCount
        List1.AddItem Screen.Fonts(Index)
    Next

****************************

you can rtrive the printer fornt as well like this:
********************************
    Dim Index As Integer
   
    For Index = 0 To Printer.FontCount
        List1.AddItem Printer.Fonts(Index)
    Next

****************************

Good Luck
Schild
0
 

Author Comment

by:Acid_Buzz
ID: 1445159
Ok.. I don't know why i post this question.. anyway.. i give you the point.. heheh..
0

Featured Post

How to run any project with ease

Manage projects of all sizes how you want. Great for personal to-do lists, project milestones, team priorities and launch plans.
- Combine task lists, docs, spreadsheets, and chat in one
- View and edit from mobile/offline
- Cut down on emails

Join & Write a Comment

Article by: Martin
Here are a few simple, working, games that you can use as-is or as the basis for your own games. Tic-Tac-Toe This is one of the simplest of all games.   The game allows for a choice of who goes first and keeps track of the number of wins for…
Enums (shorthand for ‘enumerations’) are not often used by programmers but they can be quite valuable when they are.  What are they? An Enum is just a type of variable like a string or an Integer, but in this case one that you create that contains…
As developers, we are not limited to the functions provided by the VBA language. In addition, we can call the functions that are part of the Windows operating system. These functions are part of the Windows API (Application Programming Interface). U…
Get people started with the process of using Access VBA to control Outlook using automation, Microsoft Access can control other applications. An example is the ability to programmatically talk to Microsoft Outlook. Using automation, an Access applic…

746 members asked questions and received personalized solutions in the past 7 days.

Join the community of 500,000 technology professionals and ask your questions.

Join & Ask a Question

Need Help in Real-Time?

Connect with top rated Experts

16 Experts available now in Live!

Get 1:1 Help Now