Focus

[mirko100]

hallo
vor ein paar tagen habe ich mit vb 2005 begonnen.
mein problem : ich will nach der eingabe der enterTaste von einem
Textfeld in eine Listbox springen.

in vb6 war das kein prob

' Private Sub Text1_KeyPress(ByVal KeyAscii As Integer)
' If KeyAscii = 13 Then
' Text2.SetFocus()
' End If

aber in 2005... hmmm

????
Hilfe !!

[Gewürzwiesel]

wo genau ist dein problem?
sind es die tastatureingaben?
oder das dein programm nicht fokusiert?
hast du dir schon mal mit haltepunkten angeschaut, welcher key als parameter mit übergeben wird?
ist das ereignis richtig, sprich, geht er überhaupt in die funktion?
und und und ...

PS: wieso sind die zeilen auskommentiert?

[mirko100]

hi

neee ich weis nicht mit welchem befehl oder funktion ich das
machen muss.

schämm....

[Gewürzwiesel]

mit WELCHEM BEFEHL du WAS machen musst?

EDIT: ich denke schon, dass du das richtig angehst, hast es in vb6 ja auch geschafft aber ich würde einfach mal haltepunkte setzen und schaun was er macht. du kannst dir ja auch alle ereignisse anzeigen lassen, von jedem element. mach das einfach mal. ist zwar nich die schnelle art, aber bevor du hier andauernd nachfragst, hättest du es vielleicht schon längst gelst

[mirko100]

mit WELCHEM BEFEHL du WAS machen musst?

EDIT: ich denke schon, dass du das richtig angehst, hast es in vb6 ja auch geschafft aber ich würde einfach mal haltepunkte setzen und schaun was er macht. du kannst dir ja auch alle ereignisse anzeigen lassen, von jedem element. mach das einfach mal. ist zwar nich die schnelle art, aber bevor du hier andauernd nachfragst, hättest du es vielleicht schon längst gelst

was soll ich mit so einem dummen Spruch ?
entweder du kanst helfen oder nicht ?

ich denke ehr nicht

[Gewürzwiesel]

ich denke du solltest genauer dein problem definieren. dann wissen andere auch mehr damit anzufangen...

[Headhunter]

Die Frage ist ja nun wirklich nicht so schwer zu verstehen !

Du setzt ein event "Keypress" und benötigst anschließend folgenden Code:

if e.keychar = chr(13) then

textfeld1.focus()


end if

PS: Ich mag es auch lieber eine direkte Antwort in Foren zu erhalten, als das ständige "Kannste hier nachlesen" oder "Was genau meinst Du, fang am besten mit dem Huhn und dem Ei an".

Mach et jut

[mirko100]

Die Frage ist ja nun wirklich nicht so schwer zu verstehen !

Du setzt ein event "Keypress" und benötigst anschließend folgenden Code:

if e.keychar = chr(13) then

textfeld1.focus()


end if

PS: Ich mag es auch lieber eine direkte Antwort in Foren zu erhalten, als das ständige "Kannste hier nachlesen" oder "Was genau meinst Du, fang am besten mit dem Huhn und dem Ei an".

Mach et jut

Na alo !!

Das ist ne saubere Antwort

Besten dank an Headhunter

[Albus]

ich denke du solltest genauer dein problem definieren. dann wissen andere auch mehr damit anzufangen...

War doch klar gefragt! Und der Code wohl desshalb auskommentiert, weil er VB6 ist, wir uns aber in VB.NET Forum befinden... Und er in vb 2005 nicht funkt...


Frage zum Focus, achtung ich bin VB-Anfänger.

Excel hat den aktuellen Fokus in Windows, weil dort von VB aus hineingeschrieben wird. Nun will ich zwar sehen, wie sich die Daten in Excel aktualisieren, aber auch ganz normal mit anderen Programmen nebenher arbeiten. Geht im momentan gar nicht, weil Excel den aktuellen Fokus in Windows hat.
Testcode:

    Private Sub Timer1_Tick(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Timer1.Tick
        Dim xlApp As Object

        xlApp = GetObject(, "Excel.Application")
        xlApp.Sheets("Tabelle1").Cells(2, 2) = My.Computer.Clock.LocalTime.ToLongTimeString
        xlApp.Visible = 1
    End Sub

Wie kriege ich es hin, damit im geöffneten Excel die Daten geschrieben werden, man aber ganz normal weiter in Windows mit anderen Programmen arbeiten kann?
ich suche schon wie wild mit google nach Fokus/focus und excel etc. komme aber keinen Schritt weiter, was ich überhaupt machen sollte/könnte.
Danke