Một số code của VB

Một số code của VB

... Datagrid1.refresh End Sub Private Sub cmdxoa_Click() t = MsgBox("chac chac xoa xong", vbYesNo) If t = vbYes Then rs.Delete End If End Sub Private Sub cmdIn_Click() Dim rs As New ADODB.Recordset

Ngày tải lên: 31/08/2013, 03:10