Recent content by Marinus

  1. M

    Hidden subform on a mainform.

    Hi, This is how I did it, I have a checkbox Sale Private Sub Form_Current() Me.sfrmBuy.Visible = Nz(Me.Sale, False) Me.sfrmSales.Visible = Not Nz(Me.Sale, False) Private Sub List210_Click() On Error GoTo List210_Err Me.sfrmBuy.Visible = Nz(Me.Sale, False)...
  2. M

    Not rounding decimals

    Thank you my Friend, Found some of it on the internet, actually all but this sums it up easier..
  3. M

    Not rounding decimals

    For one I am glad you thought me to look in the right place, tried everything else except Double which I must have overlooked . Your a genius..
  4. M

    Not rounding decimals

    Hi All, Would someone be able to help me to eliminate rounding decimals in my app. Although I am not the destructive type I am now ready to throw the PC out of the windows.. Would a Dim as Long statement round decimals when used? as all through my table and forms and reports I have consistently...
  5. M

    Need some help with coding

    I know but you have helped too, so worth mentioning together with David and Bob, John, Missinglinq and Gemma.. Without whom I would still be staring at the wallpaper of my computer screen... And of course the others I have missed. :)
  6. M

    Need some help with coding

    And you are great too.. !!:p
  7. M

    Need some help with coding

    Thanks Dave, I have solved my one percent issue with a entry in the system table and Iif statements in the text boxes. As you are right about the back to back sales, I do not store price information with materials as this changes in every record. I do store the buy and sales price in a...
  8. M

    Need some help with coding

    Thanks Dave, Somehow that makes sense to me, can I ask you the question about storing in the buy and sell in one table or two.. From my beginners point of view buy and sell separate seemed like a good idea... However I could be so wrong here.. Would you like to share any views on that.. By the...
  9. M

    Need some help with coding

    Thanks Chris for your that Chris, This application was started without any input from my friend, It evolved from a form based application to a code based application to minimise the use of keyboard and mouse. As a beginner I have made many mistakes and others have helped me solving them. Also...
  10. M

    Need some help with coding

    Dear All, Have this problem as is seen on the attached JPG. On the subform weights are displayed from the a table and a calculation. This is transferred into the table by a Material list, which pops up a form with choices. When one of the buttons is pressed the following code will run...
  11. M

    Reading value from serial port

    Due to time restriction I had to come up with something quick so I bought one of these keyboard wedges that can write to a file.. It was cheap but it works and reads the scale under a command button. I just installed this on Wednesday, yesterday was ST. Patrick's day, very big here in the...
  12. M

    Query and Table question

    Thanks Iman, they contain the actual transactions Table1 contains waste bought by weight, Table2 by item, however they can be sold by item or by weight.. Hope this explains..
  13. M

    Query and Table question

    Hi All, Before starting to mess up things, I would like to ask some advise, I have to store data in 2 different tables. Table one has the following structure; ID|MATID|FULLWEIGHT|EMPTYWEIGHT|BUYPRICE Table 2 has structure; ID|MATID|WEIGHT|HOWMANY|BUYPRICE The quer(y/ies) should should give...
  14. M

    Run-Time 13 Type mismatch

    Thanks for the reminder.. Saved my day.. Like my old teacher used to say years ago, only use quotes when you really have too..
  15. M

    Run-Time 13 Type mismatch

    Hi All, Probably very simple but I get above error when trying to run following code.. Could anyone shed some light please// Private Sub cbPrintStock_Click() Dim strView As String Dim StrDocname As String Dim StrWhere As String strDelim = """" StrDocname = "rptStock" If...
Back
Top Bottom