koolsid

[QUOTE=abu taher;831400]A text box show current date(like 24-03-2009). I write in other textbox 3. I want when I write 3 then the textbox (24-03-2009) automatically increase month like 24-06-2009. how it possible?[/QUOTE] Text1.Text = Format(DateAdd("m", Val(Text2.Text), Text1.Text), "dd-mm-yyyy")

try with "Set" [B]Set[/B] Me.Sections("Section2").Controls("imgEmployee").Picture = frmMain.imgPic.Picture

[QUOTE]same data contents exactly as excel1[/QUOTE] Why don't you make a copy instead? Or do you just want to copy sheet1 from Excel1 to Excel2?

[quote]But my problem is that when adding the item to list box it will add "FOUND: wildcat" 7 times to the list box because there is 7 characters found in wlciadt.[/quote] First things first Change this line List1.AddItem "FOUND: " + v to List1.AddItem "FOUND: " & v and then …

Hi Russel Since the thread is already solved, I feel you need to also know why this happens... This is just for your FYI... When using Preserve keyword, you can resize only the last array dimension. For example, if your array has only one dimension, you can resize that dimension …

You missed out on one of the most important suggestion what your other friend gave ;) use a flexgrid instead of listview......... [url]http://www.vbforums.com/showpost.php?p=3481380&postcount=3[/url]

I have always loved the power of API's :D This will help you... [code]Private Declare Function SHFileOperation Lib "shell32.dll" _ Alias "SHFileOperationA" (lpFileOp As SHFILEOPSTRUCT) As Long '~~> Copy File/Folder Private Const FO_COPY = &H2 '~~> Does not display file names Private Const FOF_SIMPLEPROGRESS = &H100 Private Type SHFILEOPSTRUCT hWnd …

@KSS: That thread is 5 years old :) The original poster must have already got the answer by now... Also I will never recommend DAO. ADO is much faster ;)

Hi rabbithaveit I would suggest the API way as it gives you more flexibility... See picture attached... Please place a Command Button on the form so that you can exit. Paste this code in the general declaration of the form... [code]Option Explicit Private Declare Function DeleteMenu Lib "user32" _ (ByVal …

Hi Blocker This works for me... I have made few changes in the code to show it as an example. Please make relevant amendments for your original code... [code]Private Sub Command1_Click() Dim mycontrol As Control '~~> What is "newstudentry" in your code??? '~~> This works for me... '~~>Me.Controls will ensure …

I have replied to your other post... It will give you a start... Incase you get stuck let me know.... :)

If you are looking to interact with it then my suggestion is that you use the inbuilt calendar of vb6.... else here is the code [code]Private Sub Command1_Click() '~~> launces the date time window in control panel Call Shell("rundll32.exe shell32.dll,Control_RunDLL timedate.cpl") End Sub[/code]

Reading the contents of text file is not a problem. i couldn't understand your rest of the query... Do you mean that if there is a word "True" in your text document which if found, you want to display the message "Finish"... if yes then try this [code]Sub ReadtextFile() Dim …

To capture the image of the form, try this, Create two forms.. Form1 and Form2. Place a commandbutton in form1 and picturebox control in form2. [B]Code for Form1[/B] [code]Option Explicit Private Declare Function MapVirtualKey Lib "user32" Alias "MapVirtualKeyA" _ (ByVal wCode As Long, ByVal wMapType As Long) As Long Private …

I didn't find creating login screens and saving the data in access database difficult... However, I was wondering if there is any other way we could do that, i mean saving the username and passwords in any other file rather than a database and encrypting the same... Rgds Sidz [email]hotsid_rout@yahoo.com[/email]

Have you checked your nearest software dealer?? In case you want it to buy online then simply click the link below or copy and paste the link in your browser... you'll find plenty of choices... [url]http://a9.com/visual%20studio%206?src=amz[/url] happy buying :cool:

Call statement Transfers control to a Sub procedure, Function procedure, or dynamic-link library (DLL)procedure. I believe that you cannot use "CALL" to call a file which is not executable. same goes with SHELL... Call Shell(AppName, 1) Where AppName contains the path of the Executable file. try it with any other …

ADO is supposed to be quick... is your table indexed??? (I am assuming that you are aware of how to set a relationship with the database using ADO so i am not checking that....) will be back from office in evening. will check your reply later :mrgreen: