parameter未定义

铁佳佳

Dim run As Parameter()
        Dim paramTable As DataTable
        model = asyncConnection.Session.CurrentModel
        run = New Parameter()
        paramTable = run.getModelParam(asyncConnection.Session)
        For i = 0 To paramTable.Rows.Count - 1
            With paramTable.Rows.Item(i)
                If .Item("name") = "LENGTH" Then
                    Me.LengthTxt.text = .Item("value")
                End If
            End With
        Next
        Dim tableRow As DataRow
        model = asyncConnection.Session.CurrentModel
        run = New Parameter()
        paramTable = run.createParamTable()
        tableRow = paramTable.NewRow()
        tableRow("name") = "LENGTH"
        tableRow("value") = Me.lengthTxt.Text
        paramTable.Rows.Add(tableRow)
        run.saveModelParam(asyncConnection.Session.paramTable.False)



这个是在文献上找到的程序 但是一直提示Parameter未定义类型     vs2008的vb  api对proe的二次开发

luoluo-0714

这个太强悍，真心看不懂

铁佳佳

luoluo-0714 发表于 2014-5-2 16:46
这个太强悍，真心看不懂

我也就是看了文献知道点  别的也是菜...

netcf

从上面的这一段程序来看:"Parameter() "的确需要定义类型，你可了解一下VB编程手册

铁佳佳

netcf 发表于 2014-5-7 21:32
从上面的这一段程序来看:"Parameter() "的确需要定义类型，你可了解一下VB编程手册

tanks

shako11

看不懂呀