Discussion :

[sofiane80]

Bonjour tout le monde

je suis en phase d'apprentissage du langage VB6 et je veux savoir est ce que il y a une possibilité d'écrire des programmes simples et les tester sans par des Interfaces graphiques (IHM). au trement dit, je veux écrire du code VB indépendant du objet visuel du VB6 (Mode console)

Merci D'avance

[Pol63]

certes, mais pourquoi ne poses tu pas la question dans le forum dédié à vb6 ?

et au passage, pourquoi commencer à apprendre un langage qui a 15 ans et qui n'a plus d'avenir (et de moins en moins de présent)

[sofiane80]

en fait je vais bientôt travailler sur un projet utilisant un langage de script très proche du vb. voila pourquoi je veux l'apprendre.

pourriez vous maintenant me répondre ?

[Pol63]

langage de script très proche du vb

lequel ?

[sofiane80]

c'est un longage utilisé pour définir des traitement avce HR Access.
je pense que ce n'est pas important de le cité parce que moi je veux apprendre VB (VB6 ou VB .Net). bref c'est le langage qui m'interesse voila.

et comme je l'ai fait toujours en apprenant à programmer (avec n'importe quel langage) j'écrit des petits programme pour le bien comprendre.

maintenant je reitère ma question/ est ce que il ya possibilité d'ecrire des programme simple VB n'utilisants pas des IHM pour fair quelque exo?

[DarkVader]

Bonjour,

Bonjour tout le monde

je suis en phase d'apprentissage du langage VB6 et je veux savoir est ce que il y a une possibilité d'écrire des programmes simples et les tester sans par des Interfaces graphiques (IHM). au trement dit, je veux écrire du code VB indépendant du objet visuel du VB6 (Mode console)

Merci D'avance

Ta question manque de clarté :
Ecrire un programme console (sans IHM) en VB6 est une chose
écrire du code et le tester sans l'Ide, (avec VBS par exemple) c'est autre chose.

Dans le 1er cas, c'est principalement lié au paramétrage de compilation «Mode d'exécution autonome»,
dans le second, il suffit d'utiliser Notepad en respectant les standard VBScript et d'affecter une extension vbs au fichier.

[sofiane80]

ok d'accord.

je reformule ma qestion:

Comment faire un "Hello word" sur une console avec VB?

si c'est du paramètrage alors comment ?

Merci

[DarkVader]

ok d'accord.

je reformule ma qestion:

Comment faire un "Hello word" sur une console avec VB?

si c'est du paramètrage alors comment ?

Merci

Tu eusses dit en VBS, j'eusse répondu

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
WScript.Echo "Hello word"
'Msgbox"OK",vbinformation,"Une pause pour visualiser l'affichage"

mais avec VB, dans la console

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
Private Const STD_OUTPUT_HANDLE = -11&
Private Const INVALID_HANDLE_VALUE = -1&
Private Declare Function AllocConsole Lib "kernel32" () As Long
Private Declare Function FreeConsole Lib "kernel32" () As Long
Private Declare Function CloseHandle Lib "kernel32" (ByVal hObject As Long) As Long
Private Declare Function GetStdHandle Lib "kernel32" (ByVal nStdHandle As Long) As Long
Private Declare Function WriteConsole Lib "kernel32" Alias "WriteConsoleA" (ByVal hConsoleOutput As Long, lpBuffer As Any, ByVal nNumberOfCharsToWrite As Long, lpNumberOfCharsWritten As Long, lpReserved As Any) As Long
 
Private hConsoleOut As Long
 
Sub ConsoleWrite()
     Dim lW As Long, sWrite As String
 
    If AllocConsole() Then
        hConsoleOut = GetStdHandle(STD_OUTPUT_HANDLE)
        If hConsoleOut = INVALID_HANDLE_VALUE Then MsgBox "Unable to get STDOUT"
 
        sWrite = "Hello World " + vbCrLf
        WriteConsole hConsoleOut, ByVal sWrite, Len(sWrite), lW, ByVal 0&
    End If
End Sub
Sub Quit()
    CloseHandle hConsoleOut
    FreeConsole
End Sub

[sofiane80]

merci beaucoup