用vb.net 写一个甘特图

在VB.NET中编写甘特图，你可以使用第三方库如GanttVCL、GanttChart.net或使用Windows Forms控件如Gantt Chart for .NET Framework。这里提供一个简单的示例，展示如何使用GanttChart.net库：

首先，你需要安装GanttChart.net，可以从官方网站下载并添加到你的项目引用中。

Imports GanttChartDataBinding

Public Class Form1
    Private Sub Form1_Load(sender As Object, e As EventArgs) Handles MyBase.Load
        ' 创建一个新的Gantt图表对象
        Dim ganttChart As New GanttChart()

        ' 添加任务数据源
        Dim tasksDataSource As New List(Of GanttTask)
        tasksDataSource.Add(New GanttTask With {
            .Name = "任务1",
            .Start = DateTime.Now.AddDays(1),
            .Finish = DateTime.Now.AddDays(5),
            .PercentageComplete = 0
        })
        ' ... 其他任务数据同理

        ' 绑定数据到图表
        ganttChart.DataSource = tasksDataSource

        ' 显示图表
        Me.Controls.Add(ganttChart)
    End Sub
End Class

这个例子创建了一个基础的GanttChart，并添加了任务1作为演示。实际使用时，你可以根据需求修改任务属性、添加更多任务，甚至定制样式和交互功能。