BUG: Cannot Change DBCS Font Size When Printing

ID: Q150421


The information in this article applies to:
  • Microsoft Visual Basic Standard, Professional, and Enterprise Editions, 16-bit and 32-bit, for Windows, version 4.0
  • Microsoft Windows 95


SYMPTOMS

When using the localized Microsoft Visual Basic for Windows with Double- Byte Character Sets (DBCS), printing problems occur when printing on various printers with various fonts. This problem only occurs on Windows 95. The problem has been reproduced with all Japanese Fonts. The problem does not occur with the United States (US) version of Visual Basic 4.0.


STATUS

Microsoft has confirmed this to be an issue in the Japanese version of Visual Basic version 4.0 for Windows 95. This may be an issue with other localized versions of Visual Basic 4.0. Microsoft is researching this issue and will post new information here in the Microsoft Knowledge Base as it becomes available.


WORKAROUND

Replace the Command_Click event code with the code shown below. This code works to address the problem:


   Private Sub Command1_Click()
      ' Workaround.
      x = printer.currentx
      y = printer.currenty
      printer.print
      printer.currentx = x
      printer.currenty = y

      printer.fontname = "‚l‚r ƒSƒVƒbƒN"
      printer.fontsize = 48
      printer.print "‚ ‚ ‚ ‚ ‚ "
      printer.enddoc
   End Sub 


MORE INFORMATION

Steps to Reproduce Problem



  1. Start a new project in the Japanese version of Visual Basic 4.0. Form1 is created by default.


  2. Add a command button to Form1.


  3. Add the following code to the Command1_Click event:
    
          Private Sub Command1_Click()
             printer.fontname = "‚l‚r ƒSƒVƒbƒN"
             printer.fontsize = 48
             printer.print "‚ ‚ ‚ ‚ ‚ "
             printer.enddoc
          End Sub 


  4. From the Run menu, select Start, or press the F5 key. Click the command button and note that the size of the printed character is not 48.


Additional query words: 4.00 vb4win vb4all KK Japan Far East win95 kbPrint kbWinOS95 kbVBp400bug kbVBp kbDSupport kbdsd

Keywords : kbGrpVB
Version : 4.00
Platform : WINDOWS
Issue type : kbbug


Last Reviewed: January 5, 2000
© 2000 Microsoft Corporation. All rights reserved. Terms of Use.