Well, I'm making a web browser in VB and most of it does not work right, so can someone convert the code I have to match up what it is in VB2005 (Is it called VB.Net?).
Code:
Private Sub tbToolBar_ButtonClick(ByVal eventSender As System.Object, ByVal eventArgs As System.EventArgs) Handles Back.Click, Forward.Click, _tbToolBar_Button3.Click, _tbToolBar_Button4.Click, _tbToolBar_Button5.Click, _tbToolBar_Button6.Click
Dim Button As System.Windows.Forms.ToolStripItem = CType(eventSender, System.Windows.Forms.ToolStripItem)
On Error Resume Next
timTimer.Enabled = True
Select Case Button.Name
Case "Back"
brwWebBrowser.GoBack()
Case "Forward"
brwWebBrowser.GoForward()
Case "Refresh"
brwWebBrowser.Refresh()
Case "Home"
brwWebBrowser.GoHome()
Case "Search"
brwWebBrowser.GoSearch()
Case "Stop"
timTimer.Enabled = False
brwWebBrowser.Stop()
Me.Text = brwWebBrowser.DocumentTitle
End Select
End Sub Above is the navigation. Forward and Back work, but the rest don't.
Code:
Private Sub cboAddress_KeyPress(ByVal eventSender As System.Object, ByVal eventArgs As System.Windows.Forms.KeyPressEventArgs)
Dim KeyAscii As Short = Asc(eventArgs.KeyChar)
On Error Resume Next
If KeyAscii = System.Windows.Forms.Keys.Enter Then
cboAddress_SelectedIndexChanged(cboAddress, New System.EventArgs())
End If
eventArgs.KeyChar = Chr(KeyAscii)
If KeyAscii = 0 Then
eventArgs.Handled = True
End If
End Sub Above is a small code that when you press "Enter" it is supposed to go to the specified URL. I tried fixing it but I couldn't get it.
I will appreciate it if anyone could help me.