• Vui lòng đọc nội qui diễn đàn để tránh bị xóa bài viết
  • Tìm kiếm trước khi đặt câu hỏi

[VB.NET]THAY THẾ THEO THỨ TỰ. NHỜ MỌI NGƯỜI GIÚP ĐỠ Ạ.

Nơi trao đổi về các vấn đề trong lập trình Windows Forms, Console dùng cú pháp ngôn ngữ Visual Basic .NET và C#

Điều hành viên: tungblt, vuathongtin

tuananhst2000
Bài viết: 2
Ngày tham gia: T.Sáu 20/01/2017 7:59 pm

[VB.NET]THAY THẾ THEO THỨ TỰ. NHỜ MỌI NGƯỜI GIÚP ĐỠ Ạ.

Gửi bàigửi bởi tuananhst2000 » T.Tư 30/05/2018 1:17 am

Mình có một file rất nhiều từ "Bài". Giờ mình muốn đánh số cho từ "Bài" thành Bài 1, Bài 2, Bài 3,... Mong nhận được sự giúp đỡ. Cảm ơn nhiều ạ.



muaphonui_2010
Thành viên ưu tú
Thành viên ưu tú
Bài viết: 506
Ngày tham gia: T.Sáu 26/11/2010 1:15 pm
Đến từ: TP.HCM
Has thanked: 182 time
Been thanked: 30 time
Liên hệ:

Re: [VB.NET]THAY THẾ THEO THỨ TỰ. NHỜ MỌI NGƯỜI GIÚP ĐỠ Ạ.

Gửi bàigửi bởi muaphonui_2010 » T.Tư 30/05/2018 11:20 am

Bạn thử dùng hàm Replace theo link này thử đúng ý bạn ko nhé
https://www.dotnetperls.com/replace-vbnet

tuananhst2000
Bài viết: 2
Ngày tham gia: T.Sáu 20/01/2017 7:59 pm

Re: [VB.NET]THAY THẾ THEO THỨ TỰ. NHỜ MỌI NGƯỜI GIÚP ĐỠ Ạ.

Gửi bàigửi bởi tuananhst2000 » T.Tư 30/05/2018 11:08 pm

Cảm ơn bạn nhiều. Cái đó không tự đánh số thứ tự được bạn ạ.

Hình đại diện của người dùng
nhatlinh0207
Thành viên tâm huyết
Thành viên tâm huyết
Bài viết: 428
Ngày tham gia: T.Tư 15/08/2012 7:54 pm
Has thanked: 58 time
Been thanked: 51 time

Re: [VB.NET]THAY THẾ THEO THỨ TỰ. NHỜ MỌI NGƯỜI GIÚP ĐỠ Ạ.

Gửi bàigửi bởi nhatlinh0207 » T.Năm 31/05/2018 10:04 am

Dùng tạm
  1.  Dim s As String = "chúng ta có bài là abc, bài là xyz, bài là ?"
  2.         Dim d As Integer = 1
  3.         Dim i As Integer = 1
  4.  
  5.         Do
  6.  
  7.             If i > s.Length - 2 Then
  8.                 Exit Do
  9.             Else
  10.                 Debug.Print(Mid(s, i, 3))
  11.                 If Mid(s, i, 3).ToLower = "bài" Then
  12.                     s = s.Insert(i + 2, " " & d.ToString)
  13.                     d += 1
  14.                 End If
  15.                 i += 1
  16.             End If
  17.         Loop


Quay về “Visual Basic .NET và C# (VB.NET & C#)”

Đang trực tuyến

Đang xem chuyên mục này: Không có thành viên nào trực tuyến.11 khách