Ako previesť mobilné Array na povrázku

Mať znalosti previesť bunky pole na reťazec môže vaše databázy programu dynamickejšie . Microsoft Office Access je relačný databázový systém sa bežne používa pre návrh lokálnej databázy . Visual Basic for Applications ( VBA ) je najrýchlejší spôsob , ako automatizovať rutinné úlohy v programe Access , ako je napríklad prevod buniek pole na reťazec . Pole v programovaní je premenná , ktorá môže mať viac indexov . Každý index môže mať svoju vlastnú hodnotu . String premenná sa používa na uloženie dát znak . Veci , ktoré budete potrebovať v Microsoft Office Access
Northwind databázy
Zobraziť ďalšie inštrukcie Cestuj 1

Otvorte databázu Northwind aplikácie Microsoft Office Access . Databáza Northwind je súčasťou balíka Microsoft Office .
2

Kliknite na " Databázové nástroje " , potom vyberte " Visual Basic " , otvorte okno Basic Visual Microsoft . Kliknite na " Vložiť " poľa a vyberte
3

Zadajte nasledujúci vytvoriť nový podprogram " modul " . :

Private Sub cellArrayToString ( )

Stlačte tlačidlo " Enter " .
4

Zadajte nasledujúci vytvoriť nové premenné :

Dim strSQL As String

Dim db Ako Databáza

Dim rst Ako Recordset

Dim cellIntArray ( 3 ) As Integer

Dim X As Integer

Dim MyString As String

Set db = CurrentDb

5

Zadajte nasledujúci vytvoriť novú tabuľku a pridať tri nové záznamy :

strSQL = " CREATE TABLE tblData ( Id_Num číslo ) ; " Spojené

DoCmd.SetWarnings False

DoCmd.RunSQL ( strSQL )

strSQL = " INSERT INTO tblData VALUES ( 0 ) ; "

DoCmd.RunSQL ( strSQL )

strSQL = " INSERT INTO tblData VALUES ( 1 ) , "

DoCmd.RunSQL ( strSQL )

strSQL = " INSERT INTO tblData VALUES ( 2 ​​) , "

DoCmd.RunSQL ( strSQL )
6

Zadajte nasledujúce otvoriť nové Recordset a získať všetky dáta z " tblData " : .

Set rst = db.OpenRecordset ( " Vyberte tblData * od tblData ; " )

rst.MoveLast

rst.MoveFirst
7

Zadajte nasledujúce prechádzať všetky záznamy a pridať ich do poľa Integer :

X = 0 To rst.RecordCount - . 1

cellIntArray ( X ) = rst.Fields ( 0 ) Hodnota

rst.MoveNext

Ďalšie X
Stránka 8

Zadajte nasledujúce previesť bunky poľa Integer na reťazec premenné :

X = 0 To 2

myString = myString & cellIntArray ( X ) a " , "

Ďalšie X
9

Zadajte nasledujúce zobraziť obsah " MyString " premenné cez okno so správou :

MsgBox myString

zadajte nasledujúce uvoľniť premenné z pamäti :

rst.Close

db.Close

• Predchádzajúca strana: Aké sú Visual Basic terminológia 
• Ďalšia strana: Vlastnosti formulára v jazyku Visual Basic