其实这个是对的，只是对了一半
换了其他的RadioButton就不对了
大概意思意思 就是 10万块钱，选中一个RadioButton代表从那个那里取得，用选择 投资还是经营决定， 如果是投资 表示表A 如果是经营表示表B
确定了从那里取得后 要确定是用到那里去， 所有右边的选择RadioButton，同样 选择投资还是还是经营 ，如果是投资 表示表A 如果是经营表示表B
在双方执行的同时，记录对方的去处和来源
比如我是投资（表A），你是经营（表B）
相当于 假如我给你10万元（之间文字输入10），选中左边的投资（表A，我），选择右边的经营（代表表B 你），点击按钮，在投资的表格（表A，我）的去项列输入选中的去项（右边选中经营，代表你，表B）也就是输入经营
同时，收到了10万元，在表B 金额记录10万，来源列 是选中右边的投资（表a，我）
最好理解的就是：左边选中的RadioButton代表的表 的去处列输入右边RadioButton被选中的名称
而：右边选中的RadioButton代表的表 的来源列输入左边的RadioButton选中的名称
这段代码是正确的，只是能记录到 我给你钱的去项和 你收我钱的来向 当我给你钱在你所代表的表 去向列去了那里，和你收到钱在来源列记录我代表的表
不能记录到 你给我钱的去项和 我收你钱的来向 当你给我钱在你所代表的表 去向列 记录我代表的表名 和我收你钱在我代表的表的来源列记录你代表的表名。
感谢 感谢
就是我给你钱 我要在我账本记录去那里， 和同时在你的账本记录这笔钱是那里来的
而选择RadioButton就绝对是输入到谁的账本记录去那里（或那里来）的
在比如，左边选中投资（代表表A）左边选中经营（代表表B），中间输入10万 意思是 在投资中提取10万到经营10万，但是我要记录这10万在投资的去向（也就是右边选中的RadioButton）经营，在经营得到这笔钱，在经营代表的表b 来源列，记录来源那里（也就是左边选中的RadioButton）。
感谢 感谢
If e.Form.Controls("RadioButton1").checked Then
Dim ndrb As DataRow = DataTables("表B").AddNew
ndrb("余额") = e.Form.controls("TextBox1").text
ndrb("提取处") = e.Form.controls("RadioButton1").text '变动去向
End If
If e.Form.Controls("RadioButton2").checked Then
Dim ndrb As DataRow = DataTables("表B").AddNew
ndrb("余额") = e.Form.controls("TextBox1").text
ndrb("提取处") = e.Form.controls("RadioButton2").text '变动去向
End If
If e.Form.Controls("RadioButton3").checked Then
Dim ndrb As DataRow = DataTables("表A").AddNew
ndrb("金额") = e.Form.controls("TextBox1").text
ndrb("去向") = e.Form.controls("RadioButton3").text '变动去向
End If
If e.Form.Controls("RadioButton4").checked Then
Dim ndrb As DataRow = DataTables("表A").AddNew
ndrb("金额") = e.Form.controls("TextBox1").text
ndrb("去向") = e.Form.controls("RadioButton4").text '变动去向
End If
此主题相关图片如下：b-1.jpg
此主题相关图片如下：a.jpg
[此贴子已经被作者于2016/8/24 22:25:13编辑过]
加好友 
发短信
Post By：2016/8/23 23:17:00 [只看该作者]
