&& populate fields from Masterstats cursor SELECT MASTERSTATS GO TOP ThisForm.cboRequirement.ControlSource = 'Masterstats' ThisForm.cboRequirement.ColumnCount = 1 ThisForm.cboRequirement.RowSourceType = 6 ThisForm.cboRequirement.RowSource = 'reqt_name' Thisform.cboRequirement.Value = Masterstats.reqt_name ThisForm.cboProbeType.Value = Masterstats.probe_type ThisForm.lblGain.Visible = IIF(ThisForm.cboProbeType.Value='LVDT', .t.,.f.) ThisForm.txtGain.Visible = IIF(ThisForm.cboProbeType.Value='LVDT', .t.,.f.) ThisForm.txtGain.Value = IIF(ThisForm.cboProbeType.Value='LVDT', Masterstats.gain,'') ThisForm.txtChannel.Value = Masterstats.channel ThisForm.txtCard.Value = Masterstats.card ThisForm.txtProbeSN.Value = IIF(ThisForm.cboProbeType.Value='DP',Masterstats.serial, '') ThisForm.txtFullScale.Value = Masterstats.counts ThisForm.txtStroke.Value = Masterstats.stroke ThisForm.txtStdOffset.Value = Masterstats.std_offset ThisForm.txtStdVar.Value = Masterstats.std_var ThisForm.cboUnit.Value = IIF(llInches,'IN','MM')And based on your email below I just put the following code in the Interactive Change event of the cbo box...but it didn't work:
lcCurrentRec = recno() select masterstats go lcCurrentRec ThisForm.Refresh()Hopefully you can help!! :)