对象变量或With块变量未设置错误Visual Basic

时间:2013-04-30 11:38:10

标签: vb.net variables object block

我面临的问题是,我正在尝试使用另一种形式的表单中的变量,它给出了错误“对象变量或未设置块变量”。 我已经尝试过使用这些文档,但它很可靠f * * * - up。

我尝试过这种方法:

Public urlpoza, regizor, film, blabla(0 To 9999)
Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click
x = Form1.codfilm
Try
    film(x) = TextBox1.Text
    regizor(x) = TextBox2.Text
    blabla(x) = TextBox3.Text
    urlpoza(x) = TextBox4.Text
    Form1.ListBox1.Items.Add(film(x))
    Form1.ListBox1.Refresh()

Catch ex As NullReferenceException
    MsgBox(ex.Message)
End Try

我尝试在表单2中使用:

Public Shared codfilm As Form1

http://www.dreamincode.net/forums/uploads/monthly_04_2013/post-625768-136731764705.png

我也试过在表格2中使用:

Public urlpoza, regizor, film, blabla(0 To 9999) As String

http://www.dreamincode.net/forums/uploads/monthly_04_2013/post-625768-136731763757.png

但我仍然有同样的问题......任何想法?

1 个答案:

答案 0 :(得分:1)

您已将film声明为:

Public urlpoza, regizor, film, blabla(0 To 9999)

然后你尝试将一个字符串分配给数组中的一个位置:

film(x) = TextBox1.Text

这不起作用。 file不是数组,它可能是一个Object(因此是错误消息)。如果选项显式和选项严格打开 - 这不会编译

尝试明确声明您的变量 - 而不是这样:

Public urlpoza(0 To 9999) As String, regizor(0 To 9999) As String, film(0 To 9999) As String, blabla(0 To 9999) As String