How to set RibbonBar’s font ?

Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic

   I can Set
    Dim RibbonBar As RibbonBar
    Set RibbonBar = CommandBars.AddRibbonBar("The Ribbon")
    Dim newFont As StdFont
    Set newFont = New StdFont
    With newFont
        .Name = "VK Sans Serif"
        .Size = 8
    End With
    Set CommandBars.Options.Font = newFont
But RibbonBar is not change. 
How to set my font for RibbonBar ?

thanks !

Author	Message Topic Search Topic Options Post Reply Create New Topic Printable Version Translate Topic
Soft4U Members Profile Send Private Message Find Members Posts Add to Buddy List Newbie Joined: 28 March 2006 Location: United Kingdom Status: Offline Points: 9	Post Options Post Reply Quote Soft4U Report Post Thanks(0) Quote Reply Topic: How to set RibbonBar’s font ? Posted: 30 March 2006 at 7:21am
	I can Set Dim RibbonBar As RibbonBar Set RibbonBar = CommandBars.AddRibbonBar("The Ribbon") Dim newFont As StdFont Set newFont = New StdFont With newFont .Name = "VK Sans Serif" .Size = 8 End With Set CommandBars.Options.Font = newFont But RibbonBar is not change. How to set my font for RibbonBar ? thanks !

jcollier Members Profile Send Private Message Find Members Posts Add to Buddy List Senior Member Joined: 15 February 2006 Status: Offline Points: 250	Post Options Post Reply Quote jcollier Report Post Thanks(0) Quote Reply Posted: 30 March 2006 at 11:10am
	I just did the following: Dim RibbonBar As RibbonBar Set RibbonBar = CommandBars.AddRibbonBar("The Ribbon") CommandBars.Options.Font = "VK Sans Serif" It worked for me. I tried several different fonts with no problems. Using Beta 2 With VB6

Soft4U Members Profile Send Private Message Find Members Posts Add to Buddy List Newbie Joined: 28 March 2006 Location: United Kingdom Status: Offline Points: 9	Post Options Post Reply Quote Soft4U Report Post Thanks(0) Quote Reply Posted: 30 March 2006 at 12:52pm
	................... Set TabWrite = RibbonBar.InsertTab(0, "Sè D §Çu Kú") RibbonTab is not work

SuperMario Members Profile Send Private Message Find Members Posts Add to Buddy List Admin Group Joined: 14 February 2004 Status: Offline Points: 18057	Post Options Post Reply Quote SuperMario Report Post Thanks(0) Quote Reply Posted: 30 March 2006 at 1:03pm
	So what exactly does not work?

Soft4U Members Profile Send Private Message Find Members Posts Add to Buddy List Newbie Joined: 28 March 2006 Location: United Kingdom Status: Offline Points: 9	Post Options Post Reply Quote Soft4U Report Post Thanks(0) Quote Reply Posted: 30 March 2006 at 1:13pm
	the font of TabWrite Caption is not work. it had not been infected with the font "VK Sans Serif".

Oleg Members Profile Send Private Message Find Members Posts Add to Buddy List Admin Group Joined: 21 May 2003 Location: United States Status: Offline Points: 11234	Post Options Post Reply Quote Oleg Report Post Thanks(0) Quote Reply Posted: 30 March 2006 at 1:58pm
	RibbonBar.TabPaintManager.Font.Name = "VK Sans Serif"
	Oleg, Support Team CODEJOCK SOFTWARE SOLUTIONS

Soft4U Members Profile Send Private Message Find Members Posts Add to Buddy List Newbie Joined: 28 March 2006 Location: United Kingdom Status: Offline Points: 9	Post Options Post Reply Quote Soft4U Report Post Thanks(0) Quote Reply Posted: 30 March 2006 at 7:44pm
	oh , Thank you for all your kind help !!! but how to set font for the caption group of RibbonTab ? Set GroupClipborad = TabWrite.Groups.AddGroup("NghiÖp Vô") the font of Group Caption is not work.

Oleg Members Profile Send Private Message Find Members Posts Add to Buddy List Admin Group Joined: 21 May 2003 Location: United States Status: Offline Points: 11234	Post Options Post Reply Quote Oleg Report Post Thanks(0) Quote Reply Posted: 31 March 2006 at 7:50am
	This will be available in official release.
	Oleg, Support Team CODEJOCK SOFTWARE SOLUTIONS