Totalni sam pocetnik pokusavam da napravim nesto ali mi ne polazi za rukom.
Naime koristim Visual Studio 2008 i pravim aplikaciju u Windows forms
Imam dve forme
u prvoj imam textbox i 2 buuton
u drugoj imam Picturebox i 1 buuton
interesuje me sledece dali moze da kada u textbox upisem MIKA i kliknem na buuton otvori se forma2 i u picturebox otvori sliku mike
kada textbox upisem ZIKA i kliknem na buuton otvori se forma2 i u picturebox otvori sliku zike
Pocetak sam uradio ovako
Form1
Code:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = "MIKA" Then
Me.Hide()
Form2.Show()
ElseIf TextBox1.Text = "ZIKA" Then
Me.Hide()
Form2.Show()
ElseIf TextBox1.Text = "" Then
MsgBox("Greska")
End If
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
End
End Sub
End Class
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
If TextBox1.Text = "MIKA" Then
Me.Hide()
Form2.Show()
ElseIf TextBox1.Text = "ZIKA" Then
Me.Hide()
Form2.Show()
ElseIf TextBox1.Text = "" Then
MsgBox("Greska")
End If
End Sub
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
End
End Sub
End Class
U Form2 treba da napisem code
slocan ovom
Code:
Public Class Form2
Private Sub Form2_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Form1.TextBox1.Text = "MIKA" Then
Me.PictureBox1.Image = Image.FromFile("C:\Users\Dejan\Pictures\123\imges.jpeg")
ElseIf Form1.TextBox1.Text = "ZIKA" Then
Me.PictureBox1.Image = Image.FromFile("C:\Users\Dejan\Pictures\123\verlys.jpg")
End If
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
End
End Sub
End Class
Public Class Form2
Private Sub Form2_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
If Form1.TextBox1.Text = "MIKA" Then
Me.PictureBox1.Image = Image.FromFile("C:\Users\Dejan\Pictures\123\imges.jpeg")
ElseIf Form1.TextBox1.Text = "ZIKA" Then
Me.PictureBox1.Image = Image.FromFile("C:\Users\Dejan\Pictures\123\verlys.jpg")
End If
End Sub
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
End
End Sub
End Class
samo umesto C:\Users\Dejan\Pictures\123\verlys.jpg
da stavim da mi ubaci sliku sa neke lokacije iz koje mogu kada napravim setup i instaliram na drugi racunar ta putanja do slike nemora da se menja.
Nadam se da ste me razumeli sta mi treba
Dejan Ranisavljevic