VB.net實(shí)例

1 生成txt文件。

創(chuàng)新互聯(lián)公司堅(jiān)持“要么做到，要么別承諾”的工作理念，服務(wù)領(lǐng)域包括：網(wǎng)站設(shè)計(jì)、成都網(wǎng)站制作、企業(yè)官網(wǎng)、英文網(wǎng)站、手機(jī)端網(wǎng)站、網(wǎng)站推廣等服務(wù)，滿足客戶于互聯(lián)網(wǎng)時(shí)代的余干網(wǎng)站設(shè)計(jì)、移動媒體設(shè)計(jì)的需求，幫助企業(yè)找到有效的互聯(lián)網(wǎng)解決方案。努力成為您成熟可靠的網(wǎng)絡(luò)建設(shè)合作伙伴！

DimSaveFileDialog1AsNewSaveFileDialog()?'創(chuàng)建一個(gè)保存對話框

SaveFileDialog1.Filter?="txt?files?(*.txt)|*.txt"?'設(shè)置擴(kuò)展名

IfSaveFileDialog1.ShowDialog()?=?System.Windows.Forms.DialogResult.OKThen?'如果確定保存

My.Computer.FileSystem.WriteAllText(SaveFileDialog1.Filename,?Textbox1.Text,False)?'保存文本,False表示不追加文本，直接覆蓋其內(nèi)容

EndIf

原文鏈接：

在VB.NET中加一個(gè)文本框，實(shí)現(xiàn)只能輸入IP地址，像Windows的本地連接 屬性里的那樣

用正則表達(dá)式可以實(shí)現(xiàn):

Regex.IsMatch(this.textBox1.Text, @"^([1-9]|[1-9]\d|1\d{2}|2[0-1]\d|22[0-3])(\.(\d|[1-9]\d|1\d{2}|2[0-4]\d|25[0-5])){3}$")

返回是bool型的,調(diào)試通過了,可以加入到IF語句判斷,樓主可以試試.

如何使用VB訪問NETLINK并讀寫S7300 PLC數(shù)據(jù)

PLC廠家一般都會提供高級語言的控制接口的：

三菱：ComFxPlc / EntQsPlc

歐姆龍： FinsTCP / FinsCom / HostLink

西門子：WinTcpS7 / WinS7_PPI

施耐德： ModbusTCP / ModbusRTU

可以百度一下 ......