Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Programmiercodes lesen Access VBA |
03.05.2017 10:06:23 |
Yasin |
|
|
|
03.05.2017 13:01:53 |
Gast74279 |
|
|
|
03.05.2017 13:14:57 |
Gast74279 |
|
|
|
03.05.2017 13:56:35 |
Gast23359 |
|
|
|
03.05.2017 13:57:52 |
Yasin Güngör |
|
|
Von:
Yasin |
Datum:
03.05.2017 10:06:23 |
Views:
1030 |
Rating:
|
Antwort:
|
Thema:
Programmiercodes lesen Access VBA |
Hallo es geht darum das ich eine wichtige Prüfung über vba in access morgen machen werde. Mein Problem ist das ich dieses Programmiercodes lesen und dann die jeweiligen Schritte in der Tabelle aufschreiben nicht ganz verstehe. Ich benötige dringend eure Hilfe. Danke im Voraus. Hier das Beispiel:
In das Feld txta wird nach unten angeführten Beispielen eingegeben. Wie sieht die Ausgabe nach Klick auf btx im Feld txtb aus? Betrachten sie jedes Beispiel isoliert, und nehmen sie an, dass das Formular vor jedem Beispiel neu geladen wurde. Schreiben sie die Zeichen in die dafür vorgesehenen Ausgabefelder. Im Falle eines Leerzeichens lassen sie das Kästchen frei.
a) 967
b) trda
c) 7e 4b (Leerzeichen zwischen e und 4)
d) t!2-
e) User gibt nichts ein und klickt sofort auf btx
f) User drückt STRG + RETURN im Feld txta und klickt anschließend auf btx
a
b
c
d
e
f
Option Compare Database
Dim abc() As String
Private Sub btx_Click()
On Error GoTo sp
Dim i, j, k As Long
Dim h, s As String
k = Len(txta)
ReDim abc(1 To k) As String
For i = 1 To k
abc(i) = Mid(txta, i, 1)
Next i
For i = 1 To k
For j = 1 To k - 1
If abc(j + 1) < abc(j) Then
h = abc(j)
abc(j) = abc(j + 1)
abc(j + 1) = h
End If
Next j
Next i
s = ""
For i = 1 To k
s = s + abc(i)
Next i
txtb = s
Exit Sub
sp:
txtb = "abc"
End Sub
|
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Bitte geben Sie ein aussagekräftiges Thema an.
Bitte geben Sie eine gültige Email Adresse ein!
- Bitte beschreiben Sie Ihr Problem möglichst ausführlich. (Wichtige Info z.B.: Office Version, Betriebssystem, Wo genau kommen Sie nicht weiter)
- Bitte helfen Sie ebenfalls wenn Ihnen geholfen werden konnte und markieren Sie Ihre Anfrage als erledigt (Klick auf Häckchen)
- Bei Crossposting, entsprechende Links auf andere Forenbeiträge beifügen / nachtragen
- Codeschnipsel am besten über den Code-Button im Text-Editor einfügen
- Die Angabe der Emailadresse ist freiwillig und wird nur verwendet, um Sie bei
Antworten auf Ihren Beitrag zu benachrichtigen
Thema
|
Datum
|
Von Nutzer
|
Rating
|
Antwort
|
Programmiercodes lesen Access VBA |
03.05.2017 10:06:23 |
Yasin |
|
|
|
03.05.2017 13:01:53 |
Gast74279 |
|
|
|
03.05.2017 13:14:57 |
Gast74279 |
|
|
|
03.05.2017 13:56:35 |
Gast23359 |
|
|
|
03.05.2017 13:57:52 |
Yasin Güngör |
|
|