Foxtable(狐表)用户栏目专家坐堂 → 子线程传参


  共有2407人关注过本帖树形打印复制链接

主题:子线程传参

帅哥哟,离线,有人找我吗?
chenjiu6202
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:403 积分:3892 威望:0 精华:0 注册:2013/1/18 21:38:00
子线程传参  发帖心情 Post By:2016/8/20 19:14:00 [显示全部帖子]

如果子线程Public Function PushUpdate(ByVal ActionType As String) As String

定义的一个函数,调用函数执行子线程,怎样把参数带进去


 回到顶部
帅哥哟,离线,有人找我吗?
chenjiu6202
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:403 积分:3892 威望:0 精华:0 注册:2013/1/18 21:38:00
  发帖心情 Post By:2016/8/23 16:13:00 [显示全部帖子]

袍哥,帮我看看哪里不正确

在全局代码里的

Public Sub PushUpdateAry(ByVal ActionType As String,ByVal DataTableName As String,ByVal IdNUM As String)
Dim msg As String = ActionType & "#" & DataTableName & "#" & IdNUM
For Each bd As QQBuddy In QQClient.Buddies
    If bd.Online Then
        QQClient.Send(bd.name, msg)
    End If
Next
'Return msg
End Sub

 

 

DataColChanged里面写的下面这个

 

Dim p As String = IIF(e.DataRow.RowState = DataRowState.Added, "A", "U")
            Dim ary() As String = {p,"人员表",e.DataRow("_Identify")}
            Dim nthread As New System.Threading.Thread(AddressOf PushUpdateAry)
            nthread.start(ary)
现在是不能通过编译,或者提示错误“不是委托的线程”


 回到顶部
帅哥哟,离线,有人找我吗?
chenjiu6202
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:一尾狐 帖子:403 积分:3892 威望:0 精华:0 注册:2013/1/18 21:38:00
  发帖心情 Post By:2016/8/24 9:45:00 [显示全部帖子]

谢谢袍哥,已经好了,感谢!

 回到顶部