以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [求助]跳出如下2图所示的错误提示框内容,求帮助?  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=142426)

--  作者:fengwenliuyan
--  发布时间:2019/10/26 17:28:00
--  [求助]跳出如下2图所示的错误提示框内容,求帮助?
1、项目中的“意和表”中的“出库筐架”下拉窗口,填写几个数值,然后点击其他区域,该“出库筐架”所在单元格会显示含有“.”符号的内容,但是再次打开此单元格的下拉窗口后,会发现填写数值的框中会出现“.”符号,然后点击其他区域,此时会跳出如下2图所示的错误提示框内容,求帮助?


图片点击可在新窗口打开查看此主题相关图片如下:1.png
图片点击可在新窗口打开查看

图片点击可在新窗口打开查看此主题相关图片如下:2.png
图片点击可在新窗口打开查看

2、“入库筐架”的下拉窗口填写数值后,该“入库筐架”所在单元格显示的内容含有“入库_”的前缀字符,如何在列名不变的情况下,单元格中去除掉“入库_”的前缀字符?

 下载信息  [文件大小:   下载次数: ]
图片点击可在新窗口打开查看点击浏览该文件:测试1.zip



--  作者:fengwenliuyan
--  发布时间:2019/10/26 17:35:00
--  
密码888
--  作者:有点蓝
--  发布时间:2019/10/26 17:48:00
--  
Dim ary1() As String = {"袋子", "铁箱", "塑箱", "冰盘", "木托", "铁托", "铁架", "大网筐", "小网筐", "油桶", "铁架", "方铁架"}
Dim kg1 As String = ""
For Each s1 As String In ary1
    If e.DataRow(s1) > 0 Then
        kg1 &= e.DataRow(s1) & s1 \' 去掉& "."
    End If
Next

--  作者:fengwenliuyan
--  发布时间:2019/10/26 17:53:00
--  回复:(有点蓝)Dim ary1() As String = {"袋子", "铁...
问题是,这是专门加上去的作为分隔符的?不然,分隔符应该怎么添加?
--  作者:fengwenliuyan
--  发布时间:2019/10/26 21:11:00
--  回复:(有点蓝)Dim ary1() As String = {"袋子", "铁...
那么,要想添加分隔符,应该怎么改呢?
--  作者:fengwenliuyan
--  发布时间:2019/10/27 12:18:00
--  回复:(有点蓝)Dim ary1() As String = {"袋子", "铁...
求帮助
--  作者:有点蓝
--  发布时间:2019/10/27 20:36:00
--  
那么在把值放到文本框之前先把这个分隔符去掉啊
--  作者:fengwenliuyan
--  发布时间:2019/10/28 0:50:00
--  回复:(有点蓝)那么在把值放到文本框之前先把这个分...
放回去应该怎么改?
请直接在上面的测试项目中修改好吗,谢谢!?

--  作者:有点蓝
--  发布时间:2019/10/28 8:42:00
--  
For i As Integer = 0 To arr.Length - 2 Step 2
    If arr(i+1) = "袋子" Then
        e.Form.Controls("TextBox1").text =  arr(i).trim(".")


--  作者:fengwenliuyan
--  发布时间:2019/10/28 9:03:00
--  回复:(有点蓝)For i As Integer = 0 To arr.Length...
谢谢老师