?
Solved

fonts problem

Posted on 2003-03-31
4
Medium Priority
?
237 Views
Last Modified: 2013-12-02
Hi all,
I am having a problem when dealing with the fonts in VB
I have a string variable to store the font name, when I choose , say, Times new Romans, it will have "Times New Roman" stored , pretty normal, the problem occurs when I choose a chinese fonts,  the string will have the value:
"2OcuAe ew Roman                  " in it and there will be an error.
Does anyone know how to solve this?
Thanks.
Joey
0
Comment
Question by:monjoes
[X]
Welcome to Experts Exchange

Add your voice to the tech community where 5M+ people just like you are talking about what matters.

  • Help others & share knowledge
  • Earn cash & points
  • Learn & ask questions
4 Comments
 
LVL 1

Accepted Solution

by:
hazgod earned 200 total points
ID: 8241914
Dim fontCount As Long       'this counts how many fonts the computer has

Dim index As Long           'use in loops


On Error GoTo errorhandler

fontCount = Screen.fontCount    'store the number of fonts in the font count variable

For index = 0 To fontCount                      'loop through the fonts adding them to the menu
    If Not Screen.Fonts(index) = "" Then
         cmbFonts.AddItem Screen.Fonts(index)
    End If
Next
0
 

Expert Comment

by:raseniero
ID: 8255522
can you give me your code? raseniero@sni.ph
don't get your point!
0
 

Expert Comment

by:CleanupPing
ID: 9446627
monjoes:
This old question needs to be finalized -- accept an answer, split points, or get a refund.  For information on your options, please click here-> http:/help/closing.jsp#1 
EXPERTS:
Post your closing recommendations!  No comment means you don't care.
0

Featured Post

VIDEO: THE CONCERTO CLOUD FOR HEALTHCARE

Modern healthcare requires a modern cloud. View this brief video to understand how the Concerto Cloud for Healthcare can help your organization.

Question has a verified solution.

If you are experiencing a similar issue, please ask a related question

The SignAloud Glove is capable of translating American Sign Language signs into text and audio.
This article will show how Aten was able to supply easy management and control for Artear's video walls and wide range display configurations of their newsroom.
Introduction to Processes
Starting up a Project
Suggested Courses
Course of the Month8 days, 3 hours left to enroll

765 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