1樓：網海1書生
dim ips1() as string, ips2() as string
dim i as long, ipn as longips1=split(text1.text,vbcrlf)for i=0 to ubound(ips1)ips2=split(ips1(i)," ")if ubound(ips2)=1 then ipn=ipn+(val(split(ips2(1),".")(1))-val(split(ips2(0),".
")(1)))*256*256
next i
msgbox "ip總數為：" & ipn應該是*256，因為0-255是256個數
2樓：失戀的小和尚
你用的是vb6還是。net
3樓：匿名使用者
如果你單純是計算有多少個ip的話，直接算多少個「.」,個數除以3不就是ip數嗎？
VB怎樣讀取指定的文字並顯示
dim tmptxt as string tmpstr as string dim i as integer open d 1.txt for input as 1 tmptxt strconv inputb lof 1 1 vbunicode close 1 tmpstr split tmptxt...
VB如何連續讀取串列埠資料，vb怎樣讀取串列埠資料並進行處理？
vb6.0mscomm控制元件可以利用oncomm事件連續獲取來自外設傳送的訊號。基於 1 mscomm控制元件的rthreshold 屬性不為0和恰當的接收 2 使用電腦主機板物理com口或pci多串列埠卡上的com口com，這樣的com口是全雙工的，傳送與接收不會衝突。3 高質量的接收 和符合通...
VB讀取，並將指定字串替換，VB讀取TXT，並將TXT指定字串替換
檢索 然後判斷左邊或右邊是否是你需要替換的字串，如果是，則替換掉 讀一行替換一行 寫入新檔案。不會vb學呀，三天搞定，聰明點的一天。用readline 讀取txt的每一行，然後用 replace 逐行替換。vb 替換txt文字檔案中的指定字串 5 vb如何讀取txt檔案中指定某行的內容到變數中 vb...