Search:
Type: Posts; User: Mc Brain
Search:
Search took 2.33 seconds.
-
The If GetActiveWindow <> 0 Then MsgBox "Application is Active" line should be in a button, form or whatever. It cannot be "placed" anywhere. Regards,
-
Sorry, nerdangel. I quit that job almost 10 years ago. I can't recall whether I found a way out or not. Sorry.
-
Found it!! It was service.state. Thank you, Hack!!
-
So close!! How do I get to know if the service is running or stopped?
-
I've been searching the forums and Internet and cannot find what I need. I want to list the services which are running on a machine. Actually, I don't need to list them all but some of them.
I...
-
That's not possible. You should at least get an error message. I'm guessing you have some On Error Resume Next somewhere!
-
Try
Dim Data As Variant
Open PathToFile For Binary As #fileNo
Data = String(FileLen(PathToFile), " ")
Get #fileNo, , Data
MsgBox Data
Close #fileNo
-
My guess is that you should open it as Binary to be able to read the whole file. If the EOF character appears before you expected, the file won't be completely read but til this character. If your...
-
The DISTINCT statement works on every field you've include in your query. That's why you get a different recordcount. Have a look at this example
empFirstName empMiddleName
Michael ...
-
What type of file are you trying to open?
-
Found the solution. Got rid of MS Coolbar's OCX. My toolbars are fixed on the top of th usercontrol now :thumb:
-
I've found this article: http://www.developerfusion.co.uk/show/2929/2/ Which I thought it would be the answer for my problem. However, after implementing that solution, I'm still stuck. I have a...
-
The form is not held in memory. Im printing a list of loaded forms before and after unload them... and none gets printed once it's finish this task. However, the UC's control (which is held on...
-
I've even change the startup form. It's not longer the form itself but Sub Main.
Sub Main()
Dim fSudoku As frmSudoku
Set fSudoku = New frmSudoku
fSudoku.Show vbModal
-
But I'm doing "Unload Me", so the UC should be terminated.
-
There are usercontrols and/or classes. Shouldn't these events fire when the form it contains the usercontrol is unloaded? :confused:
-
Can anybody explain me why the difference between this two logs:
IDE
Board UserControl_Paint
ctlSudoku TB_ButtonClick
Board UserControl_Terminate
ctlSudoku ...
-
I've seen the strangest things you can imagine with VB6. It's not a big difference at all... and you'll be absolutely sure no glitch could fire the event again when it shouldn't. But... do it as you...
-
I would disable the timer first. If Form2 lasts too long to load... the timer might be fired again before it gets disabled.
-
As far as I know... inkjet printers cannot print white.
-
Dim Max As Integer
Max = -30000
If Number1 > Max Then Max = Number1
If Number2 > Max Then Max = Number2
If Number3 > Max Then Max = Number3
-
As far as I know, none of the previous loaded forms will respond to any event the user might do.
-
Why don't you try something like this:
Dim myArr() As String
Private Sub Form_Load()
'ReDim myArr(0) As String
'The above line was removed, so that the array has not any...
-
Try this:
myStr = Mid$(myStr, 2)
myStr = Left$(myStr, Len(myStr) - 1)
myStr = Right$(String(17, "0") & myStr, 17)
-
Just move the webbrowser and resize it. Something like this:
Private Sub HideOrShow()
If Frame1.Visible Then
WebBrowser1.Left = 1200
WebBrowser1.Width = 2400
Else
...
-
Glad I could help. I might look for a neweer version of it. I'm not sure if I corrected or improved anything... but I most probably have done it.
-
Here you have a thread to shed some light on you. You might learn some interesting things out of this thread.
http://www.vbforums.com/showthread.php?t=334899&highlight=in+case
-
This is what it's called "Memory leak". There are objects or even entire form(s) which were not unloaded from memory. You should never use the END instruction to finish your application. Be sure you...
-
How about this?
http://www.vbforums.com/showthread.php?t=121723&highlight=gradient
-
It's not a solution. I need the event not to be trigger at all. This is because even I can override the event, the selected item might have been changed... and this is not a desired behaviour.
-
Can anyone help me with this? Run this proyect, click the Open button and move the second form so that the label is placed above the first's form's treeview. Double-Click on the label.... Why does...
-
That won't guarantee with 100% of trust the proportions you need. If you use the random function, the numbers you'd get will be random. There's a big chance you get the proportions you need... but...
-
But it cannot guarantee that the number "1" would appear 10% of the times.
-
I'd go like this:
Private Sub Form_Load()
Dim i As Integer
Dim j As Integer
Dim tmp As Integer
Dim MixCount As Integer
-
Yes, the key was the "RThreshold" and I had found it (almost at the same time you posted it) at http://www.programmers-corner.com/sourcecode/111.
'enable the oncomm event for every reveived...
-
-
The cable is Ok, and the firewall is not blocking since I receive these events on the receiver:
comEvDSR: When I open the port on the sender to send a data out (twice)
comEventBreak: When I close...
-
No. Handshaking = 0 comNone
-
On the receiver:
Private Sub Form_Load()
' Use COM2.
MSComm1.CommPort = 2
' 9600 baud, no parity, 8 data, and 1 stop bit.
MSComm1.Settings = "9600,N,8,1"
End Sub...
-
Nope, both firewalls are disabled and stil the OutBufferCount remains equals to zero. Any ideas?
|
Click Here to Expand Forum to Full Width
|