Hallo leute ,könnt ihr mir bitte sagen wie man das macht,
ICh möchte Wenn ich auf Button 1 drücke dann möchte ich das das Bild aus der Picturebox uplgeloadet wird .
Hab schon visual basic ca. 3 monate nicht mehr gemacht , habs bisschen verlernt.
Also das ist mein Code , Was ist falsch dran .
Code:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim web As New Net.WebClient
web.Credentials = New Net.NetworkCredential("benutz", "pass")
web.UploadFile("Adresse zum Verzeichniss", PictureBox1.Image)-->Picturebox1 geht nciht udn
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim openbitmap As New OpenFileDialog
If openbitmap.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim openbit As New Bitmap(openbitmap.FileName)
Dim bit As New Bitmap(openbit, Me.Width, Me.Height)
PictureBox1.Image = bit
End If
End Sub
End Class
ICh möchte Wenn ich auf Button 1 drücke dann möchte ich das das Bild aus der Picturebox uplgeloadet wird .
Hab schon visual basic ca. 3 monate nicht mehr gemacht , habs bisschen verlernt.
Also das ist mein Code , Was ist falsch dran .
Code:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Dim web As New Net.WebClient
web.Credentials = New Net.NetworkCredential("benutz", "pass")
web.UploadFile("Adresse zum Verzeichniss", PictureBox1.Image)-->Picturebox1 geht nciht udn
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
Dim openbitmap As New OpenFileDialog
If openbitmap.ShowDialog = Windows.Forms.DialogResult.OK Then
Dim openbit As New Bitmap(openbitmap.FileName)
Dim bit As New Bitmap(openbit, Me.Width, Me.Height)
PictureBox1.Image = bit
End If
End Sub
End Class