객

Public Class Form1 ''' 작성일자 : 2008. 07. 28 ''' 프로그램명 : 시계예제 프로그램 Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick Timer1.Interval = 1000 Timer1.Enabled = True TextBox1.Text = Now() TextBox2.Text = DateTime.Now TextBox3.Text = Format(DateTime.Now, "hh시 mm분 ss초") End Sub '===============================..

Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load If TextBox1.Text <> "" Then TextBox1.Text = "" Else TextBox1.Text = Format(Now, "yyyy년 MM월 dd일") TextBox2.Text = MonthCalendar1.TodayDate 'TextBox6.Text = Today 'TextBox6.Text = My.Computer.Clock.LocalTime 'TextBox6.Text = DateTime.Now 'TextBox6.Text = Format(Now, "hh.mm.ss.fff tt"..

Visual Basic 6.0 에서는 Unload Me end 하고 나면 종료가 되는데 .net에서는 unload 명령어를 지원하지 않습니다. 다음과 같이 작성을 하셔야 합니다. Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click Me.Close() End End Sub ----------------------------------------------------------------------------------..