110,499
社区成员
发帖
与我相关
我的任务
分享
Select Case Index
Case 1 'win1 ,wind2, win3 是资源文件中的不同图片
G.DrawImage(My.Resources.wind1, X0, Y0)
Case 2
G.DrawImage(My.Resources.wind2, X0, Y0)
Case Else
G.DrawImage(My.Resources.wind3, X0, Y0)
End Select