분류 전체보기202 richtexbox 단어찾고 자동 스크롤 Private Sub FindAndScroll(ByVal 검색단어 As String, ByVal 선택RichtextboxEX As RichTextBoxEx) Dim index As Integer = 0 Dim temp As String = 선택RichtextboxEX.Rtf 선택RichtextboxEX.Rtf = temp While index 2020. 1. 21. 특정문자 (') 치환법 begin tran update TB_M_ResponseGuide set 문의내용T = REPLACE(문의내용T, char(39), '"') where 문의내용T like '%'+char(39)+'%' commit 2019. 12. 13. Windows Update History 가져오기 사전에 Window - System32 기본 라이브러리 참조 필요 2019. 12. 9. 파일 사용여부 확인 로직(Class) Imports System.IO Public Class IsAccess Public Shared Function IsAccessAble(ByVal path As String) As Boolean Dim fs As FileStream = Nothing Try fs = New FileStream(path, FileMode.Open, FileAccess.ReadWrite, FileShare.None) Catch __unusedIOException1__ As IOException Return False Finally If fs IsNot Nothing Then fs.Close() End If End Try Return True End Function End Class 2019. 12. 9. 이전 1 ··· 13 14 15 16 17 18 19 ··· 51 다음