Schön und gut. Du hast eine Methode für eine Textbox geschrieben. Das heisst, jede Textbox kann diese Methode verwenden.
Und wie frage ich nun die Form ab, welche Controls vorhanden sind?
Wenn ich sie habe, wie frage ich die Form welche Typen die Controls haben?
Das muss ich alles abfragen... wie ich eine textbox abfrage und aktionen ausführe ist nicht das problem sondern die abfrage der controls und der typen ...
Verfasst am: 30.01.2012, 10:32 Aufrufe: 140
hi
ich werde dir hier an dieser stelle nochmals den index ans herz legen....
du hast eine textbox die beschrieben wird wenn das geschieht soll sich der checkbox value ändern
Private Sub Text1_Change(Index as integer)
if text1(Index).text <> "" then
check1(index).Value = 1
else
check1(index).value = 0
endif
End SUb
Wundersschön dynamisch
und auf beliebig erweiterbar
n ...
Verfasst am: 30.01.2012, 07:49 Aufrufe: 140
Nunja ich hab eben eine Form mit verschiedenen Controls. Diese Controls sind auf einem TabControl in verschiedenen Tabs untergeordnet.
Ich möchte nun, wenn ein Control im Tab befüllt ist, sprich etwas in einer Textbox steht, ne Checkbox angekreuzt ist, was auch immer, da entsprechende Tab gekennzeichnet wird. Da die Controls in den einzelnen Tabs natürlich unterschiedlich sind und zukunftssicher sein soll, muss da ...
Verfasst am: 30.01.2012, 06:51 Aufrufe: 79
hi
wie wäre es mit
Private Command1_Click()
Text2.text = Text1.text
End Sub
somit schreibst du den inhalt der 1. textbox in die zweite
oder hab ich was falsch verstanden?
Verfasst am: 26.01.2012, 12:15 Aufrufe: 140
... ie für dich geschaffen wäre
aber was du versuchen könntest
dass du deinen steuerelementen einen index gibst
somit ersparst du dir dein name und type of
Text1(3).Text
so würdest du dir wahrscheinlich sogar unnötig viel arbeit ersparten
weil deine paar steuerelemente kannst du alle in einer forschleife mit dem index ansprechen
es dreht sich wahrscheinlich e nur um
checkbox, Optionbutton, textbox ...
Verfasst am: 26.01.2012, 09:17 Aufrufe: 140
Hallo zusammen,
ich habe ein Formular erstellt, welches verschiedene Steuerelemente beinhaltet.
Beispielsweise sind dort Label, Textboxen, Checkboxen etc. vorhanden.
Diese Steuerelemente (Controls) sind in einem TabControls auf verschiedene Tabs verteilt.
Nun möchte ich eine Schleife erstellen, die durch die Form geht, alle Controls ermittelt und dann abfragt, um welchen Typ es sich handelt. Wenn ich das habe ...
Verfasst am: 25.01.2012, 09:30 Aufrufe: 122
aber wenn ich jetzt nen Ordner mit datein asuwähle bleibt er nicht stehen wenn es keine Ordner sondern nur Datein in deem ordner gibt und es steht auch unten kein "öffnen" sodass er den pfad in die Listbox oder das Textfeld schreibt !
Sry bin icht Anfänger .. so sieht mein Code aus:
Public Class Form1
Private Property cFile As String
Private Sub TextBox1_TextChanged(ByVal sender As Sys ...
Verfasst am: 12.10.2011, 12:54 Aufrufe: 336
das heist du möchtest also so eine art bruteforce für eine webseite versuchen...
ich würde das aber nicht mit sendkey sondern mit
webbrowser1.Document.Forms(0).User.Value = "Admin" 'statt user musst du dir den namen der textbox aus dem quelltext der seite
'und zum bestätigen
webbrowser1.Document.Forms(0).submit.Click
viel erfolg
lg
Verfasst am: 17.08.2011, 08:32 Aufrufe: 188
Hallo,
Du kannst folgendes machen:
Private Sub Text1_GotFocus()
Text1.Text = ""
End Sub
Damit wird der Text in der TextBox gelöscht, sobald die TextBox den Focus bekommt um eine neue Zahl einzugeben.
Gruß
Verfasst am: 17.08.2011, 08:08 Aufrufe: 188
achso dann schonmal vielen dank werd es nachher zuhause mal ausprobieren. hab aber gleich noch ne frage: wie mache ich das wenn ich in die textbox eine zahl eingeben will, der Text der bereits in der Textbox steht verschwindet ?
geht das irgendwie mit "Clear"
Verfasst am: 22.07.2011, 18:54 Aufrufe: 456
du musst die einen ordentlichen code stiel angewöhnen!!!!!
if abfrage
dann hier ein einzug!!!
end if
so kann man das lesen
und wenns wie bei dir ist
if was weis ich
if noch eine abfrage
code
end if
end if
aber zu deiner frage...
If TextBox1.Text = Nothing Then
'hier prüfst du ob textbox1 leer ist
'wenn das nicht der fall ist (also wenn ein verein drin steht da ...
Verfasst am: 20.07.2011, 16:09 Aufrufe: 643
Hallo zusammen,
ich habe das Problem, dass ich aus einem beliebigen Forumular den Inhalt von Textboxen in eine Excel-Datei packen will. Heißt also das ich zb. Hallo in die Textbox eingebe und auf einen Button drücke. Damit speichert VB die Daten aus der Textbox in bestimmte Zellen von Excel.
Ich habe auch schon gegoogelt und folgenden Programmcode entdeckt:
Visual Basic Quellcode
Public Class Form1
Dim ...
Verfasst am: 26.06.2011, 15:26 Aufrufe: 195
In meinem Tool gibt es eine Textbox und da muss man eine E-Mail angeben um sich anmelden zu können.Dieses Tool muss auf den Server zugreifen und wenn dann die E-Mail dort schon vorhanden kommt ein Fehler
Kann mir jemand den Source Posten,peer PN ist auch nice!
Weil ich brauch das dringend!
mfg X-Righter
Verfasst am: 21.06.2011, 17:44 Aufrufe: 181
In meinem Tool gibt es eine Textbox und da muss man eine E-Mail angeben um sich anmelden zu können.Dieses Tool muss auf den Server zugreifen und wenn dann die E-Mail dort schon vorhanden ist geht es weiter!
Kann mir jemand den Source Posten,peer PN ist auch nice!
Weil ich brauch das dringend!
mfg X-Righter
Verfasst am: 24.05.2011, 21:01 Aufrufe: 461
Guten Abend/Mittag/Nacht/Morgen,
ich habe ein Button und der soll ein Text einer Textbox weitergeben. Das habe ich schon alles nur sollte der Text ein Code sein. Dar kommt folgendes Problem auf. Das ich dar auch " angeben muss und das wird bei mir als Text angeben. Wie kann ich das machen das das " in die Textbox eingefügt wird ?
Verfasst am: 09.05.2011, 09:32 Aufrufe: 425
Hallo,
ich bin neu hier und auch Einsteiger bei vba. Ich habe eine Eingabemaske programmiert und es haut auch soweit alles hin, aber bei dem CommandButton, der eine Zeile mit Daten über TextBoxen ändern soll, klappt dies einfach nicht.
Also er liest sich bei einem Klick auf die entsprechende Zeile in der Listbox die Daten in die Textboxen und wenn man in diesen Textboxen etwas ändert, soll die Änderung auch in ...
Verfasst am: 27.04.2011, 12:24 Aufrufe: 478
hi
tabstop: wenn du die Tabulatrotaste drückst dann spring der focus von textbox zu textbox normalerweise in sinnvoller reihenfolge
bei dir ist es aber irgendwie...
in vb6 ging das mit der Eigenschaft Tabindex
wird in vb.net nicht viel anders sein
lg
Verfasst am: 25.03.2011, 12:18 Aufrufe: 478
hi
dann investiere lieber nochmal eine stunde und bemühe dich um folgende punkte
-) die maximale länge einer textbox
-) man kann zahlen eingeben
-) sonderzeichen
-) notizen find ich nicht wirklich brauchbar
-) löschen und löschen 2 hab ich bis jetzt noch nicht verstanden wofür das ist
-) die Tabstops sind scheußlich
-) und man erfährt gar nicht ob man recht hatte
-) aja und beim neustart wenn neue worte für ...
Verfasst am: 25.03.2011, 09:35 Aufrufe: 478
hi
dann investiere lieber nochmal eine stunde und bemühe dich um folgende punkte
-) die maximale länge einer textbox
-) man kann zahlen eingeben
-) sonderzeichen
-) notizen find ich nicht wirklich brauchbar
-) löschen und löschen 2 hab ich bis jetzt noch nicht verstanden wofür das ist
-) die Tabstops sind scheußlich
-) und man erfährt gar nicht ob man recht hatte
-) aja und beim neustart wenn neue worte für ...
Verfasst am: 19.03.2011, 13:27 Aufrufe: 343
... X - und zum Vergrößern siend weg!
Wie geht das?
Das ich mit einem Bild oder nem Panel die Form verschieben kann?
4.
Durchhalten
Wie kann ich Im fertigem Programm die Sachen verschiebbar machen?
Also ich weiss so einigermaßen wie man mit einem Buttonklick einen Neuen Button erstellen kann!
Wie kann ich die Sachen nun verschiebbar im Programm machen?
Größe der Buttons ist ja einfach.
Textbox ...
Verfasst am: 18.03.2011, 13:15 Aufrufe: 241
h. wenn ich auf den Button drücke möchte ich die Control Inhalte aller Controls auslesen. Ich scheitere aber schon an dem Versuch nur den Inhalt einer Textbox der Klasse GeneralInformations auszulesen.
Beispiel Code:
Public Class GeneralInformation
Public Function txtProjectNumber() As TextBox
Dim _ProjectNumber As TextBox = New TextBox
_ProjectNumber.ID = "txtProjectNumber" ...
Verfasst am: 17.03.2011, 12:34 Aufrufe: 615
FileStream( _
"DeineDatei.txt", IO.FileMode.Open, _
IO.FileAccess.Read)
Dim w As IO.StreamReader = New IO.StreamReader(fs)
' Nun können wir Zeilen einlesen und auch gleich deinen textboxen zuweisen
Textbox1.text = w.ReadLine 'Liest die erste Zeile in der Datei und weist den Text der Textbox zu
'Das machen wir jetzt für alle 4 also:
Textbox2.text = w ...
Verfasst am: 16.03.2011, 19:40 Aufrufe: 264
Hallo zusammen,
hab da mal ne Frage. :Ich habe den Text meherer RTB`s in eine Datei gespeichert die ich "TEST" nenne, diese Datei "TEST" wird mir in einer Listbox angezeigt. nun möchte ich mit Click auf "TEST" in der Listbox den Text wieder in die RTB`s einlesen.
Kann mir da jemand helfen ???????
Verfasst am: 16.03.2011, 10:30 Aufrufe: 437 3 BETA 1"><![CDATA[Programmbeschreibung:
Flashinhalte mit Firefox und Co wiedergeben. Eine extra Version für den IE ist auf der Homepage bei Adobe verfügbar.
Größe:
erstellt am: ]]></Company>
in der listbox soll aber nur die einträge "name" und "section" eingelesen werden und in der rechten Textbox dann der inhalt aus der Programmbeschrei ...
Verfasst am: 14.03.2011, 09:07 Aufrufe: 388
hi
webbrowser1.Document.Forms(0).TextboxPfad.Value = Textbox3.Text
'wenn ich das richtig in erinnerung habe
'und TextBoxPfad musst du durch den namen von der textbox im webformular ersetzten
'und
webbrowser1.Document.Forms(0).Submit.Click
lg
Verfasst am: 07.03.2011, 15:03 Aufrufe: 324
hi ich habe dir den code ja schon gepostet brauchst ihn nur verwenden
im textbox change event
if len(Textbox1.Text) = 9 and isnumeric(textbox1.Text) = true then
'Progressbar start
end if
lg
Verfasst am: 07.03.2011, 14:38 Aufrufe: 324
Ich möchte das du Progressbar nur startet wenn eine korrekte Icq Nummer in die Textbox eingegeben wurde!
Und das es nicht zu starten geht wenn man nur "a" oder sowas eintippt!
Das mit Textbox oben da meinte ich eine Text Datei!
Verfasst am: 07.03.2011, 14:15 Aufrufe: 324
so wie darf ich das nun verstehen
im vorrigen post schreibst du dass du das ohne textbox lösen möchtest
und jetzt hast du doch eine textbox
was du mit der progressbar meinst weis ich nicht
poste mal den code der textbox
(wahrscheinlich change event)
Verfasst am: 07.03.2011, 13:57 Aufrufe: 324
Ich habe eine Textbox in dem Projekt wo man sie reinposten soll!
Aber wenn man 1 oder sowas eingibt startet die progressbar auch,obwohl "1" KEINE icq Nummer ist.
Ich möchte es nur starten wenn es eine wirkliche icq nummer ist
Verfasst am: 07.03.2011, 08:09 Aufrufe: 324
hi
und wo willst du dann die icq nummer eingeben?!?
in eine variable?
dann nimmst anstatt der textbox deine variable
wenn das imer noch nicht passt
dann poste doch mal genau dein vorhaben
bzw. code den du schon hast
dann wirds für den leser auch einfacher dir zu helfen
lg
Verfasst am: 05.03.2011, 13:20 Aufrufe: 324
Leider nein, mein Plan war es ohne eine Textbox es hin zu bekommen!
naja,wenn noch einer nen Plan hat,bitte melden!
Verfasst am: 18.02.2011, 20:09 Aufrufe: 386
Path
End If
Set BrowseDir = Nothing
End Sub
Sub AutoOpen()
'Aktiviert die UserforForm automatisch bei Programmstart'
ActiveWindow.Visible = False
UserForm1.Show
End Sub
Private Sub UserForm_Activate()
'Kopiert den Textinhalt aus einer Textdatei in eine Textbox'
FNr = FreeFile
Open "c:\Documents\test1.txt" _
For Input As #FNr
Do While Not EOF ...
Verfasst am: 09.02.2011, 11:13 Aufrufe: 395
Hallo an Alle,
Ich will ein Textbox1 Wert in einer Textdatei suchen und gefundene Line in Label1 ausgeben.
Diese Code hab ich in Internet gefunden, wie könnte ich es für meine Idee nutzen?
Diese Code sucht einen Wert den ich in eine Textbox eingebe in einer Textdatei und die Zeile mit dem gefundenen Wert wird in einer neue Textdatei gespeichert.
Dim stream1 As New System.IO.FileStream("C:\ ...
Verfasst am: 03.02.2011, 17:53 Aufrufe: 399
Hallo, ich habe folgendes Problem
Ich habe Checkbox und Anzhalfelder...
Checke ich Checkbox1 wird in der Listbox z.b. "Hallo" angezeit
Trage ich nun in das dazugehörige Anzahlfeld 5 ein, steht in der Listbox "Hallo x5"
Folgender Code: If IsNumeric(TextBox2.Text) Then ListBox1.Items.Item(0) = ("Hallo x" & TextBox2.Text)
Nun zu dem Problem: Ich habe ca. 15 Checkboxen und dazug ...
Verfasst am: 29.01.2011, 19:42 Aufrufe: 543
... Popups aufpoppen
end select
end if
end if
End Sub
Die beschriebene Sub "BuildButton" wird nach dem Aufziehen des FocusRect beim Form_MouseUp aufgerufen (die Button-Grössenanpassung an das FocusRect habe ich der Übersichtlichkeit in diesem Code weg gelassen), wenn das Werkzeug "CommandButton" benutzt wird, ansonsten soll je nach gewähltem Werkzeug (Textbox ...
Verfasst am: 27.01.2011, 09:53 Aufrufe: 458
Hallo,
ich möchte Hexadezimale Zeichen für das neue Premiumadress-Verfahren der Deutschen Post auf einem DataMatrix-Code auslesen. Jedoch interpretiert die Textbox von VB6 und verarbeitet sie zugleich.
Das Bedeutet:
Der Datamatrix Code bedeutet Dezimal: DEA08....
Es wird der HexCode:
D = 44
E = 45
A = 41
08 = BS
Er gibt also noicht DEA08 aus, sondern interpretiert das "08" als Back ...
Verfasst am: 21.01.2011, 17:15 Aufrufe: 262
Also ich möchte das wenn auf den button geklickt wird und in der textbox nix mit @drinnsteht diese progressbar nicht läuft gibt es dafür einen speziellen code?
Verfasst am: 30.12.2010, 18:56 Aufrufe: 1108
Changelog:
Added:
- Deleting the next character if the delete key was pressed
- 'Save Selection As' (in the 'File' menu)
- Macro commands from the 'File' and 'View' menu
- Drag & Drop between the textbox and the HTML debug webbrowser
- Program icon (in the About-dialog)
- Recency state (in the About-dialog)
- 'Update'-button in the About-dialog (if a newer version is available)
...
Verfasst am: 24.12.2010, 20:41 Aufrufe: 290
Hallo alle zusammen ich schreibe hier das erste mal
und möchte von euch wissen mit welchem befehl ich den Pfad der geöffneten exe (z.b. C:/All user/desktop/Programm.exe)
in eine Textbox bekomme,
ohne das ich den pfad der exe angebe.
(b.s.p. Textbox3.Text = Meinprogrammpfad)
LGrüße Swere
Verfasst am: 03.12.2010, 14:10 Aufrufe: 347
HALLO ICH WOLLTE MAL FRAGEN OB ES MÖGLICH IST ZUM BEISPIEL BEI EIN SPAMMER DEN EINGEBENDEN TEXT
IN DER combobox1 SOFORT KLICK BUTTON AN DEN CHAT ZU SENDEN OHNE DEN CHAT ANZUKLICKEN
UND MEIN PROBLEM AUSERDEM IST DAS WENN ICH ES SO MACHE SIEHE CODE:
Public Class Form1
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
Timer1.Enabl ...
Verfasst am: 03.11.2010, 20:03 Aufrufe: 657 hallo ich möchte ein form erstellen mit der ich Textdokument mit dem von mir in der textbox angegebenen
namen start zahl und endzahl zum beispiel:
aerox1
aerox2
aerox3
aerox4
aerox5
aerox6
aerox7
aerox8
aerox9
aerox10
also soviele wie ich möchte es sollte dann das textdokument auf dem destop erstellen
bitte um hilfe bin noch nicht so fit mit visual basic
danke im vorraus
Verfasst am: 27.10.2010, 14:10 Aufrufe: 612
Hi hab mir nen Chatclient ueber Telnet vor kurzem geschrieben und haufen befehle und tools eingebaut hab jetzt kein platz mehr auf Form1 und jetzt will ich ueber button klick neue form laden mit dem befehl textbox inhalt an die RichTextBox abschicken der auf form1 ist habs chon SuFu benutzt und da wurde erklaert das man davor Form1. setzen soll hab ich gemacht doch dann kommt immer "laufzeitfehler 40006 falsch ...
Verfasst am: 06.10.2010, 06:27 Aufrufe: 491
Hy hy.
Ich habe ein Zahlenfeld wie bei einem Taschenrechner.
darunter eine textbox.
Wenn ich die Zahlen klicke sollen diese unten im Zahlenfeld erscheinen.
bei klick auf den Button login, soll die eingegebene Zahl mit den Zahlen welche in einer Excel Tabelle geschrieben sind
vergliechen werden. Wenn die eingegebene Zahl in dem Excel File in Spalte A hinterlegt ist, wird die nächste Form geöffnet.
Hat da j ...
Verfasst am: 05.10.2010, 10:20 Aufrufe: 395
Suche ein beispiel wie ich FTP Dateien in einen listview anzeigen lassen kann das was in den Dateien steht ebenfalls in einen Listview
oder Textbox
und die inhaltwerte zb:
Online = 0
Mit einer Value Textbox und verändern des inhalts der datei auf 1 ändern kann
Online = 1