www.mikrocontroller.net

Forum: PC-Programmierung VB2008 Anfängerhilfe bitte


Autor: Crossmas (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
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)

Autor: juppi (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
Wohin willst du das Bild Laden?

Autor: Crossmas (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
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

Autor: Schwaf (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
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;

Autor: Crossmas (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
ah, vielen dank :)

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

Autor: Severino R. (severino)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
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.

Autor: Crossmas (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
> 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 ^^

Autor: Severino R. (severino)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
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! ;-)

Autor: juppi (Gast)
Datum:

Bewertung
0 lesenswert
nicht lesenswert
'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

Antwort schreiben

Die Angabe einer E-Mail-Adresse ist freiwillig. Wenn Sie automatisch per E-Mail über Antworten auf Ihren Beitrag informiert werden möchten, melden Sie sich bitte an.

Wichtige Regeln - erst lesen, dann posten!

  • Groß- und Kleinschreibung verwenden
  • Längeren Sourcecode nicht im Text einfügen, sondern als Dateianhang

Formatierung (mehr Informationen...)

  • [c]C-Code[/c]
  • [avrasm]AVR-Assembler-Code[/avrasm]
  • [code]Code in anderen Sprachen, ASCII-Zeichnungen[/code]
  • [math]Formel in LaTeX-Syntax[/math]
  • [[Titel]] - Link zu Artikel
  • Verweis auf anderen Beitrag einfügen: Rechtsklick auf Beitragstitel,
    "Adresse kopieren", und in den Text einfügen




Bild automatisch verkleinern, falls nötig
Bitte das JPG-Format nur für Fotos und Scans verwenden!
Zeichnungen und Screenshots im PNG- oder
GIF-Format hochladen. Siehe Bildformate.
Hinweis: der ursprüngliche Beitrag ist mehr als 6 Monate alt.
Bitte hier nur auf die ursprüngliche Frage antworten,
für neue Fragen einen neuen Beitrag erstellen.

Mit dem Abschicken bestätigst du, die Nutzungsbedingungen anzuerkennen.