Try this:
Open "C:\Temp\Result s" & Format(Now, "mmmddyyyy" ) & ".txt" For Output As #1
navigator
Last Activity: Oct 3 '06, 05:02 AM
Joined: Oct 2 '06
Location:
-
Open the activex dll source and the run it. The dll will run in the background. Then, open your vb project and run it. Now, you can debug and step into any function even if it is in the dll.Leave a comment:
-
1) In excel, open your worksheet and open the VB macro editor (Alt-F11)
2) In the project window on the left, double-click on "This Workbook". A code window will open.
3) From the top left object selection, select 'Workbook'. The 'Open' event will be created.
4) Write the following line in the Open event to activate the Tab:
Worksheets("She et1").Activate
(replace Sheet1 with the...Leave a comment:
-
Hi,
An easier way would be to save the size of the circle to the registry. Use the functions SaveSetting and GetSettings to access the registry....Leave a comment:
-
You can achieve this only by adding 4 weeks to the first date. Here's the code
Date2 = DateAdd( "ww", 4, Date1)
There might be occasions if Date1 is close to the beginning of the month. This will set Date2 28 days later in the same month. You can check for this by adding the following line that checks the month of both dates and adds another week if required:
If Month(Date1) = Month(Date2)...Leave a comment:
-
Do this:
Code:Public Sub FindForms() Dim frx As Form, fCount As Integer For Each frx In Forms() fCount = fCount + 1 Debug.Print frx.Caption Next Debug.Print "Total forms found: " & Format(fCount) End Sub
Hope it solves your problem... :-)...Leave a comment:
-
The size of the label is controlled by the Width & Height properties. Specifying values for this will change the size of the label UNLESS you have set the AutoSize property to 'True'. In that case, the label will resize itself based on its own contents and changing the Width & Height properties will have no effect.
Lemme know if the above helps......Leave a comment:
-
Hi,
You will need to put an Image control into the picture box. Load the Image control with the picture and control the Top and Left properties of the Image control with the scroll bars.
To zoom in or out, simply change the height and width of the Image control. (Stretch property must be True). Set the min/max for the scrollbars accordingly...
let me know if you can manage it... :-)...Leave a comment:
-
Try this:
Here the sales tax is 10% (multiply the price by 1.1). Hope it helps......Code:Public Sub TotalPrice() MsgBox "The total price is " & Format(Val(InputBox("Enter the original price in dollars:", "Price")) * 1.1, "0.00"), vbInformation, "Total Price" End SubLeave a comment:
-
How do I duplicate objects in VB6?
How do I duplicate objects in VB6?
Lets say I have 2 objects Obj1 and Obj2 of the same class. I wish to create a copy of Obj1 in Obj2. Simply 'Set'ing the objects will make them point to the same object in memory.
One way would be to copy each property by property, such as:
Obj2.Prop1 = Obj1.Prop1
Obj2.Prop2 = Obj1.Prop2
and so on... but this is time-consuming and will not work...
No activity results to display
Leave a comment: