김윤호닷컴

회차지정 http://www.dhlottery.co.kr/common.do?method=getLottoNumber&drwNo=596 [출처] 로또 당첨 번호 api|작성자 달쿠

For Each ele as HtmlElement In Webbrowser1.document.All If ele.GetAttribute("src").ToLower = "/images/site/click_button_go.jpg".ToLower Then Ele.InvokeMember("click") End If Next

Delegate Sub InvokeDelegate() Private Sub Invoke_Click(sender As Object, e As EventArgs) myTextBox.BeginInvoke(New InvokeDelegate(AddressOf InvokeMethod)) End Sub 'Invoke_Click Public Sub InvokeMethod() myTextBox.Text = "Executed the given delegate" End Sub 'InvokeMethod 'http://msdn.microsoft.com/ko-kr/library/0b1bf3y3(v=vs.110).aspx

Dim conn As String = "Provider=Microsoft.ACE.OLEDB.12.0;Data Source=database1.accdb" Dim cmd As String = "Select * from Table1" Dim adapter As New OleDbDataAdapter(cmd, conn) Dim topics As New DataSet adapter.Fill(topics) DataGridView1.DataSource = topics.Tables(0)

Dim ob = New Net.CookieContainer With ob ob.Add(New Uri("http://daum.net/"), New Net.Cookie("SSIONID", "Value")) End With

참고 사이트 http://dobon.net/vb/dotnet/internet/tcpclientserver.html http://ameblo.jp/tasoh/entry-10274850055.html 먼저 서버 using System; using System.Collections.Generic; using System.Linq; using System.Text; using System.Net; using System.Net.Sockets; using System.IO; namespace ConsoleApplication4_TCPServer { class Program { static void Main(string[] args) { Consol..

Dim ps() As System.Diagnostics.Process = System.Diagnostics.Process.GetProcesses() Dim p As System.Diagnostics.Process For Each p In ps Console.WriteLine(p.ProcessName) '<---- 프로세스 출력 Next

Form 및 Control 클래스는 응용 프로그램 시작 및 종료와 관련된 이벤트 집합을 노출합니다. Windows Forms 응용 프로그램을 시작할 때 기본 폼의 시작 이벤트가 다음 순서로 발생합니다. Control.HandleCreated Control.BindingContextChanged Form.Load Control.VisibleChanged Form.Activated Form.Shown 응용 프로그램이 닫히..

뭔가 스레드 작업할때마다 델리게이트 만들고 하는 것이 귀찮아서 함수 몇개 만들어 모듈로 추가해서 사용합니다. 간단한 델리게이트를 이용한 함수입니다. 첨부파일을 프로젝트에 모듈로 추가하시면 됩니다. 간단한 내용이니 추가적인 콤포넌트들은 직접수정해 사용하시면 될것 같습..

Imports System.Runtime.InteropServices Public Class Form1 <DllImport("winmm.dll")> _ Private Shared Function mciSendString(ByVal command As String, ByVal buffer As String, ByVal bufferSize As Integer, ByVal hwndCallback As IntPtr) As Integer End Function '녹음 Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click mciSendString("open new Type..