I-BEGO

misi master-master ...
stelah brhasil bkin menu nya ...
sy skarang pngen tahu gimana caranya nyisipin gambar ke form office 2007 ane ...
jadi tampilannya selesai deh ..

plis tolong bantu ya, ujikom ane tinggal 2 hari lagi ...
terus gimana caranya ganti skinnya biar jadi warna hitam ...

thanks ya oom oom master vb ...

ztha wrote:terus gimana caranya ganti skinnya biar jadi warna hitam ...

Tolong tampilkan hasilnya screenshotnya disini...

Skin biar jadi hitam.
Buat Option Popup Menu terlebih dahulu

Code: Select all

'---------------Menu Option Kanan----------------
Dim ControlOpt As CommandBarPopup
Dim ControlHelp As CommandBarControl
Dim SubControl As CommandBarControl

Set ControlOpt = RibbonBar.Controls.Add(xtpControlPopup, 0, "&Options")
    ControlOpt.Flags = xtpFlagRightAlign
    Set SubControl = ControlOpt.CommandBar.Controls.Add(xtpControlPopup, 0, "&Change Skin")
        SubControl.CommandBar.Controls.Add xtpControlButton, ID_OPTIONS_STYLEBLUE, "&Blue"
        SubControl.CommandBar.Controls.Add xtpControlButton, ID_OPTIONS_STYLEBLACK, "B&lack"
        SubControl.CommandBar.Controls.Add xtpControlButton, ID_OPTIONS_STYLESILVER, "&Silver"
        SubControl.CommandBar.Controls.Add xtpControlButton, ID_OPTIONS_STYLEAQUA, "&Aqua"
Set ControlHelp = RibbonBar.Controls.Add(xtpControlButton, ID_BANTU, "&Bantuan")
    ControlHelp.Flags = xtpFlagRightAlign


Sisipkan di CommandBar_Execute

Code: Select all

Private Sub CommandBars_Execute(ByVal Control As XtremeCommandBars.ICommandBarControl)
On Error Resume Next
Select Case Control.Id   
    Case ID_OPTIONS_STYLEBLACK:
        CommandBarsGlobalSettings.Office2007Images = App.Path & "\Black.dll"
        CommandBars.PaintManager.RefreshMetrics
        CommandBars.RecalcLayout
End Select
End Sub


ztha wrote:misi master-master ...
stelah brhasil bkin menu nya ...
sy skarang pngen tahu gimana caranya nyisipin gambar ke form office 2007 ane ...

Nyisipin gambar apa memberi Icon???

nyisipin gambar oom ...
itu lho yg kaya aplikasi perpustakaan ...
nah klo yg saya backgroundnya masih polos (default office 2007)

ini screenshot program saya oom ...


nah, saya pengen tau gimana caranya pengen tampilannya tuh kaya program oom ..



mohon kasih tau yah oom ...

Aku juga dulu kebingungan kok Om...
Dengan Sedikit kreatifitas bisa kok...

Code: Select all

Private Sub MDIForm_Load()
frmBackground.Show
End Sub

Gimana bisa? Pa Bingung?

Post Djuliar telah mendapat kopi dari:

ztha

bukanya ada code simple na pas install itu???

@Djuliar : makasih ya Om Djuliar udah ngasih tau ilmunya ke ane ...
alhamdulilah ujikom ane suksesss !!
makasih ya oom Djuliar atas bantuannya ...