Ved programmering i Visal Basic 6 , skal du måske til at slette en post fra en table.You kan slette en post fra en postsæt bruge delete metoden. Du bliver først nødt til at finde i datasættet , kalder delete metode derefter flytte markøren til den næste post . Du bliver nødt til at tjekke , om posten var den sidste post i postsættet , i hvilket tilfælde vil markøren er flyttet til slutningen af ​​filen , og du bliver nødt til at flytte den tilbage til den sidste post . Postsættet s delete metode vil slette posten fra den underliggende data tabel i databasen . Ting du skal
Visual Basic 6 fotos Database
ADO
Computer
Vis Flere Instruktioner
Configuration
1

Start Visual Basic 6. ansøgning.
2

Åbn dit projekt eller starte et nyt projekt , hvis du ikke har et eksisterende projekt oprettet.
3

Tilføj en ny form til projektet.
4

Træk et ADO data kontrol objekt fra sidelinjen til formularen .
5.

Slut ADO objekt til databasen , indstilling alle egenskaber efter behov .
6

Dobbeltklik på formularen for at åbne code- bag vinduet.
7

Angiv koden for sletningen rutiner ind i kroppen af ​​subrutine for din ønskede hændelse .
slette en post
8

Erklær din nødvendige variabler. For eksempel kan forbindelsen og postsættet objekter og strengen variable , hvor du vil gemme dine SQL-forespørgsel defineres således : Hej

Dim myADOConn Som ADODB.Connection

Dim myADORecordset Som ADODB.Recordset

Dim mySQL As String

Din forbindelse objektet og postsættet objekt kan erklæres Form niveau, hvis du har brug for at få adgang til dem i mere end én underprogram.
9

Opsætning og åbne en forbindelse til databasen , som følger : Hej

Set myADOConn = Ny ADODB.Connection

myMADOConn.ConnectionString = << forbindelse streng til din database >> < br >

myADOConn.Open
10

Opsæt en postsættet . Definer en ny instans af postsættet klassen, og derefter kalde på "Åbn "-metoden på din rescordset objekt med de korrekte parametre. Syntaksen for "Open" metoden er : Hej

RecordsetObject.Open Source, ActiveConnection , CursorType , LockType , Indstillinger

Et eksempel følger : Hej

Set myADORecordset = Ny ADODB . Recordset

myADORecordset.CursorLocation = adUseClient

myADORecordset.Open mySQL , myADOConn , adOpenStatic , adCmdText
11

Slet en post fra postsættet : Hej < p> myADORecordset.Delete
12

Flyt markøren til den næste post : Hej

myADORecordset.MoveNext
13

Check til " End of File" tilstand . Hvis det er slutningen af ​​filen , kalder " MoveLast " metode til postsættet objekt : Hej p Hvis myADORecordset.EOF

Så myADORecordset.MoveLast

End If < br >