 |
GregZone Forums
By Greg
|
|
| Author |
Message |
Greg
|
| Wed Feb 15, 2006 7:02 pm {SRC}Cool VB Functions/Edit Menu |
|
|
Make unlimited windows:
Code: Private Sub Command1_Click()
Dim Form1 As New Form1
Form1.Visible = True
End Sub
Copy Selected Text:
Code: Private Sub MnuCpy_Click()
Clipboard.SetText Text1.SelText
End Sub
Cut Selected Text:
Code: Private Sub MnuCut_Click()
Clipboard.SetText Text1.SelText
Text1.SelText = ""
End Sub
Paste Text in Clipboard:
Code: Private Sub MnuPaste_Click()
Text1.SelText = Clipboard.GetText
End Sub
Select all text for specific form item:
Code: Private Sub MnuSel_Click()
Text1.SelStart = 0
Text1.SelLength = Len(Text1.Text)
End Sub |
|
|
|
iluvata
|
| Sat Feb 25, 2006 4:41 am |
|
|
| Do you know codes for back, forward, and home buttons? |
|
|
|
Greg
|
| Sat Feb 25, 2006 9:04 am |
|
|
Yup:
Code: WebBrowser1.GoBack
Code: WebBrowser1.GoForward
Code: WebBrowser1.GoHome
Home is Defined here:
Code: Private Sub Form_Load()
WebBrowser1.Navigate ("http://www.gdbmacro.org/")
End Sub
Replace http://www.gdbmacro.org/ with the site you want it to load to. |
|
|
|
| |
|