I want to round any float value to its next value but with round function it depends upno the fraction like if i do round(43.24 , 2) it will return me 43 but i want to get 44 is there any function in vb 6 with which i could do so Noshaba

u can also do this on keypress event of text box Private Sub txt1_KeyPress(KeyAscii As Integer) dim strValid as string strValid = "1234567890" if instr(strValid , chr(keyAscii)) = 0 then keyAscii = 0 end if end sub It would help u not to enter any character other than numeric values Noshaba

I have got the solution of the problem....here is that for u also Don't redesign the form rather use the following code: Function fResetEntries(frm As Form) Dim objObject As Object Dim i As Long For i = 0 To frm.Count - 1 Set objObject = frm.Controls(i) If objObject.NAME = "cmd1" then objObject.enabled = false End If Next i End Function :) isn't more easier and cleaner Noshaba

Is there any way to access all of buttons one by one thru loop but the buttons are not in a control array. I have almost 40 buttons on a form and i need to make some of them enable and some of them disable at runtime by checking there names. I dont want to write the long code but the buttons are not in a control array...Is there any way out of this situation. Thanx in advance Noshaba

Thnx for the help ... Now I have bcome able to solve my problem...:) Noshaba

Im using Visual Basic 6.0 and facing a problem...an error message occurs Run Time Error : 402 must close/hide modal form This error occurs sometimes when I use to save some record on a modal form...If I close the error message application would be closed. Plz help me to trace out this problem...what could be the reason behind it. Thanx in advance Noshaba Mariam

if im getting ur question right u can do this in following way: >> keypress event of text box1 if chr(keyascii) = " " then text2.setfocus end if write the same code in key press event of each textbox and set focus to next text box Noshaba

I need to use WinSock in vb6.0 to read emails of different accounts. Is any one know from where i could b able to get help on this. Thanx Noshaba

ur problem could b solved with the help of control array in vb 6.0 add a control array of text boxes then add the following method in the code and call it where u want a new text box Private Sub AddControl() ' Add a TextBox as the second element of a control array. Load Text1(1) ' Set the location below the first TextBox. Text1(1).Move Text1(0).Left + Text1(0).Width, Text1(0).Top ' Make the new TextBox visible Text1(1).Visible = True End Sub hope it will help u fo further details u can get help from following link http://msdn2.microsoft.com/en-US/library/kxt4418a.aspx[^] Noshaba

y dont u try to do this with .textarray prperty ., I think it will help u more efficiently than this. for further details u can ask bcoz i'm using MSHFlexGrid in my codes also :)

link for data report www.freevbcode.com/showcode.asp?ID=5288[^] link for crystal reports http://www.vbexplorer.com/VBExplorer/vb_feature/august2000/using_crystal_reports.asp[^] Noshaba

yes u can do so with the help of datareports or crystal reports whatever u want to use in ur application. with the help of these reports u can generate any kind of report on a click of button

u need to create a connection object to access the database and a recordset object to access a table. then with the help of that recordset u can access the values of fields. ex: private sub form_load() dim cn as new adodb.connection dim rs as new adodb.recordset dim query as string cn.ConnectionString = "Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=mbdb;Data Source=abc" cn.Open query = "selet * from table1" rs.open query , cn if rs.eof = false then txtbox1.text = rs.fields("field1") end if rs.close set rs = nothing cn.close end sub try this hope it will help u Noshaba

I need to handle Emails thru my VB code, I know a lil about three techniques thru which I could do so. MAPE , WinSock, CDO If any one could help me in this regard and also tell me which is the best to use. And also I need to know the link where I could know about the best approach (How to use?) Thanx Noshaba Mariam

Thanx for the reply but............ Sorry I couldn't b able to get what I exactly want from the page u suggested.

Hi, Im using VB 6.0 True DBGrid. I want to change the back color of some rows depending on the condition. For example, if if a row contains value 1 in one of its column then its back color would b red and other rows remain with the same default color. Thanx Noshaba Mariam

There are two events of a grid leave cell event and enter cell event...Leave cell event occurs when focus transffered to some other cell and Enter Cell event occur when specified cell got focus. Try them mey be it would work for u :)

If u want to open file with extension .sln in text box then in my opinion u need to copy the text of the file to clip board and then paste it in text box. In this way it would appear as if file is opening directly in text box :)

Hi, U need to create menu on the form and make it invisible. Then on Mouse Down event of listbox check the value of button. in this way Private Sub List1_MouseDown(Button As Integer, Shift As Integer, X As Single, Y As Single) If Button = vbPopupMenuRightButton Then Me.PopupMenu Me.file, vbPopupMenuCenterAlign End If End Sub Noshaba

Hello! okay... can u plz tell me where u have placed that text box on ur report. Secondly can u plz tell that where r u assigning the value to text box in ur code(in which procedure). Thanks, Noshaba