| | |
most urgent
![]() |
Referring Grd if same as referring to the Current Cell which is active.
u can even write
When you press enter in the Product Id Column the FlexGridEditor control becomes visible populating all ur Products. When FlexGridEditor needs to be made Visible = False then the Value in the cell is temporarily stored in strOldValue and the cell is updated. Lest any problem, the old value can be replaced by
Hope this solves ur doubt.
Is it working anyway?
u can even write
Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text)
Grd.TextMatrix(Grd.Row, Grd.Col) = FlexGridEditor.Value
When you press enter in the Product Id Column the FlexGridEditor control becomes visible populating all ur Products. When FlexGridEditor needs to be made Visible = False then the Value in the cell is temporarily stored in strOldValue and the cell is updated. Lest any problem, the old value can be replaced by
Visual Basic 4 / 5 / 6 Syntax (Toggle Plain Text)
Grd = strOldValue
Hope this solves ur doubt.
Is it working anyway?
Regards
Shaik Akthar
Shaik Akthar
When this error shows up, without clicking the OK button,
Press Ctrl + (Break/Pause) button and debug each statement execution by pressing F8 key (executing one line at a time for each press of F8 key) till the line of error in Grd_LeaveCell event is highlighted
and post the highlighted line in Grd_LeaveCell() event
Also change the following statement in RED your MR form.
Press Ctrl + (Break/Pause) button and debug each statement execution by pressing F8 key (executing one line at a time for each press of F8 key) till the line of error in Grd_LeaveCell event is highlighted
and post the highlighted line in Grd_LeaveCell() event
Also change the following statement in RED your MR form.
Private Sub SetProductValues()
Dim rs As New ADODB.Recordset
On Error GoTo SetProductValues_Error
rs.Open " SELECT ITEM_CODE, PRODUCTNAME, MAXOFUNIT FROM PARTDETAIL WHERE ITEM_CODE = '" & Grd.TextMatrix(Grd.Row, cItemCode) & "' ", con, adOpenKeyset, adLockReadOnly
If rs.BOF = False Then
Grd.TextMatrix(Grd.Row, cItemName) = rs!ProductName
Grd.TextMatrix(Grd.Row, cUnit) = rs!MAXOFUNIT & ""
End If
SetProductValues_Done:
If rs.State Then rs.Close
Set rs = Nothing
Exit Sub
SetProductValues_Error:
Call Process_Error(MODULE_NAME, "SetProductValues")
Resume SetProductValues_Done
End Sub Regards
Shaik Akthar
Shaik Akthar
![]() |
Similar Threads
- pls heeeeeeeeelp its urgent. (C)
- Urgent! (C++)
- URGENT: Need help on I/O code! (Java)
- Urgent help (Networking Hardware Configuration)
- Homepage keeps switching back to a porn site (Web Browsers)
- Importing SQL Script File - Urgent !! (Database Design)
Other Threads in the Visual Basic 4 / 5 / 6 Forum
- Previous Thread: removing cell value at runtime
- Next Thread: combining diacritical marks
| Thread Tools | Search this Thread |
* 6 429 2007 access activex add age application basic beginner birth bmp calculator cd cells.find click client code college component connection connectionproblemusingvb6usingoledb copy creat ctrl+f data database datareport date delete dissertations dissertationthesis dissertationtopic edit error excel excelmacro file filename form hardware header iamthwee image inboxinvb internetfiledownload keypress label listbox listview liveperson login looping machine microsoft movingranges number objectinsert open oracle password prime program prompt range-objects readfile reading record refresh remotesqlserverdatabase report save search sendbyte sites sort sql sql2008 sqlserver subroutine tags textbox time urldownloadtofile vb vb6 vb6.0 vba visual visualbasic visualbasic6 web window windows





