Results 1 to 21 of 21

Thread: Window>Docu 1,docu 2,docu 3 Ect Ect

Threaded View

  1. #1

    Thread Starter
    Lively Member Neo-dark's Avatar
    Join Date
    Oct 2004
    Location
    The neather world
    Posts
    114

    Smile Window>Docu 1,docu 2,docu 3 Ect Ect

    Hello all: included a small code for you to look at :

    VB Code:
    1. Private Sub tbToolBar_ButtonClick(ByVal Button As MSComCtlLib.Button)
    2.     On Error Resume Next
    3.     Select Case Button.Key
    4.         Case "New"
    5.             LoadNewDoc
    6.         Case "Open"
    7.             mnuFileOpen_Click
    8.         Case "Save"
    9.             mnuFileSave_Click
    10.         Case "Print"
    11.             mnuFilePrint_Click
    12.         Case "Cut"
    13.             mnuEditCut_Click
    14.         Case "Copy"
    15.             mnuEditCopy_Click
    16.         Case "Paste"
    17.             mnuEditPaste_Click
    18.         Case "Bold"
    19.             ActiveForm.rtfText.SelBold = Not ActiveForm.rtfText.SelBold
    20.             Button.Value = IIf(ActiveForm.rtfText.SelBold, tbrPressed, tbrUnpressed)
    21.         Case "Italic"
    22.             ActiveForm.rtfText.SelItalic = Not ActiveForm.rtfText.SelItalic
    23.             Button.Value = IIf(ActiveForm.rtfText.SelItalic, tbrPressed, tbrUnpressed)
    24.         Case "Underline"
    25.             ActiveForm.rtfText.SelUnderline = Not ActiveForm.rtfText.SelUnderline
    26.             Button.Value = IIf(ActiveForm.rtfText.SelUnderline, tbrPressed, tbrUnpressed)
    27.         Case "Align Left"
    28.             ActiveForm.rtfText.SelAlignment = rtfLeft
    29.         Case "Center"
    30.             ActiveForm.rtfText.SelAlignment = rtfCenter
    31.         Case "Align Right"
    32.             ActiveForm.rtfText.SelAlignment = rtfRight
    33.         Case "Back"
    34.             'another todo,add the screen back code
    35.         Case "Forward"
    36.             'ToDo: Add 'Forward' button code.
    37. 'So i want this button to move 1 Forward like from Document 1 towards document 2(without opening a new instance Just to goto the next one)
    38.             MsgBox "Add 'Forward' button code."
    39.     End Select

    Okay what i want the forward and back code to do is move to the next instance of frmbrowser(like when you click on Windows> frmbrowser1 and then plus one)I hope you understand,Help me please :-(
    Last edited by Neo-dark; Jan 24th, 2005 at 03:57 PM. Reason: Wrong subject
    i got kicked out of barnes and noble once for moving all the bibles into the fiction section"--FD

    Of course I'm a real doctor! I'll draw up my own diploma some time to prove it!-Dr Dis

Posting Permissions

  • You may not post new threads
  • You may not post replies
  • You may not post attachments
  • You may not edit your posts
  •  



Click Here to Expand Forum to Full Width