Visual Basic编写图形填充程序，在窗体上绘制一个正方形填充红色，坐标为100, 10, 50, 50，绘制一个正方形填充黄色，坐标为100, 70, 50, 50，显示不同的颜色填充图案

以下是 Visual Basic 编写的一个简单的图形填充程序，实现了您的需求。您可以将代码复制粘贴到 Visual Basic 环境中进行测试。

Public Class Form1
    Private Sub Form1_Paint(sender As Object, e As PaintEventArgs) Handles MyBase.Paint
        '绘制红色正方形
        Dim rect1 As New Rectangle(100, 10, 50, 50)
        Dim brush1 As New SolidBrush(Color.Red)
        e.Graphics.FillRectangle(brush1, rect1)

        '绘制黄色正方形
        Dim rect2 As New Rectangle(100, 70, 50, 50)
        Dim brush2 As New SolidBrush(Color.Yellow)
        e.Graphics.FillRectangle(brush2, rect2)
    End Sub
End Class

在该程序中，我们在窗体上绘制了两个正方形，并使用不同的颜色进行填充。绘制正方形和填充颜色使用了 .NET 框架中的 Graphics 类和 SolidBrush 类，FillRectangle 方法用于填充矩形。在窗体的 Paint 事件中，我们使用 e.Graphics 对象进行绘制操作，将两个正方形和对应的颜色信息传递给 FillRectangle 方法即可。

希望这个例子对您有所帮助。如果您有任何问题或者需要进一步的帮助，请随时提问。