[RESOLVED] Display Ø (phi) in a label on a form

[sgrya1]

Can anyone tell me how to display a Ø symbol on a form?
Can't seem to put ALT-0216 in the labels.caption at design time. No idea how to do it at run time.
I can only think of inserting it as an image which might not look so good.

[GaryMazzone]

I had no problem usint the Alt keystroke method to place it in the lable in VB6. Simple placed the label on the form and in the Property Caption use the
ALT0216 key combo to have it show up

[Hack]

Private Sub Form_Load()
Label1.Caption = Chr(216)
End Sub

[sgrya1]

?? Sorry. I does work...
I tried a few times I'm sure and I kept getting P.
Maybe the textbox had a different font at the time.
Thanks

[dilettante]

Φ is phi, Ø is a letter used in Scandanavian languages.

Option Explicit

Private Const CHARSET_GREEK As Integer = 161
Private Const LOCALE_GREECE As Long = 1032
Private Const PHI As Integer = &H3A6

Private Sub Form_Load()
    Dim strPhi As String
    
    strPhi = ChrW$(PHI)
    
    With Label1
        With .Font
            'These can be set at design time.
            .Name = "Tahoma"
            .Charset = CHARSET_GREEK
        End With
        .Caption = StrConv(StrConv(strPhi, vbFromUnicode, LOCALE_GREECE), vbUnicode)
    End With
End Sub