2013-05-17 27 views
0

嘿家伙我想通过添加外部类来清理我的表单文件,但我遇到了一个问题。这是说我没有返回值,我会得到一个空的异常。试图从外部文件读取功能

下面是函数:

Public Function writeData() 
    Dim writeFile As StreamWriter = File.CreateText("C:\Users\Nick\documents\visual studio 2010\Projects\LoginFixed\Accounts\" + frmLogin.txtCUser.Text) 
    writeFile.WriteLine("User: " + frmLogin.txtCUser.Text) ' user 
    writeFile.WriteLine("Pass: " + frmLogin.txtCPass.Text) ' pass 
    writeFile.WriteLine("E-mail: " + frmLogin.txtEmail.Text) ' e-mail 
    writeFile.WriteLine("Securite Question 1: " + frmLogin.ComboBox1.Text) 
    writeFile.WriteLine("-------------------") 
    writeFile.Close() 
End Function 

我怎么能返回任何类型的值,在这里当所有我做的是写数据?

编辑:

调用此按钮时cliked:

Dim userData As WriteUserData 
    userData.writeData() 

但它说,它已被分配一个值之前正在使用用户数据。

+0

userData是一个类文件或表格 –

回答

0

更改为调用代码:

Dim userData As New WriteUserData 
userData.writeData() 

我猜WriteUserData是一类的,你使用它之前,没有实例形式。 New关键字将创建一个实例。

0

难道你不应该回报什么吗?使用Sub代替Function

Public Sub WriteData() 
    (...) 
End Sub 

编辑由于编辑

哪里WriteData声明?它是在自己的Form还是在另一个班级?

如果此方法是在自己的表单,您正在处理的按钮点击,你应该只写在事件处理小组:

Private Sub button1_Click(sender as Object, e as EventArgs) Handles button1.Click 
    Me.writeData() 
End Sub 

否则@小李的答案应该解决您的问题。

+0

然后,当我在表单类中指定它时,它说它在它被赋值之前已经被使用。 – Programming16

+0

编辑您的问题并发布产生此警告的代码。我想(不能再深入)你将'writeData'的'结果'分配给某个变量,而你只应该调用它。 –

+0

我点击按钮时调用它:Dim userData As WriteUserData userData.writeData() – Programming16