jinnie_gia

[I]Hey... The code that you have written is correct.. keyascii=13 is used for the "Enter" key response.. Instead of writin this code in the Form_load() event, write it under General Declarations.. By doing so , u r makin this code global to your form... Let me knw... :cool: [/I]

Try using the RND([number]) in a loop to generate the nos. randomly.... TC [QUOTE=renu_kj;916068]Hi, Is there an option/ or a formula to generate random numbers without duplication...Currently i'm not storing the random generated numbers in the database. Please help me..its quite urgent[/QUOTE]

Private Sub btPrint_Click() On Error GoTo On_ClickError Dim frm As IspecialForm Set frm = Me.ActiveForm frm.GetTextBoxInvisible frm.Refresh 'CommonDialog1.Flags = cdlPDReturnDC + cdlPDNoPageNums CommonDialog1.Action = 5 CommonDialog1.PrinterDefault = True CommonDialog1.CancelError = True CommonDialog1.Orientation = cdlPortrait CommonDialog1.ShowPrinter frm.PrintForm Printer.EndDoc frm.SetStartDesign Exit Sub On_ClickError: If Err.Number = 32755 Then Exit Sub 'User Pressed …

[COLOR="Red"] Hi there, Try the followin to solve the problem..Let me know... You can adopt this plan. under control panel, ODBC, create a new DSN (data service Name) point to the access database, enter the user id and password. and save it after naming it say Test. use this code …

[COLOR="Green"]Say for instance, If we try to delete a record that is displayed in the Text box then: Set Rs = New ADODB.Recordset Rs.Open "SELECT * FROM tblVendor WHERE txtVendor='" & txtVendor.Text(txtVendor) & "'", CN, adOpenStatic, adLockOptimistic With Rs If MsgBox("Do you really want to delete this record ? " …

[COLOR="red"] ComboBox is basically a combination of LIST box & Text Box... Its a "Drop down List".. index property maintains the count of the items added in the combo-box..U can also dynamically add items in it.. :icon_cool: Take care [/COLOR] [QUOTE=sbala_810;916204]How to use combo box in VB[/QUOTE]