Results 1 to 2 of 2
  1. #1
    Join Date
    Mar 2004
    Location
    belgium
    Posts
    290

    Unanswered: it should be very easy public and private

    i create a module
    i declared several public arrays and variables in it


    to one array i assigned values in the same module like this

    Public PrnSeq(10) As String

    PrnSeq(1) = Chr(27) + "(10U" ' letter set
    PrnSeq(2) = Chr(27) + "(s16,66H" ' 16,66 char/inch
    PrnSeq(3) = Chr(27) + "&l6C" ' 1/8 line space
    PrnSeq(4) = Chr(27) + "(s-7B" ' normal
    PrnSeq(5) = Chr(27) + "(s0S" ' straight
    PrnSeq(6) = Chr(27) + "(s1S" ' italic
    PrnSeq(7) = Chr(27) + "(s0B" ' half bold
    PrnSeq(8) = Chr(27) + "(s7B" ' bold

    started the program

    and i receive "invalid outside procedure"-error, when i don´t assign i have to assign it in (every?) other module(s), and in that case it works fine.

    what´s wrong

    emiel
    Last edited by emiel; 03-14-04 at 07:48.

  2. #2
    Join Date
    Dec 2002
    Location
    Préverenges, Switzerland
    Posts
    3,740
    you need something along the lines of...

    in your module:
    Public PrnSeq(10) As String
    and:
    public sub fillPrnSeq()
    PrnSeq(1) = Chr(27) + "(10U" ' letter set
    PrnSeq(2) = Chr(27) + "(s16,66H" ' 16,66 char/inch
    'etc
    end sub

    then run fillPrnSeq from Form_Load() in your startup form

    izy
    currently using SS 2008R2

Posting Permissions

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