120 likes | 290 Views
비주얼베이직 함수. 난수발생 함수. Rnd() 0 ~ 1 사이의 난수 발생 골호안의 값이 양수 0 ~ 1 사이 음수 계속 같은 난수 발생 0 가장 최근에 만들어진 난수 한번 더 반환 사용예 print Int(Rnd() * 10) 0 ~ 9 사이의 숫자 반환 print Int(Rnd() * 10) + 1 1 ~ 10 사이의 숫자 반환
E N D
난수발생 함수 • Rnd() • 0 ~ 1 사이의난수 발생 • 골호안의 값이 양수 0 ~ 1 사이 음수 계속 같은 난수 발생 0 가장 최근에 만들어진 난수 한번 더 반환 • 사용예 • printInt(Rnd() * 10) 0 ~ 9 사이의 숫자 반환 • printInt(Rnd() * 10) + 1 1 ~ 10 사이의 숫자 반환 • Label1.backcolor = QBColor(int(Rnd() * 15 +1)) 레이블 컨트롤 배경색상 랜덤하게 변환
난수발생 함수 • Qbcolor • 0 ~ 15 로 지정된 색에 대응되는 색을 반환함 • 사용예 : label1.backcolor = Qbcolor(3)
그리기 함수 • 비베 사용 단위 • 트윕 (Twip) : 화면상의프로그램 배치와 다른 모든 디스플레이 시스템과 같도록 하기 위해 만들어진 비베 고유단위임 • 1트윕 : 1 포인트의 1/20 , 1인치의 1/ 1400 • 선의 굵기 지정 • drawWidth = 값 • 기본값 : 1 (단위 : 픽셀) • 1 ~ 32767 까지 지정 가능
그리기 함수 • 선의 스타일 지정 • drawStyle = 값 • 0(기본값) : Solid. 연속된 선 • 1 : Dash.대시로 이루어진 선 • 2 : Dot.점으로 이루어진 선 • 3 : Dash-Dot.대시-점으로 이루어진 선 • 4 : Dash-Dot-Dot.대시-점-점으로 이루어진 선 • 5 : Transparent.투명한 선 (나타나지 않음) • 6 : Inside Solid.내부 선
그리기 함수 • 비베에서 사용되는 창의 크기 설정값 • height, width, scaleheight, scalewidth 사용 • height, width 해당 창 개체의 X,Y 위치 좌표 • scaleheight, scalewidth 개체나 폼의 폭이고 ScaleHeight는 개체나 폼의 높이 이다.
그리기 함수 • Timer 컨트롤 • 시스템 시계를 검사하고 그에 따라 작동함 • 시간간격 설정 • interval 속성에서 함 : 1000 1초
그리기 함수 • Pset 함수 • 하나의 픽셀을 그리는 함수이다. • 구문 형식 • Object 개체 • Step (X, Y) 좌표, 단위(트윕) • Step : 최근에 접근한 좌표와의 상대좌표 • 사용예 • PSet (500, 500), vbyellow • 사선그리기 object.PSet Step (x, y), 색상 For x = 1 To 3000 PSet (x, x) Next x
그리기 함수 • Pset 함수 실습예제 • Pset으로그림을 그리자 폼위에서 마우스를 클릭하여 마우스를 드래그하면 그림을 그리고 마우스를 떼면 그리기를 멈춘다.
그리기 함수 • Line 함수 • 직선, 사각형 그릴때 사용한다 • 구문 형식 • Object 개체 • (x1, y1) : 선이 시작되는 x, y 좌표 • (x2, y2) : 선이 끝나는 x, y 좌표 • B : (x1, y1) 과 (x2, y2)의 박스를 그린다. • F : 채워진 박스를 그린다. B옵션이 먼저 선택 되어있어야 함 • 사용예 • Line (400, 400)-(700, 700) • 창을 가로지는 대각선 그리기 • Line -(ScaleWidth, ScaleHeight) object.Line Step (x1, y1) - Step (x2, y2), color, BF
그리기 함수 • Circle함수 • 원을 그릴때 사용한다 • 구문 형식 • 시작위치, 끝위치 : 호의 라디안 값 • 비율 : 가로, 세로 비율(기본값 : 1) • 1 : 정원 , 1 미만 : 가로 타원, 1 이상 : 세로타원 • 사용예 • Circle (500, 500), 400 • Circle step(1100, 0), 400, vbblue, 1.9 • Circle (1500, 1500), 400, vbblue, , , 0.3 object.Circle Step (x, y), 반지름, [색상, 시작위치, 끝위치, 비율]
[실습하기] • 폼을 클릭한 위치마다 속이채워진 사각형이 출력되도록 하시오. - 반지름 : 폭, 높이 각각 500 - 색상 : 본인임의 버튼을 클릭하면 원이 점점 커지면서 5개가 한꺼번에 그려지도록 하시오. - 반지름 : 300부터 시작해서 100씩 증가되도록 함. - 색상 : 임의 - 원유형 : 정원