Imports System.IO.FileStream
Public Class Form1
    Inherits System.Windows.Forms.Form
 
' hier wäre noch das von Windowsgenerierter Code...
 
Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As _
  System.EventArgs) Handles Button2.Click
        Dim vname
        Dim nname
        Dim FStream As New FileStream("C:\Dokumente und Einstellungen\All" & _
          "Users\Desktop\Hallo" + vname + nname + ".txt", FileMode.Create, _
          FileAccess.ReadWrite, FileShare.ReadWrite)
 
    End Sub

ANF?NGER...