Tek-Tips is the largest IT community on the Internet today!

Members share and learn making Tek-Tips Forums the best source of peer-reviewed technical information on the Internet!

  • Congratulations strongm on being selected by the Tek-Tips community for having the most helpful posts in the forums last week. Way to Go!

Search results for query: *

  • Users: RSX02
  • Order by date
  1. RSX02

    Move textboxes from a tab to another tab is not good?

    Hi I had many textboxes, check box, combo box, radio button, well...many objects in a tab control (let's called it Tab1) I had to move all them in a new tab control (called tab2) Since I moved them, all the events that I have for all of them doesn't occured. For example, if I had code in my...
  2. RSX02

    Need Filter help

    take the second message (I made a mistake in this one)
  3. RSX02

    Need Filter help

    Hi I have a datagrid which I display all lines that I have for a job. As my lines has revision also, I have to do a filter when I add a new revision for a specific row to see only the last revision in my datagrid. for example I have the line 1 rev 0 1 rev 1 2 rev 0 2 rev 1 2 rev 2 I display...
  4. RSX02

    There is no row at position 1 error

    Ooopss Sorry about that Dim DRPUBLICVIEW As DataRowView m_DataLayer.DvPool = m_DataLayer.DsPool.Tables("Pool_type").DefaultView m_DataLayer.DvPool.RowFilter = mForm.sfilter dr = m_DataLayer.DvPool.Item(NoSeq) Me.DRPUBLICVIEW = dr DRPUBLICVIEW.Item("OccupiedAF") and...
  5. RSX02

    There is no row at position 1 error

    Hi I have two lines: DRPUBLICVIEW.Item("OccupiedAF") = Me.OccupiedAf.Text DRPUBLICVIEW.Item("unOccupiedAF") = Me.UnoccupiedAF.Text which both fields in my DrPublicView are Decimal. In the both textbox I have the value 8. on the second line it prompt me this error message: "There is no row at...
  6. RSX02

    compare a checkbox with what I have in my Table

    Hi Christiaan I have a similar problem. Here it is: I execute this code: Dim teste As String teste = CType(actl3.Checked, Boolean) & " " & CType(Me.TempImperial, Boolean) If CType(actl3.Checked, Boolean) <> CType(Me.TempImperial, Boolean) Then haschanges = 1 In the teste variable it put "True...
  7. RSX02

    compare a checkbox with what I have in my Table

    Hi I compare this where ChkSpaceHeatingCoil is a checkbox in my form and where DRPUBLICVIEW.Item("Space_heating_coil") is a field that I have in my table that is declared as integer. When ChkSpaceHeatingCoil.Checked is set to True I put 1 in my record. Now this : If...
  8. RSX02

    &quot;Modified&quot; property

    Christiaan I tried this Me.Country.SelectedValueChanged which "country" is my combobox and it's underline the line as it's not valid.
  9. RSX02

    &quot;Modified&quot; property

    So do you think it has a property that does the same in a combobox?
  10. RSX02

    &quot;Modified&quot; property

    Hi I saw that a textbox has the property "modified" does it have something similar for a combobox? I didn't see anything Thanks in advance
  11. RSX02

    Are they the same or not?

    I found how to resolve it: Dim str1 As String Dim str2 As String str1 = Trim(dr.Item("Job_type")) str2 = Trim(Me.JobType.SelectedValue) If str1 <> str2 Then dr.Item("Job_type") = Me.JobType.SelectedValue This is working.
  12. RSX02

    Are they the same or not?

    No I load my record. And, for the testing, i'm only trying to save (because if it has no change done I don't want to save it (create a new revision) but if it has changes I want to create a new revision). So as I didn't change anything between the Load record in my form and the save record. It...
  13. RSX02

    Are they the same or not?

    yeah it's kind of that. I want to create a new revision of a job only when changes has been done. It detects the "haschange" properties as soon as I do an assignment even if both values are equal. This, I don't understand why... that's why I put an if statement.
  14. RSX02

    Are they the same or not?

    Hi I have a problem. I would like to update a field in a dataset only when it's different to the value in the form. I saw that it passed as if it was different. I put messages boxes to see if they were different but it seems like it's the same. Does somebody understand why it does this...
  15. RSX02

    Does it has a Mid function for a decimal

    heheheh Happy to see I'm not the only one! I have another question...After that I think that I'm gonna be a pro with the "Mod". I'm trying to take off everything after the decimal. So I would like to have an integer. But I can't convert it to the integer because it still have a value after the...
  16. RSX02

    Does it has a Mid function for a decimal

    forget it! I called my function with the parameter "integer" instead of "decimal". My mistake! Sorry for that Thanks again RIck
  17. RSX02

    Does it has a Mid function for a decimal

    Dim digit As Integer digit = (chiffre * 10) Mod 10 - (((chiffre * 10) Mod 10) Mod 1) MsgBox(digit) return me 0
  18. RSX02

    Does it has a Mid function for a decimal

    on the number 123.456 this return me 3: Dim digit As Integer digit = (chiffre * 1) Mod 10 Mod 10 - (((chiffre / 1) Mod 10) Mod 1) MsgBox(digit) this return me 0: Dim digit As Integer digit = (chiffre * 10) Mod 10 Mod 10 - (((chiffre / 10) Mod 10) Mod 1) MsgBox(digit)
  19. RSX02

    Does it has a Mid function for a decimal

    what if I would like to retrieve the first decimal. For example. 123.456 I would like to retrieve 4 I tried with the minus sign but doesn't seems to work. Thanks in advance

Part and Inventory Search

Back
Top