VB2008 Anfängerhilfe bitte

[Crossmas (Gast)]

hallo zusammen

habe vor kurzen mit Visual Basic 2008 begonnen
habe auch ein ganz gutes tutorial, nur das problem ist, dass das 
tutorial eig für visual basic 6 ist und deswegen bei mir einige befehle 
nicht übereinstimmen
habe schon nach einem für 2008 gesucht, aber leider keins gefunden

naja, meine frage ist recht simpel (für anfänger eben :P)

ich möchte in mein programm über eine textbox einen dateipfad angeben 
und damit über einen button ein bild in das programm laden können

welchen befehl benötige ich genau dafür?

Anmerkung:
in vb6 lautet der befehl laut tutorial: LoadPicture(Pfad.Text)

[juppi (Gast)]

Wohin willst du das Bild Laden?

[Crossmas (Gast)]

es soll mir einfach nur in einem fenster angezeigt werden

also ungefär so:
als erstes kommt die textbox in der man den pfad eingibt
dann kommt ein button, der das bild in das Programm lädt
und dann soll das bild angezeigt werden
also so untereinander

der befehl mit dem laden des bildes muss dann im button drinstehn

[Schwaf (Gast)]

Hi,

nimm zum anzeigen eine PictureBox. Bei der musst du nur die Eigenschaft 
ImageLocation mit deinem Pfad füttern.

In etwa:

PictureBox1.ImageLocation = TextBox1.Text;

[Crossmas (Gast)]

ah, vielen dank :)

werds dann sofort ausprobieren, wenn ich zu hause bin ^^

[Severino R. (severino)]

Crossmas wrote:
> habe auch ein ganz gutes tutorial, nur das problem ist, dass das
> tutorial eig für visual basic 6 ist und deswegen bei mir einige befehle
> nicht übereinstimmen
einige ? VB 6 und VB.NET sind ziemlich verschieden!

> habe schon nach einem für 2008 gesucht, aber leider keins gefunden
Es gibt Dutzende! Hast Du keinen Buchhändler in der Nähe? Oder Amazon?
Notfalls such mal im Web nach Galileo Openbooks.
Notfalls eins für VB 2005, das ist immer noch sehr viel ähnlicher als VB 
6.

[Crossmas (Gast)]

> einige ? VB 6 und VB.NET sind ziemlich verschieden!
ja, ok. "einige" war vll ein bisschen untertrieben von mir

> Es gibt Dutzende! Hast Du keinen Buchhändler in der Nähe? Oder Amazon?
> Notfalls such mal im Web nach Galileo Openbooks.
> Notfalls eins für VB 2005, das ist immer noch sehr viel ähnlicher als VB
> 6.
Naja, als Anfänger habe ich zuerst keinen wirklichen Unterschied 
gesehen, erst als ich mit dem Programmieren angefangen hab.
Das Buch ist eig auch schon in Planung, nur obsiegt die Faulheit über 
den Gang in den Buchladen.

Naja, trotzdem mal danke für den Tipp mit dem Openbook :)

Hoffe, dass ich bald mit anspruchsvolleren Fragen wieder hier bin ^^

[Severino R. (severino)]

Crossmas wrote:

> Das Buch ist eig auch schon in Planung, nur obsiegt die Faulheit über
> den Gang in den Buchladen.
Gut begonnen ist halb gewonnen.

> Naja, trotzdem mal danke für den Tipp mit dem Openbook :)
Bitte.

> Hoffe, dass ich bald mit anspruchsvolleren Fragen wieder hier bin ^^
Bloss nicht! ;-)

[juppi (Gast)]

'Button und Textbox mit Designer

Public Class Form1
    Dim Pfad As String

    Private Sub Form1_Load(ByVal sender As Object, ByVal e As 
System.EventArgs) Handles Me.Load
        Me.FormBorderStyle = Windows.Forms.FormBorderStyle.FixedSingle
        Me.FormBorderStyle = Windows.Forms.FormBorderStyle.Sizable
        ' Me.BackgroundImageLayout = ImageLayout.None

        Me.BackgroundImageLayout = ImageLayout.Stretch
        TextBox1.Anchor = AnchorStyles.Left
        TextBox1.Anchor = AnchorStyles.Bottom
        Button1.Anchor = AnchorStyles.Left
        Button1.Anchor = AnchorStyles.Bottom
        Me.Text = "Vollständigen Pfad eingeben  Z.B  'C:\Test\test.bmp' 
"
    End Sub


    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As 
System.EventArgs) Handles Button1.Click
        ' Me.BackgroundImage = Image.FromFile("Modell01\" & 
"bild\n_bahn1x" & ".bmp")
        Pfad = TextBox1.Text
        TestLaden()
    End Sub
    Private Sub TestLaden()
        If My.Computer.FileSystem.FileExists(Pfad) Then
            Me.BackgroundImage = Image.FromFile(Pfad)
            Button1.Text = Pfad
        Else
            Button1.Text = Pfad & " nicht gefunden"
        End If

    End Sub

End Class