Foxtable(狐表)用户栏目专家坐堂 → [求助]提示选确定后的代码如何写?


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

主题:[求助]提示选确定后的代码如何写?

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


加好友 发短信
等级:婴狐 帖子:62 积分:561 威望:0 精华:0 注册:2008/9/17 10:25:00
[求助]提示选确定后的代码如何写?  发帖心情 Post By:2008/11/18 16:33:00 [只看该作者]

Dim YN As DialogResult
YN = MessageBox.Show("请输入客资料", "提示", MessageBoxButtons.YesNo)
If YN = DialogResult.Yes Then
    打开"基本资料",新增一行,光标移到该行"客户名称"
Else
    e.datarow("收货_抵扣") = false 
End if


上面的代码,----打开“基本资料”并新增一行且将光标移到“客户名称”,该怎么写呀

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


加好友 发短信
等级:管理员 帖子:47497 积分:251403 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2008/11/18 16:55:00 [只看该作者]

打开"基本资料",新增一行,光标移到该行"客户名称"

 

With Tables("B")

    .AddNew

    .Select(.RowSel, Tables("B").Cols("第五列").Index)

End With

Maintable = Tables("表B")

[此贴子已经被作者于2008-11-18 17:00:59编辑过]

 回到顶部