Public Class Form1
Private mImages1 As ArrayList = New ArrayList()
Private mCount1 As Integer = 0
Private mImages2 As ArrayList = New ArrayList()
Private mCount2 As Integer = 0
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim i As IntegerFor i = 0 To 4mImages1.Add(Image.FromFile(
"C:\Users\AMAkal\Pictures\pic" & i & ".jpg"))PictureBox1.BackgroundImage =
CType(mImages1(0), Image)
NextDim x As IntegerFor x = 0 To 4mImages2.Add(Image.FromFile(
"C:\Users\AMAkal\Downloads\bb" & x & ".jpg"))PictureBox2.BackgroundImage =
CType(mImages1(0), Image)
NextEnd SubPrivate Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.TickTimer1.Interval = 1000
mCount1 = (mCount1 + 1)
Mod 5PictureBox1.BackgroundImage =
CType(mImages1(mCount1), Image)PictureBox1.BackgroundImageLayout = ImageLayout.Stretch
End SubPrivate Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickTimer1.Start()
End Sub
Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.TickTimer2.Interval = 1000
mCount2 = (mCount2 + 1)
Mod 5PictureBox2.BackgroundImage =
CType(mImages2(mCount2), Image)PictureBox2.BackgroundImageLayout = ImageLayout.Stretch
End SubPrivate Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.ClickTimer2.Start()
End SubPrivate Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Me.Close()
End SubPrivate Sub Show1ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Show1ToolStripMenuItem.ClickTimer1.Start()
End SubPrivate Sub Show2ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Show2ToolStripMenuItem.ClickTimer2.Start()
End SubPrivate Sub EXITToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EXITToolStripMenuItem.Click
Me.Close()
End SubEnd
Class
hello NERIS' / WARRIORS *
welcome to my YEH page*_* enjoy ~~ know more about YEH and more photos of YEH ^^* follow us on twitter @yooneunhyeclub. YEH's twitter is @1003Grace
Wednesday, February 27, 2013
mid mp2
Public Class Form1
Private mImages1 As ArrayList = New ArrayList()
Private mCount1 As Integer = 0
Private mImages2 As ArrayList = New ArrayList()
Private mCount2 As Integer = 0
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim i As IntegerFor i = 0 To 4mImages1.Add(Image.FromFile(
"C:\Users\AMAkal\Pictures\pic" & i & ".jpg"))PictureBox1.BackgroundImage =
CType(mImages1(0), Image)
NextDim x As IntegerFor x = 0 To 4mImages2.Add(Image.FromFile(
"C:\Users\AMAkal\Downloads\bb" & x & ".jpg"))PictureBox2.BackgroundImage =
CType(mImages1(0), Image)
NextEnd SubPrivate Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.TickTimer1.Interval = 1000
mCount1 = (mCount1 + 1)
Mod 5PictureBox1.BackgroundImage =
CType(mImages1(mCount1), Image)PictureBox1.BackgroundImageLayout = ImageLayout.Stretch
End SubPrivate Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickTimer1.Start()
End Sub
Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.TickTimer2.Interval = 1000
mCount2 = (mCount2 + 1)
Mod 5PictureBox2.BackgroundImage =
CType(mImages2(mCount2), Image)PictureBox2.BackgroundImageLayout = ImageLayout.Stretch
End SubPrivate Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.ClickTimer2.Start()
End SubPrivate Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Me.Close()
End SubPrivate Sub Show1ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Show1ToolStripMenuItem.ClickTimer1.Start()
End SubPrivate Sub Show2ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Show2ToolStripMenuItem.ClickTimer2.Start()
End SubPrivate Sub EXITToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EXITToolStripMenuItem.Click
Me.Close()
End SubEnd
Class
Private mImages1 As ArrayList = New ArrayList()
Private mCount1 As Integer = 0
Private mImages2 As ArrayList = New ArrayList()
Private mCount2 As Integer = 0
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim i As IntegerFor i = 0 To 4mImages1.Add(Image.FromFile(
"C:\Users\AMAkal\Pictures\pic" & i & ".jpg"))PictureBox1.BackgroundImage =
CType(mImages1(0), Image)
NextDim x As IntegerFor x = 0 To 4mImages2.Add(Image.FromFile(
"C:\Users\AMAkal\Downloads\bb" & x & ".jpg"))PictureBox2.BackgroundImage =
CType(mImages1(0), Image)
NextEnd SubPrivate Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.TickTimer1.Interval = 1000
mCount1 = (mCount1 + 1)
Mod 5PictureBox1.BackgroundImage =
CType(mImages1(mCount1), Image)PictureBox1.BackgroundImageLayout = ImageLayout.Stretch
End SubPrivate Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickTimer1.Start()
End Sub
Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.TickTimer2.Interval = 1000
mCount2 = (mCount2 + 1)
Mod 5PictureBox2.BackgroundImage =
CType(mImages2(mCount2), Image)PictureBox2.BackgroundImageLayout = ImageLayout.Stretch
End SubPrivate Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.ClickTimer2.Start()
End SubPrivate Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Me.Close()
End SubPrivate Sub Show1ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Show1ToolStripMenuItem.ClickTimer1.Start()
End SubPrivate Sub Show2ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Show2ToolStripMenuItem.ClickTimer2.Start()
End SubPrivate Sub EXITToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EXITToolStripMenuItem.Click
Me.Close()
End SubEnd
Class
mid mp2
Public Class Form1
Private mImages1 As ArrayList = New ArrayList()
Private mCount1 As Integer = 0
Private mImages2 As ArrayList = New ArrayList()
Private mCount2 As Integer = 0
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim i As IntegerFor i = 0 To 4mImages1.Add(Image.FromFile(
"C:\Users\AMAkal\Pictures\pic" & i & ".jpg"))PictureBox1.BackgroundImage =
CType(mImages1(0), Image)
NextDim x As IntegerFor x = 0 To 4mImages2.Add(Image.FromFile(
"C:\Users\AMAkal\Downloads\bb" & x & ".jpg"))PictureBox2.BackgroundImage =
CType(mImages1(0), Image)
NextEnd SubPrivate Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.TickTimer1.Interval = 1000
mCount1 = (mCount1 + 1)
Mod 5PictureBox1.BackgroundImage =
CType(mImages1(mCount1), Image)PictureBox1.BackgroundImageLayout = ImageLayout.Stretch
End SubPrivate Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickTimer1.Start()
End Sub
Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.TickTimer2.Interval = 1000
mCount2 = (mCount2 + 1)
Mod 5PictureBox2.BackgroundImage =
CType(mImages2(mCount2), Image)PictureBox2.BackgroundImageLayout = ImageLayout.Stretch
End SubPrivate Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.ClickTimer2.Start()
End SubPrivate Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Me.Close()
End SubPrivate Sub Show1ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Show1ToolStripMenuItem.ClickTimer1.Start()
End SubPrivate Sub Show2ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Show2ToolStripMenuItem.ClickTimer2.Start()
End SubPrivate Sub EXITToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EXITToolStripMenuItem.Click
Me.Close()
End SubEnd
Class
Private mImages1 As ArrayList = New ArrayList()
Private mCount1 As Integer = 0
Private mImages2 As ArrayList = New ArrayList()
Private mCount2 As Integer = 0
Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
Dim i As IntegerFor i = 0 To 4mImages1.Add(Image.FromFile(
"C:\Users\AMAkal\Pictures\pic" & i & ".jpg"))PictureBox1.BackgroundImage =
CType(mImages1(0), Image)
NextDim x As IntegerFor x = 0 To 4mImages2.Add(Image.FromFile(
"C:\Users\AMAkal\Downloads\bb" & x & ".jpg"))PictureBox2.BackgroundImage =
CType(mImages1(0), Image)
NextEnd SubPrivate Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.TickTimer1.Interval = 1000
mCount1 = (mCount1 + 1)
Mod 5PictureBox1.BackgroundImage =
CType(mImages1(mCount1), Image)PictureBox1.BackgroundImageLayout = ImageLayout.Stretch
End SubPrivate Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.ClickTimer1.Start()
End Sub
Private Sub Timer2_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer2.TickTimer2.Interval = 1000
mCount2 = (mCount2 + 1)
Mod 5PictureBox2.BackgroundImage =
CType(mImages2(mCount2), Image)PictureBox2.BackgroundImageLayout = ImageLayout.Stretch
End SubPrivate Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.ClickTimer2.Start()
End SubPrivate Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
Me.Close()
End SubPrivate Sub Show1ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Show1ToolStripMenuItem.ClickTimer1.Start()
End SubPrivate Sub Show2ToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Show2ToolStripMenuItem.ClickTimer2.Start()
End SubPrivate Sub EXITToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles EXITToolStripMenuItem.Click
Me.Close()
End SubEnd
Class
Friday, February 22, 2013
Yoon Eun Hye at "ROUGE & LOUNGE" launching event [FEB.21,2013]
VIDEOS
http://www.youtube.com/watch?feature=player_embedded&v=yN6IXRKyc68
credits pictures as tagged.
VIDEO: TVDAILY & frenchNeri
Thursday, February 21, 2013
Yoon Eun Hye in " HIGH CUT" mag Vol. 96 ~
In an interview, Yoon talked about things that she wants to have in 2013, her thoughts about the film Miracle in Cell No.7, and girl group members she likes.
Regarding the wish list for 2013, she said, “I want to have my own
workroom and boyfriend. I’ve always wanted to have a boyfriend, but it’s
not that I can have it whenever I want to.”
Regarding the film Miracle in Cell No.7, she said, “I fell
in love with the child actor who plays the role of Ye Seung. My managers
were with me when I watched it, and they both were crying without
making sounds.”
Choosing Sistar as her favorite girl group, she said, “They are
really talented. Sistar 19 are also good. The four members are good
together, and the two members are good as well. They don’t make music
fans feel bored.”
She shot these pictures in Hawaii ^_^
credit (article) : http://en.korea.com/blog/enter/tv/yoon-eun-hye-shows-off-a-provocative-look-in-a-pictorial/
pictures source: High Cut twitter
Tuesday, February 19, 2013
Yoon Eun Hye for " W Korea " Magazine March 2013 issue
click here ~> http://blog.rougenlounge.com/
SOURCE : MORE " ROUGE AND LOUNGE" bags here + YEH's accessory in that pictures ~~ > http://blog.rougenlounge.com/
Yoon Eun Hye is endorsing ' Rouge and Lounge ' bags ^________^
 | |
| COVER ^_^ |
SOURCE : MORE " ROUGE AND LOUNGE" bags here + YEH's accessory in that pictures ~~ > http://blog.rougenlounge.com/
Sunday, February 3, 2013
Subscribe to:
Posts (Atom)