비쥬얼베이직) 자료를 읽어서 그래프를 그리는 프로그램입니다.

본문내용

Attribute VB_Name = "Form1"
Attribute VB_GlobalNameSpace = False
Attribute VB_Creatable = False
Attribute VB_PredeclaredId = True
Attribute VB_Exposed = False
Dim stName(6), Name1 As String
Dim Kor1, Math1, Eng1 As Integer
Dim Kor(6), Math(6), Eng(6), Sum(6) As Integer
Dim Y_K(6), Y_M(6), Y_E(6) As Double
Dim avg(6) As Double
Dim iNum As Integer

Private Sub Command1_Click()
If Text1.Text = "" Then
MsgBox "파일을 먼저 선택하세요."
ElseIf Option1.Value = True Then
Call draw_axis1
Call draw1
ElseIf Option2.Value = True Then
Call draw_axis2
Call draw2
End If

End Sub

키워드

비쥬얼베이직,   그래프,   소스