본문 바로가기

전체 글202

공백제거 방법들 replaceAll(" ","") trim() 으로 제거되지 않는 공백 제거(참고: http://www.yunsobi.com/blog/596) String str =originalString.replaceAll(" ", "");등으로 삭제되지 않는 공백문자를 제거 해 보자. 상기 코드로 삭제되지 않는 이유는.. cjk 문자셋에서 나타나는 IDEOGRAPHIC SPACE 라 불리는 유니코드 \u3000 , HTML 표현으로는 문자로 폰트 지원이 없으면 눈에 보이지 않는(display 되지 않는) 코드로만 존재하는 공백이기 때문.http://www.fileformat.info/info/unicode/char/3000/index.htm(새 창으로 열기) 이럴 경우 다음과 같은 정규식을 통해 제거가 가능. 모든.. 2018. 3. 16.
Sendkey 이용방법 SendKeys.Send("{TAB}" + "{TAB}" + "{TAB}" + "{TAB}" + "{TAB}" + "{TAB}" + "{TAB}" + "{TAB}" + "{TAB}" + "{ENTER}") 2018. 3. 16.
Delay 함수 Public Sub Delay(ByVal Second As Integer) Dim _startsecond As Integer _startsecond = Environment.TickCount While (True) If (Environment.TickCount - _startsecond >= Second * 1000) Then Exit While End If Application.DoEvents() End While End Sub 출처: http://noljago.tistory.com/44 [놀자고 블로그] 2018. 3. 16.
Navigate 기능을 이용한 검색기능 만들기 Private Sub Button5_Click(sender As Object, e As EventArgs) Handles Button5.Click Dim 인코딩 As String 인코딩 = Uri.EscapeDataString(TextBox2.Text) '인코딩 If TextBox2.Text "" Then WebBrowser1.Navigate("http://post.naver.com/search/authorPost.nhn?keyword=" + 인코딩 + "&memberNo=32011753") WebBrowser1.ScriptErrorsSuppressed = True TextBox2.Clear() Else MsgBox("검색어를 다시 입력해주십시오", MsgBoxStyle.Critical) TextBox2.. 2018. 3. 16.