Developing a form

[Thompyt]

I am attempting to develop a form that uses a query developed from several tables.



The main part is a listing of the Query output into the form.

IE:



The first 2 columns is the basis. It looks purty as a form. I had to use a multiple items form and it sticks you with a set "Excel" type format. Is there a way to "free form this? If I put all the extras in line, then I cant get the me.field.Visible =true/false to work.
I am using the Dynaset (Inconsistent Updates)


left 2 columns come from one table, checkmarks from another table, Class one table, subnets one table and Echelon from one table to the query.


Suggestions?

[ItsMe]

Are you using bound controls and a bound form? I do not understand the question or problem. Are controls not behaving as expected?

[Thompyt]

testing.zip

I am trying to find a way in which I can update the table through the form where I have control of the visibility of the CLASS, SubNetCombo, EchelonCombo.

I want to keep the first 2 columns as a complete data unit - Meaning it lists all the data from tblMain for Units and Output

Then have a row of checkmarks for each waveform/net that are specific to the row of data in tblmain, then have CLASS, SubNetCombo, EchelonCombo sort of a separate set of data that is specific to tblMain and will update it.

[ItsMe]

I am trying to find a way in which I can update the table through the form where I have control of the visibility of the CLASS, SubNetCombo, EchelonCombo....

The combo controls are bound to the table. So, each time the User selects an item from a combo, the table will be updated.

After that, you lose me. Are you trying to update data from your tblMain to another table? You can create a recordset that is a clone of your form's recordset.

You mentioned that you are using DataEntry = Yes. The form's recordset will contain only the records the User created.

A button in the form's Header could execute some code that understands the records the user just created.

So, change your form to Data Entry = Yes. Then add the following code to a button as an example.

    If Me.Dirty = True Then
        Me.Dirty = False
    End If

Dim rs As DAO.Recordset
Set rs = Me.RecordsetClone
    While Not rs.EOF
        MsgBox rs![Echelon]
        rs.MoveNext
    Wend
Set rs = Nothing

[Thompyt]

Itsme,
I've got most of what I wanted figured out. What I am trying to do now is to get the comboboxes to not show up unless certain checks are selected. Say CheckSRW is selected all I want to see is ComboboxClass.

Another bent I am going on is if I have several columns output such as
Column1 = SWWs: IIF(CheckSWW = True, "1" & [Output] & " " & "SWW(" & Class &")","")
Column2 = WWWs: IIF(CheckWWW = True, "1" & [Output] & " " & "WWW(" & Class &")","")
Column3 = MOUSEs: IIF(CheckMUOS = True, "MOUSE","")

If the checks are in the same row I will get all 3 columns filled in: 1234 12BN3AR SRW(C).....1234 12BN3AR WNW(C).....MOUSE

I can concatenate all 3 and add a pipe in between: 1234 12BN3AR SRW(C) | 1234 12BN3AR WNW(C) | MOUSE

What can I do if one of the columns is not checked and I don't want to see: 1234 12BN3AR SRW(C) | | MOUSE?

What is the simplest way? Do a find and replace query of any | | with |? What if it is at the beginning or end? 1234 12BN3AR SRW(C) | |

[Thompyt]

I think I have it:
For all | | - test: Replace([Combined],"| |","|")
For all zzzzzzz | - Test2: IIf(Right([test],2),Left([test],Len([test])-2),[Test])
For all | zzzzz - Test3: IIf(Left([test2],3)=" | ",Right([test],Len([test])-3),[Test2])

[ItsMe]

Is it possible to restructure some of your data/tables? It seems to me that if your user interacting with a form is not producing Long Integer data types your data is not optimized. Solutions that require parsing data are usually an indicator the source of the data is foreign and you do not have full control of it. In other words, parsing text should result in normalized data that has Numbers as Key values.

[Thompyt]

It is entirely possible. This is a work in progress and I would tweak it more and more to meet a slimmer dB. I know Netbase is not the correct foreign key.