ccm.net Open in urlscan Pro
23.206.106.180  Public Scan

Form analysis
2 forms found in the DOM

GET /s/

<form action="/s/" class="top_subnav search_form" method="get" role="search" data-url="https://ccm.net/s/">
  <fieldset>
    <legend>Search engine</legend>
    <label for="f_libelle">Search</label>
    <input type="search" name="f_libelle" id="jSearchLabel" placeholder="Search">
    <button type="submit">
      <svg class="search_icon" width="25" height="25">
        <use xlink:href="#icon-Loupe"></use>
      </svg>
    </button>
  </fieldset>
</form>

POST //mailing.ccmbg.com/subscribe?ajx=1

<form method="post" action="//mailing.ccmbg.com/subscribe?ajx=1" id="frmSS7" class="nl-box__form jBindingGTM" data-position="ColRightForm">
  <input type="hidden" id="list_517" name="lists[]" value="517">
  <fieldset>
    <legend>Subscribe to the newsletter</legend>
    <input type="email" name="email" placeholder="Enter your email..." autocomplete="email" required="">
    <input type="submit" value="Ok">
    <div class="nl-box__link nl-box__link--solo">
      <a href="//mailing.ccmbg.com/archive/last-517" target="_blank" class="a_hover">See an example</a>
    </div>
    <div class="jMailingRecaptcha"></div>
    <div class="rgpdNewsletter">
      <p>This information will be transmitted to CCM Benchmark Group to ensure the delivery of your newsletter.</p>
      <p>It will also be used, according to your selected preferences, to provide you with more relevant advertisements.</p>
      <p>You have the right to access and modify your personal data, as well as to request its suppression, within the limits foreseen by the legislation in force.</p>
      <p>You can also change your preferences regarding the advertisements you receive at any time. For more information, please check our privacy
        policy.<a href="https://ccm.net/contents/957-processing-of-personal-data-ccm?origin=ccm.net" target="_blank"> Processing of Personal Data</a>.</p>
    </div>
  </fieldset>
</form>

Text Content

WE VALUE YOUR PRIVACY

We and our partners store and/or access information on a device, such as cookies
and process personal data, such as unique identifiers and standard information
sent by a device for personalised ads and content, ad and content measurement,
and audience insights, as well as to develop and improve products.

With your permission we and our partners may use precise geolocation data and
identification through device scanning. You may click to consent to our and our
partners’ processing as described above. Alternatively you may access more
detailed information and change your preferences before consenting or to refuse
consenting. Please note that some processing of your personal data may not
require your consent, but you have a right to object to such processing. Your
preferences will apply to this website only. You can change your preferences at
any time by returning to this site or visit our privacy policy.

MORE OPTIONSAGREE

 * Home
 * Computers
 * Hardware
 * Windows
 * macOS
 * Ubuntu
 * Printers
 * Laptops
 * WiFi
 * VPN
 * PC

Search engine Search
 * Deutsch
 * English
 * Español
 * Français
 * Português
 * Bahasa Indonesia
 * Italiano
 * Русский
 * Polsky
 * Nederlands
 * हिंदी

 * Subscribe
 * Login

Computers Mobile Apps & Sites Sound & Image Gaming Security Downloads Forum
Hardware Windows macOS Ubuntu Printers Laptops WiFi VPN PC


KEEP APPLICATION WINDOW ON TOP OF OTHER APPS WITH VB6


 * Home
 * Computing
 * Fiches
 * Programming
 * Languages
   

David Webb 06/04/22 16:28



In this article we will explain how to keep an application window on top of
other applications with VB6.

contents
 * In a general module
 * In the form
 * Call the function
 * Remove priority


HOW TO KEEP APPLICATION WINDOW ON TOP OF OTHER APPS IN A GENERAL MODULE?

Public Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal_ 
    hWndInsertAfter As Long, ByVal x As Long, ByVal y As Long, ByVal cx As _ 
    Long, ByVal cy As Long, ByVal wFlags As Long) As Long 
Public Const HWND_TOPMOST = -1 
Public Const HWND_NOTOPMOST = -2 
Public Const SWP_NOACTIVATE = &H10 
Public Const SWP_SHOWWINDOW = &H40 
Public Const SWP_NOMOVE = 2 
Public Const SWP_NOSIZE = 1 





HOW TO KEEP APPLICATION WINDOW ON TOP OF OTHER APPS IN THE FORM?

Private Sub Form_Load() 
    Dim R as long 
    R = SetWindowPos(SheetName.hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE) 
end sub




HOW TO CALL THE FUNCTION?

The function must call upon the activation of the form. It will allow the
program to resume the function if the form is selected (as the function may be
used by other application).

Private Sub Form_Activate() 
    Dim R as long 
    R = SetWindowPos(SheetName.hwnd, HWND_TOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE) 
end sub




HOW TO REMOVE PRIORITY?

Private sub SuppPriority() 
    Dim R as long 
    R= SetWindowPos(NomFeuille.hwnd, HWND_NOTOPMOST, 0, 0, 0, 0, SWP_NOMOVE Or SWP_NOSIZE) 
End sub

Do you need more help with VBA? Check out our forum!
Subject Replies
How to convert number into text in Excel 9
Comparing Two Excel Sheets and copying like data to third sheet 11
Excel make cell flash red 13
Formula in Excel to turn numbers into text 4
Need to delete columns based on Column header 7
Excel VBA copy and paste loop with logic condition 6
VBA find column by name and sort 4
Copy paste special into last row of another worksheet 3
How to copy visible cells after filter in VB 19
macro to compare two excel sheets 6



Keep application window on top of other apps with VB6

Contents In a general module In the form Call the function Remove priority How
to keep application window on top of other apps in a general module? Public
Declare Function SetWindowPos Lib "user32" (ByVal hwnd As Long, ByVal_...

Manage my push subscriptions






LANGUAGES

 * .exe is Not a Valid Win32 Application: fix Windows 7, XP > Guide
 * Install apps on Windows 10: via Run, without Microsoft store > Guide
 * Send text messages from Windows 10 via Your Phone app > Guide
 * TWAIN driver: scanner, Windows 10, meaning, download > Guide
 * Where apps are stored on Windows 10? > Guide
 * What are Accessors and Mutators C++
 * Programming: quotation marks, apostrophes and strings
 * C++ open url: in default browser
 * Remove the underline from links in HTML, CSS
 * My Documents + Environment Variables in VBA/VB6
 * How to draw a human face using code?
 * VB6 RGB color: chart, codes


See also
 * VB Editor

Newsletter
Subscribe to the newsletter
See an example


This information will be transmitted to CCM Benchmark Group to ensure the
delivery of your newsletter.

It will also be used, according to your selected preferences, to provide you
with more relevant advertisements.

You have the right to access and modify your personal data, as well as to
request its suppression, within the limits foreseen by the legislation in force.

You can also change your preferences regarding the advertisements you receive at
any time. For more information, please check our privacy policy. Processing of
Personal Data.


Trending
   
 * iOS 15
 * iPhone 13
 * Windows 11
 * Apple M1X
 * Cryptocurrency
 * iCloud+
 * Youtube Shorts
 * COVID-19


Download Software & Apps


 * ANYDESK


 * BLUESTACKS


 * BOOT CAMP


 * CCLEANER



 * Sign Up
 * Team
 * Terms of Use
 * Confidentiality policy
 * Contact
 * Policies
 * Manage cookies