30 lines
		
	
	
		
			690 B
		
	
	
	
		
			VB.net
		
	
	
	
	
	
			
		
		
	
	
			30 lines
		
	
	
		
			690 B
		
	
	
	
		
			VB.net
		
	
	
	
	
	
| Public Class Frm_v20091231_ResultMax
 | |
| 
 | |
| #Region "data Base 변경여부및 적용방법"
 | |
| 
 | |
|    '''변경된내용을적용한다.
 | |
|     Public Overrides Function AcceptChanged() As Boolean
 | |
| 
 | |
|         Return True
 | |
|     End Function
 | |
| 
 | |
|     '''변경된내용이있다면 취소한다.
 | |
|     Public Overrides Function RejectChanged() As Boolean
 | |
| 
 | |
|         Return True
 | |
|     End Function
 | |
| 
 | |
|     '''데이터에변형이있었는가?
 | |
|     Public Overrides Function HasChanged() As Boolean
 | |
|         Return False
 | |
|     End Function
 | |
| 
 | |
| 
 | |
| 
 | |
| #End Region
 | |
| 
 | |
| 
 | |
|     Private Sub Frm_v20091231_Result_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
 | |
|         Me.bsㅡ.DataSource = DSETR1
 | |
|     End Sub
 | |
| End Class | 
