vb.net 提取特定字符串

在VB中是這樣的，沒學過VB.net，你變換一下就可以了

創(chuàng)新互聯(lián)公司是一家專注于做網(wǎng)站、成都網(wǎng)站建設與策劃設計,天峨網(wǎng)站建設哪家好?創(chuàng)新互聯(lián)公司做網(wǎng)站,專注于網(wǎng)站建設十多年,網(wǎng)設計領域的專業(yè)建站公司;建站業(yè)務涵蓋:天峨等地區(qū)。天峨做網(wǎng)站價格咨詢:13518219792

Option

Explicit

Private

Sub

Command1_Click()

Dim

Num(2)

Num(0)

=

Val(Left(Label1.Caption,

2))

Num(1)

=

Val(Mid(Label1.Caption,

3,

1))

Num(2)

=

Val(Right(Label1.Caption,

2))

MsgBox

"Num(0)="

Num(0)

vbCrLf

"Num(1)="

Num(1)

vbCrLf

"Num(2)="

Num(2)

'如果想測試是不是可以計算，可以用這一句

'MsgBox

"Num(0)+1="

Num(0)

+

1

vbCrLf

"Num(1)+1="

Num(1)

+

1

vbCrLf

"Num(2)+1="

Num(2)

+

1

End

Sub

Private

Sub

Form_Load()

Label1.Caption

=

"12345"

End

Sub

vb.net 截取字符串

用正則表達式啊

如果是在webbrowser中，那更簡單了，直接有函數(shù)的可以提取的

但是，你那個TD沒有ID，沒有Name，所以可以用以下方法：

Dim straaa = WebBrowser1.Document.GetElementsByTagName("td")

straaa(num).InnerText 'num是所有td的序號

Vb.net 字符串截取

｛“Xm”：“李明”，“Dh”：“123456”，“Nl”：“30”｝這是個JSON串，在序列化后，可以得到值。你可以使用System.Web.Script.Serialization.JavaScriptSerializer類來完成任務。也可以利用第三方工具比如：Newtonsoft.Json.dll等，來完成任務。

如何使用System.Web.Script.Serialization.JavaScriptSerializer類或第三方工具，網(wǎng)上有大量代碼，或參閱微軟在線幫助。這里就不貼了。

vb.net 如何取出多行字符串中的指定的一行

第一個問題有個簡單的方法，把字符串變量賦值到一個textbox里面,利用textbox.lines實現(xiàn)。如：

dim a as string ="hh12345" vbcrlf "qdq123" vbcrlf "ddd244" vbcrlf "whw266" ’定義變量

textbox1.text=a ‘賦值

message.show(textbox1.lines(2).tostring) ‘顯示第三行內容。

第二個問題結合第一個問題，用循環(huán)逐行查找，就可知道字符串第一次出現(xiàn)在哪行。

vb.net怎么提取字符串？

在VB中是這樣的，沒學過VB.net，你變換一下就可以了

按你說的，用用Left,Right和Mid

Option?Explicit

Private?Sub?Command1_Click()

Dim?Num(2)

Num(0)?=?Val(Left(Label1.Caption,?2))

Num(1)?=?Val(Mid(Label1.Caption,?3,?1))

Num(2)?=?Val(Right(Label1.Caption,?2))

MsgBox?"Num(0)="??Num(0)??vbCrLf??"Num(1)="??Num(1)??vbCrLf??"Num(2)="??Num(2)

'如果想測試是不是可以計算，可以用這一句

'MsgBox?"Num(0)+1="??Num(0)?+?1??vbCrLf??"Num(1)+1="??Num(1)?+?1??vbCrLf??"Num(2)+1="??Num(2)?+?1

End?Sub

Private?Sub?Form_Load()

Label1.Caption?=?"12345"

End?Sub

有問題請追問，滿意請采納！