본문 바로가기

분류 전체보기203

컴퓨터 이름 확인하는 함수 및 Environ 사용 방법 Public Function getMachineName() As String Dim reVal As String reVal = Environ$("computername") getMachineName = reValEnd Function '현재 컴퓨터의 로그인 사용자를 반환한다.g_UserName = Environ("USERNAME") '현재 컴퓨터의 OS 를 반환하다.g_OS = Environ("OS") envstring반환값ALLUSERSPROFILEC:\ProgramDataAPPDATAC:\Users\home\AppData\RoamingAPR_ICONV_PATHC:\AutoSet9\Server\bin\iconv\CARBON_MEM_DISABLE1CommonProgramFilesC:\Program Fil.. 2018. 4. 17.
롤링 ListBox Private Sub 롤링실행버튼_Click(sender As Object, e As EventArgs) Handles 롤링실행버튼.Click CheckForIllegalCrossThreadCalls = False '쓰레드 오류 무시(정상적으로 사용하려면 delegate와 Invoke 사용 필요) Me.BackgroundWorker1.RunWorkerAsync() End Sub Public Sub Delay(ByVal Second As Integer) Dim _startsecond As Integer _startsecond = Environment.TickCount While (True) If (Environment.TickCount - _startsecond >= Second * 1000) Then E.. 2018. 4. 16.
Windows Search Index 참고 system.search.entryIDhttps://msdn.microsoft.com/en-us/library/windows/desktop/bb760166(v=vs.85).aspx system.search.UrlToIndexhttps://msdn.microsoft.com/en-us/library/windows/desktop/bb760177(v=vs.85).aspx Windwos Search 개요(MSDN)https://msdn.microsoft.com/en-us/library/windows/desktop/aa965362(v=vs.85).aspx 파일 및 디렉토리 열거https://msdn.microsoft.com/en-us/library/dd997370(v=vs.100).aspx system.data.o.. 2018. 4. 12.
숫자 올림, 반올림, 버림 2018. 4. 11.