Hvordan til Split OpenArgs i VBA

OpenArgs Eiendom bestemmer strenguttrykket definert av OpenArgs argument på OpenForm metoden. Denne egenskapen kan bare brukes med en makro eller med OpenForm metode. For å bruke OpenArgs eiendom, åpner et skjema via OpenForm metoden i Docmd objekt og sette OpenArgs argument til riktig strenguttrykket. De OpenArgs egenskapsinnstillinger kan deretter brukes i koden for skjemaet. Funksjon Split tar String uttrykk som inneholder dels og skilletegn og returnerer en streng array.

Bruksanvisning

1 Klikk "Start", "Alle programmer" og "Microsoft Office." Velg en av kontorapplikasjoner som Excel. Trykk "Alt" og "F11" samtidig for å få opp VBA editor.

2 Klikk "Ark1" på VBA Project. Velg "Regneark" fra rullegardinlisten og "Change" metoden fra den andre rullegardinlisten.

3 Opprett en offentlig funksjon i noen modul som følger:

Public Function ParseText (tekst As String, x) As Variant
På Error Resume Next
Dim var_string As Variant
var_string = Split (tekst, "|", -1)
ParseText = var_string (x)
End Function

Funksjonen vil dele dels finnes i argumentene og danner en matrise som heter var_string.

4 Tast inn koden mellom Sub Hoved og End Sub som følger:

DoCmdn.OpenForm "FORM_NAME", "Hello | Nice | Trip"
Dim Str1 As String
Dim Str2 As String
Str1 = ParseText (OpenArgs, 0)
Str2 = ParseText (OpenArgs, 1)

Dette vil passere flere OpenArgs når du åpner den form ved hjelp av "|" som tekst separator.