Rss & SiteMap

Foxtable(狐表) http://www.foxtable.com

新一代数据库软件,完美融合Access、Foxpro、Excel、vb.net之优势,人人都能掌握的快速软件开发工具!
共13 条记录, 每页显示 10 条, 页签: [1] [2]
[浏览完整版]

标题:如何提取文本中小标题

1楼
ZJZK2018 发表于:2023/10/30 0:35:00
一个文本(已转为string)中有小标题,如何提取?

一、本次招标内容

1、工程概况:本工程位建设内容及规模:(1)水利部分:提标加固海塘5.7km,建

本次招标范围内的工程估算(或概算)造价工程估算总投资87590万元,采用投标资标。

二、投标人资格条件、要求

(一)投标人:

? 1、具有水利部颁发以下2项资质:①水利工程施工监理甲级、②水利工程建设环

2、本次招标接受联合体投标,联合体投标的,应满足下列要求:

三、招标文件的获取

1、本项目招标文件和补充(答疑、澄清)、修改文件以网上下载方式发放。

2、招标文件网上下载时间:2023926日至20231007日。

四、投标文件递交

1、投标文件递交截止时间2023101714:30

2、投标文件递交方式:电子投标文件采用网上递交的方式,上传至浙江省公共资


2楼
有点蓝 发表于:2023/10/30 8:35:00
有什么规则或者标记说明某个文字属于标题?
3楼
ZJZK2018 发表于:2023/11/1 21:11:00
老师好,下面代码如何合并,需求是:
1、每一行就是一个招标公告,公告的小标题可能是“一,二...”,也有可能是“1,2,3,4,...”,如何合并?
2、Exit For 的代码没有起作用?
Dim r As Row = CurrentTable.Current
Dim nms() As String = r("招标公告").split(vbCrlf)
Dim sbs() As String = {"一","二","三","四","五","六","七"}
Dim sbs1() As String = {"1","2","3","4","5","6","7"} 
For Each nm As String In nms
    nm = nm.Trim()
    For Each sb As String In sbs
        If nm.StartsWith(sb)
            Output.Show(nm)
            'End If
            If nm.Contains("招标文件的获取")
                Exit For
            End If
        End If
    Next
Next

For Each nm As String In nms
    nm = nm.Trim()
    If Char.IsDigit(nm.Chars(0)) AndAlso Char.IsDigit(nm.Chars(2)) = False
        Output.Show(nm)
        If nm.Contains("招标文件的获取")
            Exit For
        End If
    End If
Next
4楼
有点蓝 发表于:2023/11/2 8:59:00
Dim sbs() As String = {"一","二","三","四","五","六","七"}
Dim sbs1() As String = {"1","2","3","4","5","6","7"} 
For Each nm As String In nms
    nm = nm.Trim()
    For i as integer = o to sbs.length - 1
dim sb as string = sbs(i)
dim sb1 as string = sbs1(i)
        If nm.StartsWith(sb) orelse nm.StartsWith(sb1)
            Output.Show(nm)
            'End If
            If nm.Contains("招标文件的获取")
                Exit For
            End If
        End If
    Next
Next
5楼
ZJZK2018 发表于:2023/11/2 10:08:00
老师可能我没有说清楚,下面是二个招标公告的小标题,我需的结果是:
2、Exit For 的代码没有起作用?

一、工程概况

二、本次招标内容:

三、投标资格条件

四、招标文件的获取

五、投标文件递交:

 

招标条件

项目概况与招标范围

投标人资格要求

招标文件的获取

投标文件的递交

发布公告的媒介

联系方式


而现在的结果下面这样,红色这部分不要:

一、工程概况

1、温州市域铁路..

2、温州市域铁路S3线一期工程瑞安段..17.5亿元。

二、本次招标内容:

三、投标资格条件

1、同时具有市政公用工程施工总承

2、投标人(以联合体形式参与投标书;

3、投标人及其法….外;




[此贴子已经被作者于2023/11/2 10:09:06编辑过]
6楼
有点蓝 发表于:2023/11/2 10:32:00
那直接判断中文的一二这些数字就行了,去掉阿拉伯数字的判断
7楼
ZJZK2018 发表于:2023/11/2 11:19:00
老师但有些招标公告不是用一、二...,而是用1,2,3...如何处理
8楼
有点蓝 发表于:2023/11/2 11:27:00
那怎么知道1,2,3这些是大标题还是小标题?
9楼
ZJZK2018 发表于:2023/11/2 11:59:00
我要的是不同文件的标题提取,而不是一个文件



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

10楼
有点蓝 发表于:2023/11/2 12:18:00
那怎么知道A文件使用中文做标题,B文件使用数字做标题?
共13 条记录, 每页显示 10 条, 页签: [1] [2]

Copyright © 2000 - 2018 foxtable.com Tel: 4000-810-820 粤ICP备11091905号

Powered By Dvbbs Version 8.3.0
Processed in .03906 s, 2 queries.