combobox

Status
Niet open voor verdere reacties.

snipeytje

Gebruiker
Lid geworden
20 mrt 2007
Berichten
398
ik wil een soort browser maken maar ik heb een paar problemen.
1 ik wil dat de gebruiker de tekst in combobox 1 kan veranderen.
2 een vorige knop maken
en dat is het wel.
weet iemand misschien hoe dit moet?
alvast bedankt.
 
hey,
1. Dit kan je bijvoorbeeld zo doen:
Code:
Private Sub Combo1_KeyPress(KeyAscii As Integer)
If KeyAscii = 13 Then
Combo1.AddItem Combo1.Text
End If
End Sub

2. een vorrige knop staat geloof ik bij de webbrowser1. propeties. Zoek anders een beetje op google!
 
waar kan de gebruiker dat dan typen?
en bedankt zo kan ik weer verder met mijn browser tje
 
als je met de code die ik gaf iets in de combo1 typt, en dan op enter drukt, word het gene dat je getypt had in de combo1 toegevoegd

met toelichting:

Code:
[COLOR="Green"]'Als de gebruiker op een knop drukt als de cursor op de combo1 staat[/COLOR]
Private Sub Combo1_KeyPress(KeyAscii As Integer)
[COLOR="green"]'Als de knop die de gebruiker indrukte een "enter" is: (keyAscii 13 is een enter)[/COLOR]
If KeyAscii = 13 Then
[COLOR="green"]'Voeg de text die in combo1 staat (combo1.text) toe aan de lijst:[/COLOR]
Combo1.AddItem Combo1.Text
[COLOR="green"]'De rest spreekt voor zichzelf:[/COLOR]
End If
End Sub
 
kan het ook dat de gebruiker dat ergens anders ( op een andere tab invult?
 
Een voorbeeld: 1 textbox en 1 combobox:

Code:
Private Sub Text1_KeyPress(KeyAscii As Integer)
[COLOR="green"]'Als de gebruiker op enter drukt als te cursor in text1 staat:[/COLOR]
If KeyAscii = 13 Then
[COLOR="Green"]'Voeg aan de combo1 de text van text1.text toe:[/COLOR]
Combo1.AddItem Text1.Text
End If
End Sub
 
nou, ik weet niet, maar "list1.additem" hoort het gewoon te doen.
tenmisnte in vb2006

V:thumb:
 
google -> zoeken naar "additem visual basic 2005"
in de microsoft msdn website:

Code:
'Visual Basic 2005
' Add an item at the end of the list.
ListBox1.Items.Add("Tokyo")
' Insert an item at the top of the list.
ListBox1.Items.Insert(0, "Copenhagen")
' Remove the first item.
ListBox1.Items.RemoveAt(0)


V :thumb:
 
Status
Niet open voor verdere reacties.

Nieuwste berichten

Terug
Bovenaan Onderaan