Witamy na forum PC Format Zapraszamy do REJESTRACJI


Użytkownicy przeglądający ten wątek: 1 gości

[VB] POMOCY!!! Ewidentny problem z kartami oraz kilka pytań

#1
[VB] POMOCY!!! Ewidentny problem z kartami oraz kilka pytań
Niestety robię przeglądarkę tym razem przy pomocy Web Kita. Mój problem jest następujący:

Przeglądarka ma mieć karty. Niby wszystko dobrze ale gdy mam dodać kartę, w nowych kartach nie ma okien przeglądarki. A po wpisaniu adresu i potwierdzeniu - aplikacja się ścina na amen a moją winde to aż muli że hej.

To co napisałem wygląda tak:

Kod:
Imports WebKit

Public Class Form1

    Private Sub NarzędziaToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles NarzędziaToolStripMenuItem.Click

    End Sub

    Private Sub OToolStripMenuItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles OToolStripMenuItem.Click

    End Sub

    Private Sub Button5_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button5.Click
        Dim Browser As New WebKitBrowser
        Dim int As Integer = 0
        TabControl1.TabPages.Add("New Page")
        TabControl1.SelectTab(Int)
        Browser.Name = "Web Browser"
        Browser.Dock = DockStyle.Fill
        TabControl1.SelectedTab.Controls.Add(Browser)
        int = int + 1
    End Sub

    Private Sub Form1_Load(ByVal sender As Object, ByVal e As System.EventArgs) Handles Me.Load
        Dim int As Integer = 0
        Dim browser As New WebKitBrowser
        TabControl1.TabPages.Add("New Page")
        Browser.Name = "Web Browser"
        Browser.Dock = DockStyle.Fill
        TabControl1.SelectedTab.Controls.Add(Browser)
        int = int + 1
    End Sub

    Private Sub Button6_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button6.Click
        Dim int As Integer = 0
        If Not TabControl1.TabPages.Count = 1 Then
            TabControl1.TabPages.RemoveAt(TabControl1.SelectedIndex)
            TabControl1.SelectTab(TabControl1.TabPages.Count - 1)
            int = int - 1
        End If
    End Sub

    Private Sub ComboBox1_KeyDown(ByVal sender As Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles ComboBox1.KeyDown
        If e.KeyValue = Keys.Enter Then
            CType(TabControl1.SelectedTab.Controls.Item(0), WebKit.WebKitBrowser).Navigate(ComboBox1.Text)
        End If
    End Sub

    Private Sub ComboBox1_SelectedIndexChanged(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles ComboBox1.SelectedIndexChanged

    End Sub

    Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
        CType(TabControl1.SelectedTab.Controls.Item(0), WebKit.WebKitBrowser).GoBack()
    End Sub

    Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click
        CType(TabControl1.SelectedTab.Controls.Item(0), WebKit.WebKitBrowser).GoForward()
    End Sub

    Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click
        CType(TabControl1.SelectedTab.Controls.Item(0), WebKit.WebKitBrowser).Reload()
    End Sub

    Private Sub Button4_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button4.Click
        CType(TabControl1.SelectedTab.Controls.Item(0), WebKit.WebKitBrowser).Stop()
    End Sub
End Class

I jeszcze takie małe pytanie:

Chcę zrobić do wyżej minionej przeglądarki swój downloader. Taki jak Tutaj . Tylko to podpiąć do mojej przeglądarki tzn. Aby Adres pliku był automatycznie podawany i nie wiem jak do tego dołączyć szybkość pobierania i czas do skończenia.

Kolejne pytanie to jak zrobić własne ustawienia takie jak strona główna, motywy, czyszczenie historii itp. Motywy robię na podobieństwo tego:
Tutaj

Sory że tak dużo. Ale proszę pomóżcie. Z góry dziękuje. Aha ta przeglądarka jest w tamach mojej nauki Visual Basic. (nie na 6 z infy Język)
 System operacyjny: windows_xp_2003 Przeglądarka: firefox
#2
RE: [VB] POMOCY!!! Ewidentny problem z kartami oraz kilka pytań
Kolejny raz piszesz posta pod postem, i odświeżasz wątek. mam je wszystkie powyrzucać?
P.S. Raz zmienną piszesz jako int, a raz jako Int - wielkość liter ma znaczenie.
Pozdrawiam.
Ajgor
 System operacyjny: windows_seven Przeglądarka: firefox
#3
RE: [VB] POMOCY!!! Ewidentny problem z kartami oraz kilka pytań
Niestety dalej to nie rozwiązuje problemu. Dalej na nowej karcie nie ma webkita.

No ale jak było już gdzieś daleko na 3 stronie to co mam zrobić. Napisze ten sam temat jeszcze raz - warn.
 System operacyjny: windows_xp_2003 Przeglądarka: firefox
#4
RE: [VB] POMOCY!!! Ewidentny problem z kartami oraz kilka pytań
I ma być warn. Jeśli było już na trzeciej stronie, to znaczy, że tam jego miejsce. Widocznie nikt nie wie, jak Ci pomóc. Napisałeś, nikt nie odpowiedział i koniec. Nie ma wyciągania z trzeciej strony na przód.
Pozdrawiam.
Ajgor
 System operacyjny: windows_seven Przeglądarka: firefox
#5
RE: [VB] POMOCY!!! Ewidentny problem z kartami oraz kilka pytań
Chyba raczej nikt nie zagląda...
 System operacyjny: windows_xp_2003 Przeglądarka: firefox
Programy: Polecane / Nowe / Inne




Podobne wątki ([VB] POMOCY!!! Ewidentny problem z kartami oraz kilka pytań)
Wątek: Autor Odpowiedzi: Wyświetleń: Ostatni post
  Początki w programowaniu - kilka pytań. Pytajnik 6 8038 26.11.2016, 18:58
Ostatni post: Niyabi
  Mam kilka pytań na temat zawodu programisty FredixGaming 6 8302 25.07.2016, 11:25
Ostatni post: Ajgor
  Unreal Engine 4 kilka pytań DJKAFAR 1 6699 27.10.2015, 11:48
Ostatni post: koneton

Skocz do:


Wybrane wątki ([VB] POMOCY!!! Ewidentny problem z kartami oraz kilka pytań)
Wątek: Autor Odpowiedzi: Wyświetleń: Ostatni post
  Programowanie windy (problem) w C++ mysza2323 2 4069 06.11.2019 23:04
Ostatni post: mysza2323
  Programy w C ~Anonim 1 4439 22.10.2019 17:48
Ostatni post: Szachista
  Książki do nauki C# olek23 14 14784 17.10.2019 13:06
Ostatni post: Ajgor
  Wyświetlanie informacji z bazy danych na stronie www PitPlay 1 5643 16.09.2019 11:18
Ostatni post: Ajgor
  Błąd przy uruchamianiu programu w Java z wiersza poleceń Physicist 3 3585 30.08.2019 14:16
Ostatni post: Physicist
  Python z wiersza poleceń Physicist 15 16621 21.08.2019 20:14
Ostatni post: Physicist
  Transfer plików via FTP Visual Basic FireBytes 3 6673 15.08.2019 07:41
Ostatni post: Szachista
  Menu wysuwane z boku patryk67 1 6197 07.08.2019 12:43
Ostatni post: aht
  Visual Basic Excel l.całkowitą przedstawić w postaci szesnastkowej fugaz 4 8125 18.06.2019 21:36
Ostatni post: fugaz
  Nauka do Olimpiady Informatycznej? piotr0905 1 7638 08.06.2019 16:50
Ostatni post: wlisik
Ściana Prosta gra w Builder C++ Kiranek1 1 7516 31.05.2019 15:20
Ostatni post: Szachista
  Menu (Nie widoczne długie opisy) wanhelsing 5 9648 28.04.2019 19:31
Ostatni post: koneton
  Skrypt usuwający pliki sylwiaa1 2 4175 28.04.2019 15:20
Ostatni post: sylwiaa1
  Środowisko do assemblera Physicist 4 8899 21.04.2019 14:04
Ostatni post: Ajgor
  VBA excel dmjs 6 9024 17.04.2019 10:20
Ostatni post: ptrick