Search results

  1. indesisiv

    Combo Box and Data Sources

    Set the column width to 0... eg. 3,0,0,0 Would be about right. Steve
  2. indesisiv

    Option groups

    Set the default value of the frame to Null. Then when you go onto a new record it will be set to Null. OR In the form_current put something like Me.Frame2.Value = Null That should get you started. Steve
  3. indesisiv

    visibility problems cont

    The afterupdate code fires when the frame value is updated ie when you click on it ... Thu current record fires when you go on to a new record. You do not actually have to put the whole code in both. I would just put it in the after update: Then in the form_current put call...
  4. indesisiv

    visibility problems cont

    For this case you are probably right .. what i would do is. Set the default value of the frame to null then use: Select Case Me!Frame6 Case 1 Me!field1.Visible = True Me!field2.Visible = False Case 2 Me!field1.Visible = False Me!field2.Visible = True case else Me!field1.Visible = True...
  5. indesisiv

    Bounded Textbox

    Is the field in your table that you want to put the date in set to recieve a date (date/Time) ?? Steve
  6. indesisiv

    Visible problems

    You could use the same module that is slightly modified. Try: Function HideAll(FormName As String, WhatToHide As String,WhatToShow As String) ' This procedure will reverse the visability of any ' controls identified with any tag you want. Dim F As Form, x As Integer Set F = Forms(FormName)...
  7. indesisiv

    Input Mask for post code

    I use >LL09\ 0LL;0;_ it works fine for me. Steve
  8. indesisiv

    Two text field values to update one table field

    the more ideas the better with these things is what i always say. Then at least you get a choice as to solution to use. No probs :):D :) Steve
  9. indesisiv

    Two text field values to update one table field

    Not sure if this is the best way to do this but you could do something like: Private Sub Serial_AfterUpdate() Dim FirstBitOfSerial FirstBitOfSerial = "0770375" Me.Serial = FirstBitOfSerial & Me.Serial End Sub This automatically updates and gives you the entire serial...
  10. indesisiv

    Search Form Thingy

    Not quite I actually wanted it to show the list of names like it does in the example that i attached. Basically do exactly as the one that i attached but just not run from the form with the data in it.
  11. indesisiv

    Search Form Thingy

    IMO posted a serch program here Previous Thread I was wondering if anyone has a way of adapting something like this so that it can be run without having to start from the form that you wanted to view. ie. Start at the search form and then after a selection open the other form and show the...
  12. indesisiv

    Validation Rule

    Can you do something like Private Sub NAME_BeforeUpdate(Cancel As Integer) If DCount("[Field]", "TableName", "[Field] = [Forms]![FormName]![FormField]") = 0 Then MsgBox "ID doesn't exist", vbOKOnly, "Attention!" Cancel = True End If End Sub i think that in your case Field = BoxID TableName...
  13. indesisiv

    Form Editing Time

    Have it sorted now ... musta been having a big mental block yest.
  14. indesisiv

    Switchboard - Text Color

    Bob If Me("OptionLabel" & rst![ItemNumber]).Caption = "Return to Main Menu" Then Me("OptionLabel" & rst![ItemNumber]).ForeColor = vbBlue else Me("OptionLabel" & rst![ItemNumber]).ForeColor =vbBlack End If Do the same for the other 1. That should do it Steve
  15. indesisiv

    Switchboard - Text Color

    yeah sorry. You will need to put in and else statement with those if's to set it back Only tested it on a single board.
  16. indesisiv

    Switchboard - Text Color

    I am assuming that the switchboard was generated by access itself? If that is the case then i know that in access 97 it can be done. Not sure if is the best way but... In the switchboard form there is some code that says fill options. Scroll down that till you find the bit that puts the labels...
  17. indesisiv

    Form Editing Time

    HELP!! I can't seem to get my head around this problem but i am sure that there is a really simple way to do it. Basically i want to be able to measure the time it takes to input data into a form. The time must only record when the user opens the record to when they close it. This may be done...
  18. indesisiv

    No data on a report

    i just use visual basic. put this in the open of the report Private Sub Report_Open(Cancel As Integer) If DCount("*", Me.RecordSource) = 0 Then MsgBox "No Data for this report", 16, "Sorry" Cancel = True End If End Sub also i use on error resume next in the click of the...
  19. indesisiv

    Datasheet ColumWidth Problem

    I need to set all cause i am using one datasheet to show multiple things. Just thought that if i could set them all then i could save time. I am calling what to view from a combobox on the main form. I will just have to write a procedure to do it all. Thanks for the help Steve
  20. indesisiv

    Datasheet ColumWidth Problem

    I am sure this is an easy thing but is there a simple way of setting all columnwidths in a datasheet view form to 0. I assume that i need to loop around all of the fields but i am not sure how to do this. Thanks for any help Steve :confused:
Back
Top Bottom