Search results

  1. I

    Query Array

    Yeah, thats what I was trying to do. I'll have a look into it. Cheers.
  2. I

    Query Array

    I was wondering if this was possible or not. Can I write a function like the one below, which will accept a value and return many values? I would like to set various columns from one score. If I have something like “Expr1: returnArray(42)” in the query, can the function return the 3 values and...
  3. I

    Need to Add Zeros to Field

    where did u put the function? If you put it in a module and make sure it is public, not private, it should be accessible by the query
  4. I

    Need a String Function

    I've already answered it. http://www.access-programmers.co.uk/forums/showthread.php?t=87623
  5. I

    Quick question - TreeView Control - maximum records

    I have been using the treeview for a while now but its only got about 2000 entries in total.
  6. I

    Need a String Function

    I wouldn't post questions in 2 places...
  7. I

    Need to Add Zeros to Field

    How about this, I know it ain't elegant but should do the job. Public Function xxx(intValue As Integer) As String If Len(intValue) = 1 Then xxx = intValue + "00000" ElseIf Len(intValue) = 2 Then xxx = intValue + "0000" ElseIf Len(intValue) = 3 Then xxx = intValue + "000" ElseIf...
  8. I

    Word Help

    Fixed it. Found a link to this on another forum. http://support.microsoft.com/default.aspx?scid=KB;en-us;q188546 If you add this to the start, it opens correctly. Dim temp As Word.Application 'Test if object is already created before calling CreateObject: If TypeName(wrdApp) <> "Application"...
  9. I

    Word Help

    Hi, I am exporting a table to word and I have come across a problem. My code opens a template, creates a table with the correct number of rows and columns at a certain position, and then adds data to it. At this point, everything is fine. But, here is where the problem sticks its ugly head...
  10. I

    Return Array

    I got it. I changed the penultimate line to be CheckInspection = arrMatrix()
  11. I

    Return Array

    I am writing a function to look in a table and return 2 values. I want to know how to modify the function below to return a string array rather than a string? Dim cat cat = Array(2) cat = CheckInspection("tblFailure", 5) Debug.Print "Val1: " & cat(0) Debug.Print "Val2: " & cat(1) Public...
  12. I

    Losing Accuracy

    I was dabbling with the idea but was put off by the speed of the processor with variants. In your experience, how much slower is the operations when using variants rather than normal types? The database is doing 1 section. I have about 10 sections and over 1500 records. Do you think it would...
  13. I

    Losing Accuracy

    So the lesson is: Don't use single or double. I had the idea of multiplying everything by 10 which would mean that I could use ints. Then in the query, divide it by 10. I wanted to try and get a better way but I think i'll have to do it. Thanks for your help guys.
  14. I

    Losing Accuracy

    There you go. I have stripped away all useless information from the database to make it smaller. Thanks for looking at it.
  15. I

    Losing Accuracy

    Yeah, I tried it like this... round(GetYesNoScore1,0.2,..etc..),1) But it doesnt seem to do anything different. I also tried making it into a function so no avail. (Below) Public Function roundMe(val As Single) As Single roundMe = Round(val, 2) End Function
  16. I

    Losing Accuracy

    Yeah, I tried adding in "score = Round(score,1)" but it doesn't make any difference. Everything is fine in the function but after that, when it appears in the query, it loses accuracy.
  17. I

    Losing Accuracy

    Hi, I have encountered a problem and was wondering if anyone has come across one similar. I have a query running a function called GetYesNoScore (See below) with various parameters. It is a function to see if a field is a “1” and if so, count up the weighting. So, if I run...
  18. I

    Screen Positioning

    Yeah, I already had a look at his software. Quite good. I want to write it myself because my software is going to be sold and there would be legal issues about re-selling his software. I have got round the problem by setting the form to its minimum size, then if the resolution is higher...
  19. I

    Screen Positioning

    How to I get the screen to show the top of the form? Solid lines and xs show what is shown on the screen. This is used for bigger resolutions. I am modifying the layout of the forms depending on the screen resolution. Also what is the highest resolution anyone has seen an access database...
  20. I

    Write Conflict

    Hi, This is the problem that I am having and if anyone could give me advice, it would be a great help. I keep getting the “Write conflict: This record has been changed by another user since…. Blah blah.”. Under one tab, the user is answering questions. The answers are stored and a result is...
Back
Top Bottom