​ ① 도형을 그린다. ② 그려진 도형을 비트맵 형식으로 변수에 저장 한다. ③ 도형을 어디든 사용한다. ※ Bitmap형식을 PictureBox에 넣어도 되고, Form에 직접 뿌려도 되고 , 사용하는 건 개인 마음이니까. ① 도형 을 그린다. 버튼을 하나 만들고 버튼 클릭 시 그림이 그려지도록 할려고 합니다. 임시로 사용할 PictureBox를 만들고, PictureBox를 Control에 붙입니다. Private Sub Button1_Click_1(sender As Object, e As EventArgs) Handles Button1.Click Dim picbox As PictureBox = New PictureBox with picbox .Name = "etc" .Location = New Po..

철저히 메모용 ! 간단하게 뽑아서 쓰기 좋기 위해 만듬. ​ Public Sub PasteToListbox(sender As Object, e As KeyEventArgs) Handles lstUp.KeyDown _dt = New DataTable lstUp.Items.Clear() '// Control 키 + v 키 눌렀을 때 If (e.Control = True And e.KeyCode = Keys.V) Then '// 클립보드 얻어와서 Datatable에 담음 (clipboard_to_datatable로 별도로 만듬) _dt = clp.Clipboard_to_DataTable(Forms.Clipboard.GetText()) If (_dt.Rows.Count > 0) Then For Each dr A..

​ 임시 테이블 구성 C# Code public Form1() { InitializeComponent(); DataTable dt_temp = new DataTable(); dt_temp.Columns.Add("ID"); dt_temp.Columns.Add("일자"); dt_temp.Columns.Add("동"); dt_temp.Columns.Add("호"); dt_temp.Rows.Add(1, "2020-04-13", "2101", "101"); dt_temp.Rows.Add(2, "2020-05-20", "2101", "1301"); dt_temp.Rows.Add(3, "2020-04-13", "2101", "1302"); dt_temp.Rows.Add(4, "2020-05-22", "2101", "..

DataBinding 안되어있는 DataGridView를 DataTable로 변환 하는 코드 ''' ''' DataGridView To DataTable ''' ''' 변환 할 DataGridView를 넣는다. ''' Private Function DataGridViewToDataTable(ByRef dgv As DataGridView) As DataTable Dim _dt As DataTable = New DataTable If _dt.Columns.Count = 0 Then For Each dgdr As DataGridViewColumn In dgv.Columns _dt.Columns.Add(dgdr.HeaderText) Next End If For Each row As DataGridViewRow ..

DataBinding 없이 DataTable을 DataGridView로 넣는 코드 자주 쓰지는 않지만 Binding 없이 사용해야 할 경우 있기 때문에 저장! Private Function DataTableToDataGridView(ByVal dt As DataTable, ByVal dgv As DataGridView) As DataGridView Dim _dgv As DataGridView = dgv For Each col As DataColumn In dt.Columns Dim c As DataGridViewTextBoxColumn = New DataGridViewTextBoxColumn() With { .HeaderText = col.ColumnName } dgv.Columns.Add(c) Next..

코딩을 하다보면 어떤 TextBox에 특정 문자나 숫자나, 실수만 입력을 받아야만 하는 경우가 있습니다. 이럴 때 미리 Textbox에서 Event 처리를하여 입력 못하게 하는 방법을 공유 합니다. ① 실수만 입력 받을 때 '실수만 입력받기 If Not (Char.IsDigit(e.KeyChar) Or e.KeyChar = Convert.ToChar(Keys.Back) Or e.KeyChar = ".") Then e.Handled = True End If ② 정수만 입력 받을 때 '정수만 입력받기 If Not (Char.IsDigit(e.KeyChar) Or e.KeyChar = Convert.ToChar(Keys.Back)) Then e.Handled = True End If ※ 부가 설명 i) IsD..