Search:

Type: Posts; User: bahbahbah

Page 1 of 2 1 2

Search: Search took 0.01 seconds.

  1. Replies
    14
    Views
    1,073

    VBScript being deprecated

    https://learn.microsoft.com/en-us/windows/whats-new/deprecated-features

    Apologies if already posted, just came across this today.
  2. Replies
    6
    Views
    891

    Re: Problems on VB6 Compile

    virustotal.com is typically used.

    @OP, I'd double check what API calls you're using (if any), I know I've had problems with certain ones in the past causing my programs to get flagged. I suppose...
  3. Re: Add-in to Print "Now" (date/time) in the VB6 IDE? Streamline documentation?

    Here's some code that will add a button to the IDE. When clicked it will add a comment at the end of the line with the results of Now()
    Very untested and shoddy code. (like all my **** lol)

    ...
  4. Re: MemDB.BeginTrans | MemDB.CommitTrans - Purpose and Usage?

    Database transactions will commit everything all at once. If there are errors, it'll roll back and not commit anything to the database.

    I can't speak for cMemDB in particular, but you can find...
  5. Re: VB6 calculates 1 billion numbers to find the number that can be rounded by 7

    If I leave "Remove Integer Overflow checks" off, and the rest on, I get 3.82
    I get 4.15 with all checks on (avg of 5 runs). Can anyone explain that difference? I thought removing integer overflow...
  6. Re: VB6 Question: drag handle bottom right corner

    Here's one that subclasses the form. It draws the grip handle and responds to sizing events. The Invalidate bit doesn't quite work - not sure what the problem is. Roughly translated from here.

    ...
  7. Re: VB6 Question: drag handle bottom right corner

    Here is some code that will draw the lines.

    https://www.vbforums.com/images/ieimages/2023/08/13.png


    Private Declare Function DrawFrameControl Lib "user32" (ByVal hDC As Long, lpRect As RECT,...
  8. Re: VB6 calculates 1 billion numbers to find the number that can be rounded by 7

    Use ASP.NET Core if you want speed. ASP.NET Core is compiled, other ASP.NET versions are interpreted, just like classic ASP.
    Time: 00:00:07.0789885


    @{
    DateTime a = DateTime.Now;
    int...
  9. Replies
    10
    Views
    1,416

    Re: Identifier Expected Problem

    Don't use brackets with Call.

    Use this:
    Call modutil.proctest(z)


    Not this:
    Call (modutil.proctest(z))
  10. Re: How to calculate the control-sizes when there are multiple ScaleModes?

    https://www.vbforums.com/showthread.php?870537-vb6-Get-ScaleMode-when-no-ScaleMode-property-exists
  11. Re: How to calculate the control-sizes when there are multiple ScaleModes?

    ScaleX and ScaleY methods?
  12. Re: twinBASIC now has partial experimental support for optimized builds

    Impressive results, that's very exciting!
  13. Re: The magical TabStrip control that can cause the IDE to crash constantly

    If you don't mind pushing the stop button twice, you could use TheTrick's functions. Put this in a module:




    Private Declare Function FindWindow Lib "user32" _
    Alias...
  14. Re: Creating a CustomTaskPane - VB6 addin for Office

    Here's the method that ended up working:



    'In addin
    Implements ICustomTaskPaneConsumer
    Public TaskPaneFactory As Office.ICTPFactory
    Private TaskPane As CustomTaskPane

    Private Sub...
  15. Re: Creating a CustomTaskPane - VB6 addin for Office

    Thanks fafalone, good thinking and sounds like the way to go. I've had a quick play around and not having much luck so far but will keep tinkering as I get the time.

    Quick build time with...
  16. Creating a CustomTaskPane - VB6 addin for Office

    Hi all,

    I'm struggling to create a CustomTaskPane for Office. I can't find any code online, and have read a couple of times that this isn't possible in VB6.

    The docs give me a bit of hope:
    ...
  17. Replies
    8
    Views
    744

    Re: Force Repaint on Menu VB6

    Try this


    Private Declare Function RedrawWindow Lib "user32" (ByVal hWnd As Long, _
    lpRect As Any, ByVal hRgnUpdate As Long, ByVal fuFlags As Long) As Long

    Private Declare Function...
  18. Re: Opinions Wanted: Truncate Arrays or Track the Last Index filled?

    You have a ValuesMax variable which holds the true size of the array. Once you have finished adding your items, you can do a redim preserve values(lbound(values) to ValuesMax). Probably put that in a...
  19. Re: PicBox Scale method - Issues with Scrolling smoothly - Code Provided

    Try move these lines before the If statement:



    ChtScale.xOffset = mx - X
    ChtScale.yOffset = my - Y
  20. Re: PicBox Scale method - Issues with Scrolling smoothly - Code Provided

    For 60fps smooth scrolling:

    Add these to the declarations area of your form:



    Private m_dLastRenderTime As Double
    Private Declare Function GetTickCount Lib "kernel32" () As Long
  21. Re: PicBox Scale method - Issues with Scrolling smoothly - Code Provided

    Rendering at a certain fps might be the go, look into game loops.
  22. Re: [RESOLVED] Fastest way to clear cells based on cel length

    With Application
    .ScreenUpdating = False
    .Calculation = xlCalculationManual
    .DisplayStatusBar = False
    .EnableEvents = False
    End With

    Dim vSheet As...
  23. Replies
    3
    Views
    1,544

    Re: COM port number keeps changing

    Possibly relevant:

    https://stackoverflow.com/questions/62938364/refreshing-devicemap-serialcomm-or-getting-what-coms-are-available-in-device-ma
  24. Replies
    48
    Views
    5,519

    Re: Assembly in VB6: The Basics

    Thanks Niya! I'm a total noob at this stuff. You've provided a great explanation. ChatGPT is able to explain bits and pieces further. Am I right in thinking stack frames relate only to the function...
  25. Re: A TLS 1.3 stack written in Visual Basic 6 - wqweto on front page of Hacker News

    RetailCoder is the RubberDuckVBA guy. He's got some great blog posts and asks/answers a lot of great questions on StackOverflow.

    https://rubberduckvba.wordpress.com/popular-posts/



    And...
  26. Replies
    7
    Views
    1,684

    Re: Workaround for "?" wildcard search?

    Can confirm it's the same problem on Windows 10. If you click into the search bar, you'll see the query it's using. It will be like this:
    ...
  27. Re: vb6 function,class,cdecl(api call speed test)

    New timings below. Can't help you with the ASM one.

    Call Cdecl dll api ,UsedTime:
    V1_CallCdecl2--182.0814 MS,Result=300003
    CallCdecl2(ModAsm)--198.9314 MS,Result=0
    VbAdd--216.1119...
  28. Re: [RESOLVED] Improve Instr's performance in vbTextCompare mode

    Timings from post #4:

    ---------------------------
    Project1
    ---------------------------
    Instr_Olaf: 12,089.45msec

    Instr_SDO: 1,052.63msec

    Instr_Marzo: 486.98msec
  29. Re: vb6 function,class,cdecl(api call speed test)

    I don't have the VBlegend file so had to make some modifications to your project. Change the cCDCL file:


    s = s & ChrB$(Val("&H" & Mid$(sHexCode, i, 2)))

    to


    s = s & VBA.ChrB$(Val("&H" &...
  30. Re: How to automatically compile and run on vb6?

    Tools > Options > General

    https://www.vbforums.com/images/ieimages/2023/04/8.png
  31. Re: Problem with video editors trying to trim videos

    Try using ffmpeg. Look at the first answer here (How to cut a video, without re-encoding):
    ...
  32. Re: Visual basic 6 - missing: frx dll

    It's possibly related to the below link. You may need to install that to get the frxdll.dll
    ...
  33. Re: how we can make like as this burning effect?

    Looks sort of like a mandelbrot set.

    https://www.vbforums.com/showthread.php?828979-Mandelbrot-Fractal-Drawer
  34. Replies
    9
    Views
    1,218

    Re: CopyVariant or MoveVariant?

    Actually, ignore my response!

    If VarType(Source) = vbObject Then

    is never true. The timings for the other functions still stand!
  35. Replies
    9
    Views
    1,218

    Re: CopyVariant or MoveVariant?

    Here's one more version, similar to your first one but a bit faster.


    Private Function MoveVariant2(ByRef Destination As Variant, ByVal Source As Variant)

    If VarType(Source) = vbObject Then
    ...
  36. Re: [VB6] Call Functions By Pointer (Universall DLL Calls)

    Brill, thanks mate. I'll look into the IISSample.LookupTable.
  37. Re: Need help with socket listener to stay active

    It looks like your While loop is just going to go on forever. Nothing is going to make it exit. Is it meant to be While(readByte > 0) instead of While(True) ?
  38. Re: [VB6] Call Functions By Pointer (Universall DLL Calls)

    I've fixed the issue with ASP slowness but still no idea why. Instead of declaring the object in the global.asa, I moved it to page scope.

    So instead of this in global.asa:


    <object...
  39. Re: [VB6] Call Functions By Pointer (Universall DLL Calls)

    Hi all,

    I've created an activex DLL and use this class to call functions from a standard DLL (one that I don't own, can't look at the source code). It all works fine however when I call my DLL...
  40. Re: 80040e10|No_value_given_for_one_or_more_required_parameters

    1) You're missing the quotes on line 565:

    strSQL = strSQL & ""&surrender_dog_sleep&" "

    Should be:


    strSQL = strSQL & "'"&surrender_dog_sleep&"'"
Results 1 to 40 of 44
Page 1 of 2 1 2



Click Here to Expand Forum to Full Width