Visual Basic

S Douglas wrote:

Now how on earth is he suppose to RTFM if he can't read & understand "Do not post programming questions (use the programming forums for that) and please don't post ads."

Jörgen Sigvardsson wrote:

The education starts with RTFR! (RTF Replies )

Apurva Kaushal wrote:

He must have got educated

Jörgen Sigvardsson wrote:

RTF Replies

smarr wrote:

I was expecting this to display to the console when the program is run from a console

smarr wrote:

I'm pretty sure that my vb task should be able to respond to the parent shell window

smarr wrote:

I'm trying to get my app to print text to the shell from which it was called. In C, the closest thing would be a printf().

Declare Auto Function AllocConsole Lib "kernel32" () As IntPtr
    .
    .
    .
AllocConsole()
Console.WriteLine("This is a test...")

Imports System
Imports System.Windows.Forms
 
Module Module1
    Sub Main()
        Dim myForm As New Form1
        Console.WriteLine("Application startup...")
 
        ' Application.Run is a blocking call...
        System.Windows.Forms.Application.Run(myForm)
 
        ' so, this statement won't execute until the form is closed.
        Console.WriteLine(myForm.ReturnValue)
    End Sub
End Module
 
Public Class Form1
    Inherits Form
 
    Shared Sub Main()
    End Sub
 
    Private _returnValue As String
 
    Public ReadOnly Property ReturnValue() As String
        Get
            Return _returnValue
        End Get
    End Property
 
    Private Sub Form1_FormClosed(ByVal sender As Object, ByVal e As System.Windows.Forms.FormClosedEventArgs) Handles Me.FormClosed
        Console.WriteLine("You can write from the console from inside your form.")
        _returnValue = "This is the return value stored in the form..."
    End Sub
End Class