Nuget 패키지 관리자에서 Universal Window Platform 다운그레이드 혹은 업그레이드 하시면 됩니다.

그러면 재설치되면서 Nuget에 있는 Refernce 재설정 됩니다.

큰 변화를 주지 않기 위해, 영향이 없는 정도에서만 올렸다 내리세요.

상당히 재설치 과정이 오래걸립니다.

Use a SQLite database in a UWP app - UWP app developer _ Microsoft Docs.pdf

SDK 버전 맞추는 거 유의하세요.

' 전역변수 선언은 이렇게 밖에다 할 수 있다.

' Global keyword는 vb6에서는 사용되지 않는다.

Public LogName As String

Private Sub AddItem_Init(key As String, value As String)

    Dim category As String

    Dim message As String

    LogName = "practice.ini"

    category = "General"

    message = "[key]:{key}   [value]:{value}"

    message = Replace(message, "{key}", key)

    message = Replace(message, "{value}", value)

    Call fn_WritePrivateProfileString(LogName, category, key, value)

    Call sb_SaveLog(App.EXEName, message)

End Sub

출처: https://support.microsoft.com/ko-kr/help/837910/mouse-wheel-events-do-not-work-in-the-visual-basic-6-0-ide

간단히 dll 등록 후 사용할 경우, 아래 zip 파일을 이용한다.

VBA Mouse Wheel Fix.zip

컴파일 해서 쓰려면 아래 실행파일을 사용한다.

vb6mousewheel.exe

변수

변수란 값을 담아두는 것이라고 모두 알고 있으실 겁니다.

우선 간단하게 변수를 생성하고 설정하는 방법을 알아보겠습니다.

--변수 생성
--declare 변수명 타입
DECLARE @name varchar(20)

--변수에 값 할당
SET @name = 'Kendrick'

--혹은
--userid가 sonim1일 때 이름이 Kendrick일 경우  
SELECT @name = P.name FROM tblPerson P WHERE userid = 'sonim1'

SET을 하던 SELECT를 하던 동일한 값이 @name 변수에 할당되는 쿼리입니다.

아래는 @name 변수를 이용해서 이어서 해당 user의 가입일을 알아보겠습니다.

SELECT CreateDate -- 생성일 필드
FROM  tblPerson P
WHERE P.name = @name

이정도면 변수의 사용법은 충분히 이해되실것 입니다.

테이블 변수

이제 알아볼 항목은 테이블 변수입니다.
변수에서는 값뿐이 아니라 여러행으로 떨어지는 결과를 담아 둘 수 있습니다.

예를 보 시죠

--테이블 변수 생성, 자료형 대신에 테이블 스키마가 들어가 있다.
DECLARE @userData TABLE(
     name varchar(30) NOT NULL,
     CreateDate datetime NOT NULL
);

--Insert Into Select 문을 이용하여 k로 시작하는 회원의 리스트를 할당해보자
INSERT INTO @userData
SELECT name, CreateDate 
FROM tblPerson
WHERE name like 'k%'

--할당 후에는 변수를 이용하여 테이블처럼 사용가능하다.
SELECT * FROM @userData

변수와 테이블 변수에 대해서 간단하게 알아보았습니다.
테이블 변수를 이용하여 쿼리의 복잡성을 떨어트릴수 있으며, 속도 개선에 많은 도움이 될 것입니다.

테이블 변수와 임시 테이블의 차이점

마치며

잘못 사용하면 성능상 문제가 있겠지만 잘 사용하면 너무나 유용한 기능입니다. 물론 말은 쉽습니다. 하하
사실 잘못 사용하기가 더 어려운 기능이겠네요. !!
좋은 하루 되세요

테이블 변수 임시 테이블 차이점 표 출처 : RunHanii 블로그

VB6 문법 모음 페이지

# Call Statement

https://docs.microsoft.com/en-us/dotnet/visual-basic/language-reference/statements/call-statement

# Error Statement

https://docs.microsoft.com/en-us/dotnet/visual-basic/language-reference/statements/error-statement

# DO...Loop Statement

https://docs.microsoft.com/en-us/dotnet/visual-basic/language-reference/statements/do-loop-statement

# Exit Statement

https://docs.microsoft.com/en-us/dotnet/visual-basic/language-reference/statements/exit-statement

프로젝트 탭의 참조, 구성요소를 이용하면 된다.

1. DLL을 등록하는 방법

2. OCX 등록하는 방법

vb6 What is Me.Caption

Hi, starting out in vb and working through some exercises and am confronted with a line of code

OldCaption = Me.Caption

The question is what is Me."xxxxxxxxx" and what applications can it be used for.

Many thanks in advance...Andy

--------------------------------------------------------------------------------------------------------------------------------

What is Me?

Me is the form itself. It is just a shorthand of using the form name. So Me.Caption and Formname.Caption is the same.

  OldCaption = Me.Caption

Above code simply saves the caption of the form to a variable named OldCaption.

hongjun

1. 개요[편집]

2. 생태주의[편집]

3. 명언[편집]

4. 작품[편집]

5. 매체에서의 등장[편집]

서양철학 여행

[김홍일쌤의 서양철학 여행] (33) 로크의 사회계약설(상): 통치론

저항권의 정당성 입증

로크가 《통치론》에서 제시한 사회계약 원리들 중 백미는 무엇보다 국민의 저항권을 인정한 데 있다. 로크가 《통치론》을 저술한 실질적인 목적은 저항권의 정당성을 입증하는 데 있었다. 저항권이란 정부가 처음 만들어질 당시의 목적을 제대로 수행하지 않는다면, 즉 구성원의 생명과 재산, 자유를 보호하지 않는다면 무력을 사용해서라도 저항할 수 있다는 논리다. 당시 전제 군주가 무소불위의 권력을 휘두르고, 그의 권력에 대한 도전은 신성모독죄로 간주되던 시대에 대범하게도 로크는 국민의 저항을 권리로서 인정했던 것이다.

홉스와 마찬가지로 로크 역시 인간의 자연상태를 전제로 자신의 사회계약 논의를 전개한다. 그러나 로크가 보기에 ‘만인의 만인에 대한 투쟁’과 같은 홉스의 자연상태를 보는 가정에는 난점을 가지고 있다. 왜냐하면 합리적인 이기주의자가 자연상태에서 계약하는 이유는 계약을 통해 자기 자신 특히 자신의 생명과 자유와 재산을 더 잘 보호하려는 의도에서라는 것이다. 그런데 자연상태에서 누리던 평등을 포기하고 절대 군주의 지배 아래 예속된다는 홉스의 추론은 합리성의 관점에서 볼 때 설득력이 떨어진다. 왜냐하면 자신의 처지가 더 나빠지는 계약에 합의하는 합리적인 존재는 생각하기 어렵기 때문이다.

군주도 이기적인 인간일 뿐

로크가 보기에 홉스의 추론은 논리적 일관성이 없다. 로크에 의하면 홉스의 사회계약이란 사회 구성원 간에 성립하는 것으로서 그 속에 군주는 포함되지 않는다. 그러나 군주도 하나의 이기적인 인간에 불과하다. 이러한 군주가 재판관이 되고 군주가 임의로 사람들을 해친다면 이는 오히려 자연상태보다 못한 상황이 된다. 이와 같은 절대 군주제 아래에서 살아간다는 것은 말하자면 자연상태 속의 여우를 피하려다가 오히려 사자에게 잡아먹히는 것과 다를 바 없다. 이 경우 군주와 사회 구성원의 관계는 여전히 자연상태에 있게 돼 전쟁이 계속된다는 문제가 있다.

따라서 홉스의 사회계약설에서는 군주의 이기심 문제를 해결하기 위해 군주와 사회 구성원 간에 다시 하나의 계약이 요청된다. 그런데 그렇게 되면 이 계약 이행을 보장하기 위해 계약을 감시할 더 높은 또 다른 하나의 군주가 필요하게 된다. 문제는 이러한 과정은 무한정 계속돼야 한다. 따라서 홉스의 사회계약 추론은 무한소급의 오류에 빠진다.

이러한 난점을 피하기 위해 로크는 자연상태를 자유롭고 평등한 상태라고 가정한다. 자연상태가 이처럼 평화롭고 목가적이라면 홉스와 달리 로크에게 있어서 사람들이 계약을 통해 국가나 정부를 수립하는 합리적인 이유는 무엇인가? 로크에 의하면 자연상태의 질서가 갖는 불완전성 때문이다. 즉 사람들이 저마다 자신의 행위가 옳다고 주장할 경우 자연상태에서는 이를 중재할 재판관이 없기 때문에 모두가 불안한 상태에서 지내야만 한다는 것이다. 이를 해소하기 위해 정치 공동체인 정부를 만들 수밖에 없으며, 이때 자신의 권리를 대리자인 정부에 일부 양도하기로 계약을 맺는다. 여기서 양도의 대상이 되는 권리는 ‘소유권’을 지키기 위한 이차적 권리인 ‘처벌권’이다. 원래의 권리인 소유권은 전혀 양도되지 않는다.

홉스의 계약설 문제 해소

이렇게 보면 로크는 통치권을 절대 군주로부터 국민에게로 옮김으로써 홉스의 사회계약설이 안고 있는 문제를 해결하고자 했다. 이제 로크에게 있어서 정부는 더 이상 통치자가 아니다. 정부는 사람들의 소유권을 보호하기 위해 부분적으로 양도받은 권한을 갖고 있는 국민의 대리자로서 의미를 갖는다. 권력의 주인은 국민이므로 국민은 통치받는 사람인 동시에 통치자가 된다.

절대왕정 시기 로크의 사회계약 사상은 가히 혁명적이었으며, 명예혁명 이전 로크의 《통치론》은 당연하게도 불온서적으로 지정됐다. 그러나 《통치론》의 내용들은 프랑스에 전해져 프랑스 혁명을 일으키는 도화선이 됐으며, 미국에 전해져 미국 혁명을 정당화하는 이론적 도구가 됐다. 절대 권력에서 사람들이 해방된 것이 그리 오래전 일이 아니란 점에서 오늘날 우리가 향유하는 모든 자유와 권리는 공기처럼 당연한 것이 아니라는 것을 다시 생각하게 된다.

◆기억해주세요

<통치론>의 내용들은 프랑스에 전해져 프랑스 혁명을 일으키는 도화선이 됐으며, 미국에 전해져 미국 혁명을 정당화하는 이론적 도구가 됐다.

김홍일 < 서울과학고 교사 > 

[MSSQL] 사용자 추가.pdf

MS-SQL 테이블 복사

1. 테이블을 생성하면서 테이블의 데이타 복사

select * into 생성될테이블명 from 원본테이블명

테이블 구조만 복사하겠다면

select * into 생성될테이블명 from 원본테이블명 where 1=2

2. 테이블이 이미 생성되어 있는경우 데이타만 복사

insert into 카피될테이블명 select * from 원본테이블명

특정 데이타만 복사 하겠다면

insert into 카피될테이블명 select * from 원본테이블명 where 검색조건

출처: http://iberis.tistory.com/10 [Iberis]

날짜 및 시간 데이터 형식 및 함수(Transact-SQL)

• 2017. 09. 01.
• 읽는 데 13분
• 참가자
  • 
   
  • 
   
  • 

이 항목은 다음에 적용됩니다.SQL Server(2012부터)Azure SQL DatabaseAzure SQL Data Warehouse 병렬 데이터 웨어하우스

이 항목의 다음 섹션에서는 Transact-SQL의 모든 날짜/시간 데이터 형식 및 함수에 대한 개요를 제공합니다.

• 날짜 및 시간 데이터 형식
• 날짜 및 시간 함수
  • 함수를 Get 시스템 날짜 및 시간 값
  • 날짜 함수 및 시간 부분
  • 해당 부분에서 날짜 및 시간 값 가져오기 함수
  • 날짜 함수 및 시간 차
  • 날짜를 수정 하는 함수 및 시간 값
  • 세션 형식 함수를 가져오거나 설정 하는 함수
  • 날짜의 유효성을 검사 하는 함수 및 시간 값
• 날짜 및 시간 관련 항목

날짜 및 시간 데이터 형식

Transact-SQL 날짜 및 시간 데이터 형식이 다음 표에 나열 되어 있습니다.

날짜 및 시간 함수

다음 표에는 Transact-SQL 날짜 및 시간 함수가 나와 있습니다. 결정성에 대 한 자세한 내용은 참조Deterministic and Nondeterministic Functions합니다.

시스템 날짜 및 시간 값 가져오기 함수

모든 시스템 날짜 및 시간 값은 SQL Server 인스턴스가 실행 중인 컴퓨터 운영 체제에서 가져옵니다.

정밀도가 높은 시스템 날짜 및 시간 함수

SQL Server 2017GetSystemTimeAsFileTime() Windows API를 사용 하 여 날짜 및 시간 값을 가져옵니다. 정확도는 SQL Server 인스턴스가 실행되고 있는 컴퓨터의 하드웨어와 Windows 버전에 따라 달라집니다. 이 API의 정밀도는 100나노초로 고정됩니다. GetSystemTimeAdjustment() Windows API를 사용 하 여 정확도 확인할 수 있습니다.

For...Next Statement (Visual Basic)

• 07/20/2015
• 9 minutes to read
• Contributors
  • 
   
  • 
   
  • 
   
  • 
   
  • 
   
  • all

Repeats a group of statements a specified number of times.

Syntax

For counter [ As datatype ] = start To end [ Step step ]  
    [ statements ]  
    [ Continue For ]  
    [ statements ]  
    [ Exit For ]  
    [ statements ]  
Next [ counter ]  

Parts

Simple Examples

You use a For...Next structure when you want to repeat a set of statements a set number of times.

In the following example, the index variable starts with a value of 1 and is incremented with each iteration of the loop, ending after the value of index reaches 5.

For index As Integer = 1 To 5
    Debug.Write(index.ToString & " ")
Next
Debug.WriteLine("")
' Output: 1 2 3 4 5

In the following example, the number variable starts at 2 and is reduced by 0.25 on each iteration of the loop, ending after the value of number reaches 0. The Step argument of -.25 reduces the value by 0.25 on each iteration of the loop.

For number As Double = 2 To 0 Step -0.25
    Debug.Write(number.ToString & " ")
Next
Debug.WriteLine("")
' Output: 2 1.75 1.5 1.25 1 0.75 0.5 0.25 0 

Nesting Loops

You can nest For loops by putting one loop within another. The following example demonstrates nested For...Next structures that have different step values. The outer loop creates a string for every iteration of the loop. The inner loop decrements a loop counter variable for every iteration of the loop.

For indexA = 1 To 3
    ' Create a new StringBuilder, which is used
    ' to efficiently build strings.
    Dim sb As New System.Text.StringBuilder()

    ' Append to the StringBuilder every third number
    ' from 20 to 1 descending.
    For indexB = 20 To 1 Step -3
        sb.Append(indexB.ToString)
        sb.Append(" ")
    Next indexB

    ' Display the line.
    Debug.WriteLine(sb.ToString)
Next indexA
' Output:
'  20 17 14 11 8 5 2
'  20 17 14 11 8 5 2
'  20 17 14 11 8 5 2

When nesting loops, each loop must have a unique counter variable.

You can also nest different kinds control structures within each other. For more information, see Nested Control Structures.

Exit For and Continue For

The Exit For statement immediately exits the For…Next loop and transfers control to the statement that follows the Next statement.

The Continue For statement transfers control immediately to the next iteration of the loop. For more information, see Continue Statement.

The following example illustrates the use of the Continue For and Exit For statements.

For index As Integer = 1 To 100000
    ' If index is between 5 and 7, continue
    ' with the next iteration.
    If index >= 5 And index <= 8 Then
        Continue For
    End If

    ' Display the index.
    Debug.Write(index.ToString & " ")

    ' If index is 10, exit the loop.
    If index = 10 Then
        Exit For
    End If
Next
Debug.WriteLine("")
' Output: 1 2 3 4 9 10

You can put any number of Exit For statements in a For…Next loop. When used within nested For…Nextloops, Exit For exits the innermost loop and transfers control to the next higher level of nesting.

Exit For is often used after you evaluate some condition (for example, in an If...Then...Else structure). You might want to use Exit For for the following conditions:

• Continuing to iterate is unnecessary or impossible. An erroneous value or a termination request might create this condition.

• A Try...Catch...Finally statement catches an exception. You might use Exit For at the end of the Finally block.

• You have an endless loop, which is a loop that could run a large or even infinite number of times. If you detect such a condition, you can use Exit For to escape the loop. For more information, see Do...Loop Statement.

Technical Implementation

When a For...Next loop starts, Visual Basic evaluates start, end, and step. Visual Basic evaluates these values only at this time and then assigns start to counter. Before the statement block runs, Visual Basic compares counter to end. If counter is already larger than the end value (or smaller if step is negative), the For loop ends and control passes to the statement that follows the Next statement. Otherwise, the statement block runs.

Each time Visual Basic encounters the Next statement, it increments counter by step and returns to the Forstatement. Again it compares counter to end, and again it either runs the block or exits the loop, depending on the result. This process continues until counter passes end or an Exit For statement is encountered.

The loop doesn't stop until counter has passed end. If counter is equal to end, the loop continues. The comparison that determines whether to run the block is counter <= end if step is positive and counter >= end if step is negative.

If you change the value of counter while inside a loop, your code might be more difficult to read and debug. Changing the value of start, end, or step doesn't affect the iteration values that were determined when the loop was first entered.

If you nest loops, the compiler signals an error if it encounters the Next statement of an outer nesting level before the Next statement of an inner level. However, the compiler can detect this overlapping error only if you specify counter in every Next statement.

Step Argument

The value of step can be either positive or negative. This parameter determines loop processing according to the following table:

The default value of step is 1.

Counter Argument

The following table indicates whether counter defines a new local variable that’s scoped to the entire For…Nextloop. This determination depends on whether datatype is present and whether counter is already defined.

The data type of counter determines the type of the iteration, which must be one of the following types:

• A Byte, SByte, UShort, Short, UInteger, Integer, ULong, Long, Decimal, Single, or Double.

• An enumeration that you declare by using an Enum Statement.

• An Object.

• A type T that has the following operators, where B is a type that can be used in a Booleanexpression.

  Public Shared Operator >= (op1 As T, op2 As T) As B

  Public Shared Operator <= (op1 As T, op2 As T) As B

  Public Shared Operator - (op1 As T, op2 As T) As T

  Public Shared Operator + (op1 As T, op2 As T) As T

You can optionally specify the counter variable in the Next statement. This syntax improves the readability of your program, especially if you have nested For loops. You must specify the variable that appears in the corresponding For statement.

The start, end, and step expressions can evaluate to any data type that widens to the type of counter. If you use a user-defined type for counter, you might have to define the CType conversion operator to convert the types of start, end, or step to the type of counter.