Click here to Skip to main content
12,884,261 members (30,702 online)

Visual Basic

 
GeneralRe: VB.NET / APPLICATION SETTINGS Pin
Dave Kreskowiak29-Nov-12 15:50
mvpDave Kreskowiak29-Nov-12 15:50 
QuestionMouse Down Event and Flag setting Pin
big_col28-Nov-12 19:53
memberbig_col28-Nov-12 19:53 
AnswerRe: Mouse Down Event and Flag setting Pin
Simon_Whale28-Nov-12 22:46
memberSimon_Whale28-Nov-12 22:46 
GeneralRe: Mouse Down Event and Flag setting Pin
big_col29-Nov-12 2:09
memberbig_col29-Nov-12 2:09 
GeneralRe: Mouse Down Event and Flag setting Pin
Simon_Whale29-Nov-12 3:06
memberSimon_Whale29-Nov-12 3:06 
AnswerRe: Mouse Down Event and Flag setting Pin
big_col29-Nov-12 20:19
memberbig_col29-Nov-12 20:19 
AnswerRe: Mouse Down Event and Flag setting Pin
Alan N29-Nov-12 3:09
memberAlan N29-Nov-12 3:09 
Questionvb6 to .net Pin
dvdljns28-Nov-12 7:42
memberdvdljns28-Nov-12 7:42 
I find I need an old vb program on win7 but got out of doing stuff like this. Despite the fact that some ways of doing things was dropped in modern windows I am guessing there is a replacement. I know send keys was considered un reliable but the problem was finding what window was the focus. Chances are the window is called something else. A good example is the program I need this for when the window is open there is no title to be seen. all my research says that vb6 is an unreliable or troublesome install on win 7. I have the source for an old vb program and have been advised to find a net replacement. And was wondering how others handled the same problems. For instance the converter by microsoft. Does it work. And how much should I expect to be converted and how much should I expect to hand code.
here is what I am talking about.

<pre lang = "vb">
<pre>VERSION 5.00
Begin VB.Form Form1 
   Caption         =   "Form1"
   ClientHeight    =   1995
   ClientLeft      =   60
   ClientTop       =   345
   ClientWidth     =   4185
   LinkTopic       =   "Form1"
   ScaleHeight     =   1995
   ScaleWidth      =   4185
   StartUpPosition =   3  'Windows Default
   Begin VB.Timer Timer1 
      Left            =   540
      Top             =   930
   End
End
Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Option Explicit
 

Private Declare Function GetForegroundWindow Lib "user32" () As Long
Private Declare Function GetWindowText Lib "user32" Alias "GetWindowTextA" (ByVal hwnd As Long, ByVal lpString As String, ByVal cch As Long) As Long
 
Private Sub Form_Load()
    Timer1.Interval = 100
End Sub
    
Private Sub Timer1_Timer()
    Static lHwnd As Long
    Dim lCurHwnd As Long
    Dim sText As String * 255
    
    lCurHwnd = GetForegroundWindow
    If lCurHwnd = lHwnd Then Exit Sub
    lHwnd = lCurHwnd
    If lHwnd <> hwnd Then
        Caption = "ActiveWidow: " & Left$(sText, GetWindowText(lHwnd, ByVal sText, 255))
        Debug.Print Caption
    Else
        Caption = "ActiveWindow: Form1"
    End If
End Sub

Is there an easy way to do this on win 7?
AnswerRe: vb6 to .net Pin
Zaf Khan28-Nov-12 16:58
memberZaf Khan28-Nov-12 16:58 
GeneralRe: vb6 to .net Pin
dvdljns1-Dec-12 5:47
memberdvdljns1-Dec-12 5:47 
GeneralRe: vb6 to .net Pin
Zaf Khan1-Dec-12 8:00
memberZaf Khan1-Dec-12 8:00 
AnswerRe: vb6 to .net Pin
Dave Kreskowiak28-Nov-12 18:04
mvpDave Kreskowiak28-Nov-12 18:04 
QuestionDeleting a datarow, creating a query to find the row. - ANSWERED, Thank yo Pin
JRHibner27-Nov-12 23:30
memberJRHibner27-Nov-12 23:30 
AnswerRe: Deleting a datarow, creating a query to find the row. Pin
Andy_L_J28-Nov-12 22:30
memberAndy_L_J28-Nov-12 22:30 
GeneralRe: Deleting a datarow, creating a query to find the row. Pin
JRHibner1-Dec-12 7:21
memberJRHibner1-Dec-12 7:21 
GeneralRe: Deleting a datarow, creating a query to find the row. Pin
Andy_L_J1-Dec-12 20:27
memberAndy_L_J1-Dec-12 20:27 
GeneralRe: Deleting a datarow, creating a query to find the row. Pin
JRHibner9-Dec-12 14:55
memberJRHibner9-Dec-12 14:55 
QuestionModified Registry Key Pin
alirezamansoori27-Nov-12 18:52
memberalirezamansoori27-Nov-12 18:52 
AnswerRe: Modified Registry Key Pin
Richard MacCutchan28-Nov-12 0:02
mvpRichard MacCutchan28-Nov-12 0:02 
GeneralRe: Modified Registry Key Pin
alirezamansoori28-Nov-12 0:39
memberalirezamansoori28-Nov-12 0:39 
GeneralRe: Modified Registry Key Pin
Richard MacCutchan28-Nov-12 1:15
mvpRichard MacCutchan28-Nov-12 1:15 
QuestionLooking for idea for learning book Pin
NaZReD24-Nov-12 9:08
memberNaZReD24-Nov-12 9:08 
AnswerRe: Looking for idea for learning book Pin
Eddy Vluggen27-Nov-12 12:58
memberEddy Vluggen27-Nov-12 12:58 
QuestionInstall SQL Server on Another Computer without reach there Pin
Umesh Bachchani24-Nov-12 7:03
memberUmesh Bachchani24-Nov-12 7:03 
AnswerRe: Install SQL Server on Another Computer without reach there Pin
Eddy Vluggen27-Nov-12 12:59
memberEddy Vluggen27-Nov-12 12:59 

General General    News News    Suggestion Suggestion    Question Question    Bug Bug    Answer Answer    Joke Joke    Praise Praise    Rant Rant    Admin Admin   

Use Ctrl+Left/Right to switch messages, Ctrl+Up/Down to switch threads, Ctrl+Shift+Left/Right to switch pages.


Advertise | Privacy | Mobile
Web02 | 2.8.170422.1 | Last Updated 24 Apr 2017
Copyright © CodeProject, 1999-2017
All Rights Reserved. Terms of Service
Layout: fixed | fluid