brarei200

Function

Private Function ReadTextFile(ByVal strFileLocation As String) As String
    	Dim srReader As New System.IO.StreamReader(strFileLocation)
    	Dim strContent As String = srReader.ReadToEnd
    	srReader.Close()
    	Return strContent
	End Function

Usuage

SomeObject = ReadTextFile("Location of Text File")
TextBox1.Text = ReadTextFile("C:\Desktop\File.txt")

Here's a quick little Function I made to save text to text files!


Import Statements

Import System.IO

Function

Private Function SaveTextToFile(ByVal strContent As String, ByVal strFileName As String) As String
   Dim swWriter As New StreamWriter(strFileName)
   swWriter.Write(strContent)
   swWriter.Close()
   Return (strContent)
End Function

Usage

SaveTextToFile("Hello", "Test.txt")

Who do you think will make it to the Superbowl? I think the Patriots and the Eagles will again... hopefully the Eagles :D

The PS3 scene is really heating up, theres already a Customer Firmware made that enables you to permanently install packages! GeoHot is working on some things for the PS3 too (He hacked the iPhones)

Read up on it here,

GeoHot Work in Progress Project - http://www.ps3-hacks...-firmware-3-55/

3.55 CFW - http://www.ps3-hacks...kgs-to-the-xmb/


Sony also replied to this...

We are aware of this, and are currently looking into it. We will  fix the issues through network updates, but because this is a security  issue, we are not able to provide you with any more details.”

but...

Hacking groups don’t believe this will be possible though, telling the  BBC: “The complete console is compromised – there is no way back. The  only way to fix this is to issue new hardware. Sony will have to accept this.”

...and the one guy already downgraded his PS3 from 3.55 to 3.41, can't wait for this stuff to be public! I'm gonna need to buy a second PS3 so I can play online with the one and hack the other one!

You can send keyboard keys programming by using "SendKeys", this tutorial is just a quick tutorial since I don't know how to use it that great...

Step 1 - Create a Project
Step 2 - Create a button on your GUI
Step 3 - Double click the button
Step 4 - Type this code below (it opens notepad)

Process.Start("Notepad.exe")

Step 5 - Enter this code below (sends the keys "abcd" to notepad and demostrates how to use non-letter/number keys (like enter, you need to include the brackets {})

SendKeys.Send("abcd")
SendKeys.Send({Enter}) 

Step 6 - Done
Step 7 - This tutorial isn't to useful but there's much more you can do with SendKeys...