Results 1 to 5 of 5

Thread: msflexgrid Q.

  1. #1

    Thread Starter
    Junior Member
    Join Date
    Oct 2002
    Location
    Notts UK
    Posts
    31

    msflexgrid Q.

    when a user performs a search.
    I have a msflegrid that shows the result.

    the user can print them results listed.

    BUT. i need to add an extra funtion. and i am stuck.
    i want the user to be able to click on the rows they want to print from the search results given

    ie. Say a list of 22 results was listed, Instead of printing all 22 results, They just want to click on the first 3 and the last 3 and click on print and it will print them 6

    hope it makes sence.
    and thanks for all your continued help.

    I am using vb6 and msaccess 2002 with the database converted to msa97

  2. #2
    Addicted Member chatty's Avatar
    Join Date
    Aug 2002
    Location
    in a house
    Posts
    202
    What you can do is add another column called print or something like that and this code

    VB Code:
    1. Private Sub MSFlexGrid1_DblClick()
    2. If MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 0) = "" Then
    3.     MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 0) = "Y"
    4. ElseIf MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 0) = "Y" Then
    5.     MSFlexGrid1.TextMatrix(MSFlexGrid1.Row, 0) = ""
    6. End If
    7. End Sub

    and when you print the information go and look at the grid and select only those that is marked Y and print those files.

    Hope this is what you were looking for

  3. #3
    PowerPoster
    Join Date
    Aug 2000
    Location
    IN SILENCE
    Posts
    6,441

    Well

    My selection in grid example :
    Attached Files Attached Files
    Remaining quiet down here !!!

    BRAD HAS GIVEN ME THE ULTIMATIVE. I have chosen to stay....

  4. #4

    Thread Starter
    Junior Member
    Join Date
    Oct 2002
    Location
    Notts UK
    Posts
    31
    Thanks guys, Your rearly increasing my learning curve.

    James.

    There seems to be an error here
    Type mismatch

    Me.lblText(2).Caption = _
    FormatCurrency(CDbl(Me.lblText(2).Caption) + Me.MSFlexGrid1.TextMatrix(LGROW, 1), 2)

    Looks like i could use this example if i can get it to work.

    Thanks

  5. #5
    PowerPoster
    Join Date
    Aug 2000
    Location
    IN SILENCE
    Posts
    6,441

    Well

    Weird, I am not having the problem over here...
    Remaining quiet down here !!!

    BRAD HAS GIVEN ME THE ULTIMATIVE. I have chosen to stay....

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