'*type为1表示要增加行 2为减去行 Private Sub rowChange(ByVal type As Integer,byval GridType as DataGrid) Select Case type Case 1 GridType.DataSource = CreateDataSource(Me.GridType.Items.Count + 1) GridType.DataBind() Case 2 GridType...