请教各位前辈，vb.net删除操作无法对数据集删除，也无法更新到数据库中，哭求各位指教_百度知道
请教各位前辈，vb.net删除操作无法对数据集删除，也无法更新到数据库中，哭求各位指教
ImportsSystem.Data.OleDbPublicClasscostDimcnnAsNewOleDbConnection(&Provider=microsoft.ace.oledb.12.0;DataSource=D:\Backup\我的文档\VisualStudio2010\Projects\企业销售管理系...
Imports System.Data.OleDbPublic Class cost
Dim cnn As New OleDbConnection(&Provider=microsoft.ace.oledb.12.0;Data Source=D:\Backup\我的文档\Visual Studio 2010\Projects\企业销售管理系统\WindowsApplication1\企业销售合同管理.accdb&)
Dim Oledbdataadapater1 As New OleDbDataAdapter()
Private Sub CostBindingNavigatorSaveItem_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles CostBindingNavigatorSaveItem.Click
Me.Validate()
Me.CostBindingSource.EndEdit()
Me.TableAdapterManager.UpdateAll(Me.企业销售合同管理DS)
Private Sub cost_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
'TODO: 这行代码将数据加载到表“企业销售合同管理DS.Cost”中。您可以根据需要移动或删除它。
Me.CostTableAdapter.Fill(Me.企业销售合同管理DS.Cost)
Private Sub btnDel_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles btnDel.Click
'删除当前行
Dim n As Integer
n = Me.BindingContext(企业销售合同管理DS.Cost, &cost&).Position
Me.BindingContext(企业销售合同管理DS.Cost, &cost&).RemoveAt(n)
End SubPrivate Sub BtnUpdate_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles BtnUpdate.Click
Me.BindingContext(企业销售合同管理DS.Cost, &cost&).EndCurrentEdit()
Oledbdataadapater1.Update(企业销售合同管理DS.Cost)
End SubEnd class删除操作时，在n = Me.BindingContext(企业销售合同管理DS.Cost, &cost&).Position报错。显示为：无法创建字段 cost 的子列表
答题抽奖
首次认真答题后
即可获得3次抽奖机会，100%中奖。
小灬默_sir知道合伙人
小灬默_sir
擅长：暂未定制
Me.CostTableAdapter.Fill(Me.企业销售合同管理DS.Cost)是不是fill的参数问题哦
为你推荐：
其他类似问题
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。10:59 提问
请各位看看这段vb.net的代码，是操作word的
Public Sub Textbox1_KeyDown(ByVal sender As System.Object, ByVal e As System.Windows.Forms.KeyEventArgs) Handles TextBox1.KeyDown
If e.KeyCode = Keys.Enter Then
Dim p As String = InputBox("请输入")
Dim WDAPP As Object
WDAPP = CreateObject("Word.Application")
WDAPP.Documents.Add(TextBox1.Text)
WDAPP.Selection.Find.ClearFormatting()
With WDAPP.Selection.Find.Text = p
Dim i As String
i = WDAPP.Selection.Information(3)
WDAPP.Selection.TypeText(text:=p)
WDAPP.documents.add(TextBox2.Text)WDAPP.Selection.MoveDown(Unit:=WDAPP.wdParagraph, Count:=1)
WDAPP.Selection.EndKey()
WDAPP.Selection.ParagraphFormat.TabStops.Add(Position:=WDAPP.CentimetersToPoints(15.24), Alignment:=WDAPP.wdAlignTabRight, Leader:=WDAPP.wdTabLeaderDashes)
WDAPP.Selection.TypeText(Text:=vbTab)
WDAPP.Selection.TypeText(Text:=i)
WDAPP.Selection.TypeText(Text:=vbCrLf)
两个textbox分别是读的文件地址，和写的文件地址。
写上去是没错的，执行的时候粗体的那行就是图片的报错
应该怎么修改，还有我打开那个被写的文件时候说是被绑定了不能操作，这是什么情况
按赞数排序
要确保首先选中
Selection不能为nothing
还是没懂您说的。。。。
“System.MissingMemberException”类型的未经处理的异常在 Microsoft.VisualBasic.dll 中发生
其他信息: 未找到类型“ApplicationClass”的公共成员“wdParagraphs”。
我不知道vb中貌似没有paragraphs这个，但是vba中有。不知道该怎么处理了
准确详细的回答，更有利于被提问者采纳，从而获得C币。复制、灌水、广告等回答会被删除，是时候展现真正的技术了！
其他相关推荐扫二维码下载作业帮
拍照搜题，秒出答案，一键查看所有搜题记录
下载作业帮安装包
扫二维码下载作业帮
拍照搜题，秒出答案，一键查看所有搜题记录
VB.net,小数点直接进一位的函数?Math.Round（）是四舍五入进一位,有哪个函数是直接进一位的?或者有什么办法可以得到以下的结果?N为正整数单位,,保留小数点后两位,a最小=0.01,要获取N个a的值!谢谢~
作业帮用户
扫二维码下载作业帮
拍照搜题，秒出答案，一键查看所有搜题记录
'自定义一个函数：功能是给小数直接进一位'num 　要操作的小数'n　保留几位小数,Function getNumber(num As Double,n As Integer) As DoubleDim a As Doublea = Int(num * (10 ^ n)) / (10 ^ n)If a = num ThengetNu...
为您推荐：
扫描下载二维码我的程序是在32位的电脑上开发的，如果把源代码移到64位的操作系统上会编译成64的程序吗？我用的是VB.NET_百度知道
我的程序是在32位的电脑上开发的，如果把源代码移到64位的操作系统上会编译成64的程序吗？我用的是VB.NET
答题抽奖
首次认真答题后
即可获得3次抽奖机会，100%中奖。
来学习的123456知道合伙人
来学习的123456
采纳数：128
获赞数：498
32位和64位本身就是不一样的代码，你要做的话，肯定要从新安装64位的系统和平台的。
zsliu521知道合伙人
擅长：暂未定制
vb.net 也有版本
最新的2010貌似支持64位系统.你得先从老版本更新到新版本然后让vb.net自己检查代码更新至新款..而后编译修改编译选项即可
谢谢你的回答，我想继续问下，移到64为的电脑上代码还要重新开发吗？还是只做调整就可以了？
匿名用户知道合伙人
不会的，必须是装好64位开发环境重新开发才行
匿名用户知道合伙人
必须是装好64位开发环境重新开发才行
其他1条回答
为你推荐：
其他类似问题
个人、企业类
违法有害信息,请在下方选择后提交
色情、暴力
我们会通过消息、邮箱等方式尽快将举报结果通知您。Given this Short (signed):
I want to:
Extract the most right &HxxFF as SByte (signed)
Extract the left &H7Fxx as Byte (unsigned)
Identify if the most left &H8xxx is positive or negative (bool result)
解决方案 Uh...
value & 0x00ff
(value & 0xff00) && 8
(value & 0xf000) &= 0
EDIT: I suppose you want the byte value and not just the upper 8 bits.
本文地址： &
鉴于这种短（签字）： ＆安培; Hxxxx 我想：提取最右边的＆放大器; HxxFF 作为为SByte（签字）提取左＆放大器; H7Fxx 为字节（无符号）确定是否最左边＆放大器; H8xxx 是正还是负（布尔结果）解决方案 呃......
价值和放大器;设为0x00FF（价值＆安培;为0xFF00）GT;＆GT; 8（价值＆安培; 0xf000）＆GT; = 0 编辑：我想你想的字节值，而不仅仅是高8位。
本文地址： &
扫一扫关注IT屋
微信公众号搜索 “ IT屋 ” ，选择关注
与百万开发者在一起
(window.slotbydup = window.slotbydup || []).push({
id: '5828425',
container: s,
size: '300,250',
display: 'inlay-fix'