VS中直线的绘制—算机图形学实验报告一.docVIP

西北师范大学学生实验报告 学院 地环学院 专业 地理信息系统 年级、班 学号 姓名 课程名称 计算机图形学 实验题目 成绩 熟练掌握绘制直线的中点画线算法和实验准备：直线的中点画线算法和 三、实验内容：在.net环境中利用中点画线算法和 四、实验过程及： 程序界面设计、控件属性说明程序代码和程序运行四部分 Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click DrawLine()函数画线 Dim x1, y1, x2, y2 As Double Dim g As Graphics = PictureBox1.CreateGraphics Dim p As Pen = New Pen(Color.Red, 1) If TextBox1.Text = Or TextBox2.Text = Or TextBox3.Text = Or TextBox4.Text = Or TextBox1.Text = TextBox3.Text Or TextBox2.Text = TextBox4.Text Then MessageBox.Sh