|
Registrieren
LoginInformationen über selectedindexchanged |
|||||
|---|---|---|---|---|---|
 [Frage]Ordner auslesen und Dateinamen |
|||||
| Verfasst am: 25.01.2012, 10:30 Aufrufe: 358 so sieht mein Code aus: Public Class Form1 Private Property cFile As String Private Sub TextBox1_TextChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles TextBox1.TextChanged End Sub Private Function ActiveSheet() As Object Throw New NotImplementedException End Function Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, B ... |
|||||
| Problem mit Kombination von Access und VB |
|||||
| Verfasst am: 31.05.2010, 13:02 Aufrufe: 738 Hallo community, nach über 5 Stunden verzweifelter Suche habe ich mich jetzt dazu entschlossen mein Problem mal in ein Forum zu setzen. Mein Vorhaben: In einem Form sind 4 ComboBoxen mit je 4 items (Indizes 0 bis 3), wo der Anwender angeben soll, welche Gliedmaßen ihm amputiert werden (für die Berechnung des BMI). In meiner Datenbank stickman_db.accdb (Acsess 2007 Datenbankdatei) gibt es die Felder ID, Arm1 ... |
|||||
| Primary Key einer Datenbank vergleichen |
|||||
| Verfasst am: 19.03.2010, 19:45 Aufrufe: 1027 Die hat einen Primary Key und der lässt sich nicht vergleichen. Ich bekomme immer die Meldung das die Datentypen nicht kompatibel sind. Im Acces habe ich die DB erstellt und einen AutoWert angelegt der laut Access Long Integer sein soll. Zu erst mein COde: ------------------ Private Sub ListBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ListBox1.SelectedIndexChange ... |
|||||
| Benötige Hilfe |
|||||
| Verfasst am: 17.01.2010, 15:35 Aufrufe: 423 Sie können sie bei Bedarf verschieben oder entfernen. Me.TabMitarbeiterTableAdapter.Fill(Me.ZimmereiDataSet.tabMitarbeiter) End Sub Private Sub cboMitarbeiter_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cboMitarbeiter.SelectedIndexChanged ' Füllen der Felder überprüfen If cboMitarbeiter.SelectedIndex < 0 Then MsgBox(" ... |
|||||
| Datentypen und Kriterienausdruck unverträglich |
|||||
| Verfasst am: 13.07.2009, 08:55 Aufrufe: 1799 ... fon") & " # " _ & reader("telefax") & " # " _ & reader("mobiltelefon") & " # " _ & reader("email")) pnummer.Add(reader("satznummer")) Loop reader.Close() End Sub Private Sub lstTab_SelectedIndexChanged ... |
|||||
| PC-Eieruhr (Mein Erstes Projekt) |
|||||
| Verfasst am: 15.06.2009, 18:27 Aufrufe: 1115 Object, ByVal e As System.EventArgs) Handles btnAbout.Click<br /> About.Show()<br /> End Sub<br /><br /> Private Sub cmbFunktion_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmbFunktion.SelectedIndexChanged<br /> &nb ... |
|||||
| Schrift-grösse, -farbe |
|||||
| Verfasst am: 23.08.2008, 23:07 Aufrufe: 1044 FileName vbNullString Then Dim outputstream As New IO.StreamWriter(.FileName) outputstream.Write(RichTextBox1.Text) outputstream.Close() End If End With End Sub 'Farbe aendern Private Sub cb_color_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cb_color.SelectedIndexChanged If cb_color.Text = "Blau ... |
|||||
| Schrift-grösse, -farbe |
|||||
| Verfasst am: 23.08.2008, 22:09 Aufrufe: 1044 FileName vbNullString Then Dim outputstream As New IO.StreamWriter(.FileName) outputstream.Write(RichTextBox1.Text) outputstream.Close() End If End With End Sub 'Farbe aendern Private Sub cb_color_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cb_color.SelectedIndexChanged If cb_color.Text = "Blau ... |
|||||
| Textbox direkte Tastatur Taste. |
|||||
| Verfasst am: 16.03.2008, 21:21 Aufrufe: 1422 |
|||||
| Textbox direkte Tastatur Taste. |
|||||
| Verfasst am: 16.03.2008, 20:22 Aufrufe: 1422 |
|||||
| PC-Eieruhr (Mein Erstes Projekt) |
|||||
| Verfasst am: 15.01.2008, 15:06 Aufrufe: 2480 Text = "00:00:00" End Sub Private Sub btnAbout_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnAbout.Click About.Show() End Sub Private Sub cmbFunktion_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles cmbFunktion.SelectedIndexChanged Select Case cmbFunktion.SelectedI ... |
|||||