6ES72741XK300XA0西門子S7-1200仿真器模塊

6ES7274-1XK30-0XA0 SIMATIC S7-1200， 仿真器模塊 SIM 1274 用于 CPU 1217C， 14 個(gè)輸入開關(guān)， 10x 24V DC 輸入端， 4x 1.5V 差分輸入端

SIEMENS西門子

*，質(zhì)量保證，保修一年

專業(yè)銷售及維修西門子各類工控自動化配件;

：S7-200CN、S7-200SMART、S7-300、S7-400、 S7-1200、S7-1500、ET200、LOGO邏西門子可編程控制器輯控制模塊

西門子HMI人機(jī)界面：觸摸屏

西門子變頻器：MM420、MM430、MM440、G110、G120、6SE70

西門子工業(yè)以太網(wǎng)：通訊網(wǎng)卡、通訊電纜、通訊接頭、總線連接器 工控機(jī)、交換機(jī)、自動化軟件等系型號齊全，快速報(bào)價(jià)，買我們的產(chǎn)品無憂所值，我們的產(chǎn)品都承諾質(zhì)保一年，讓您買的省心舒心，用的放心！

初次接觸西門子，初次使用WinCC。

項(xiàng)目有這樣一個(gè)需求：

一方面，需要像Excel那樣顯示表格，一些列是固定文字，一些列是可選的內(nèi)容（備選項(xiàng)目從數(shù)據(jù)庫中讀出），一些是可以手動輸入的列。

另一方面，許多個(gè)頁面均需要這樣的表格，每個(gè)頁面中的表格定義的列并不相同。

想過兩個(gè)方法都有弊端：一是使用Excel嵌入頁面，窗口不好控制，載入速度慢導(dǎo)致切換頁面卡頓；二是使用工具箱自帶表格控件顯示，另畫區(qū)域用于輸出，需要各個(gè)頁面單獨(dú)設(shè)計(jì)，需要根據(jù)鼠標(biāo)位置決定輸出的類型，實(shí)現(xiàn)復(fù)雜，且不可靠。

那就使用獨(dú)立控件來實(shí)現(xiàn)吧——網(wǎng)上現(xiàn)成的一般功能超出所需，并且需要付費(fèi)還可能有兼容性問題——那就自己試著做一個(gè)吧！

思路很簡單：

使用VB6.0工具箱提供的MSHFlexGrid，TextBox和ComboBox控件為基本組件，直接利用MSHFlexGrid的樣式，將TextBox或ComboBox置于MSHFlexGrid之上，且初始是都處于隱藏狀態(tài)，當(dāng)鼠標(biāo)點(diǎn)擊相應(yīng)單元格的時(shí)候，把TextBox或ComboBox移至當(dāng)前單元格處，并使之處于輸入激活狀態(tài)，等待用戶選擇或者填入數(shù)據(jù)，而具體是顯示TextBox還是ComboBox，需要從自制控件的屬性中定義。

當(dāng)年是完成了這樣的一個(gè)作品，并且得到了很好的效果。

幾年之后，又要做一個(gè)工具軟件，也有類似的需求，翻出來，可以用！

雖然，那是2018年，又拿起了1998年的VB6.0；雖然，Win7就快停止更新了，又虛擬機(jī)裝了Xp。

但是，便捷，好用，那就是目的！

所以，

一、技術(shù)只是工具，思維才是靈魂

二、海不辭水 故能成其大

下面是一種自定義表格控件的實(shí)現(xiàn)方法（一次直接在網(wǎng)頁編輯了90%，網(wǎng)頁卡死恢復(fù)后沒了，本次是重寫！ 此處需要贊）

思路：

上面已經(jīng)提到，實(shí)際上就是實(shí)現(xiàn)下面兩個(gè)事件

步驟：

在VB6.0中編寫控件，之后注冊再WinCC中使用

(1)確定控件將要提供的功能。

(2)設(shè)計(jì)控件的外觀。

(3)設(shè)計(jì)控件的接口，即屬性、事件和方法。

(4)實(shí)現(xiàn)控件的接口和功能。

(5)編譯并生成控件文件(.ocx 文件)。

(6)將生成的控件注冊到系統(tǒng)中去。

其中，代碼主要包含三部分：1、編輯屬性2、編輯方法3、控件初始化，具體代碼就不在這貼出來了。

優(yōu)點(diǎn)：

實(shí)際上，實(shí)現(xiàn)這樣一個(gè)拼湊的控件并不夠，如果能夠有利于提高使用效率才更值得考慮。

構(gòu)建控件時(shí)設(shè)計(jì)了幾套“模板”，比如：隔行雙色表格、固定行/列與普通單元格區(qū)分樣式、快速標(biāo)題字號大于單元格字號等等..，這樣能像使用模板一樣，在初始化時(shí)一行代碼即可確定樣式，并能保持各個(gè)實(shí)例的風(fēng)格統(tǒng)一。

實(shí)例：

實(shí)際使用是這樣的：

Private Sub CommandButton_Click()

    '準(zhǔn)備好下拉列表選項(xiàng)的數(shù)據(jù)源，共有三種方式，其中ADO數(shù)據(jù)集方式?jīng)]有列出

 ‘方式一：一維數(shù)組式   

    Dim a(2) As String

    a(0) = "A"

    a(1) = "B"

    a(2) = "C"

‘方式二：分隔符“;”字符串方式

    Dim listStr As String

    listStr = "X;Y"

  '簡易表格樣式模板A：ClassicModeA(FormatString, BodyFontSize, Rows, Flag)

  '參數(shù)為格式化字符串、表中正文文本字號、行數(shù)（包括固定行）、表頭的文字字號與正文字號的差值。

    UserControl11.ClassicModeA "列標(biāo)題1|列標(biāo)題2|列標(biāo)題3|列標(biāo)題4|列標(biāo)題5", 12, 10, 2

    '使用下拉列表式的列

    UserControl11.EditEnable = BoxAndList

    UserControl11.SelectListMode = True

    UserControl11.SLString = "列標(biāo)題2;列標(biāo)題4"

  '數(shù)組參數(shù)作為下拉列表選項(xiàng)BuildSLItems (SLItems, Style, Header, Flag )

‘SLItems：可以是字符串、數(shù)組或者數(shù)據(jù)集對象。Style： 下拉列表的樣式。Header：字段名。Flag：標(biāo)記SLItems是什么類型的值，0為字符串，1為數(shù)組，2為數(shù)據(jù)集對象

    UserControl11.BuildSLItems a, 2, "列標(biāo)題2", 1

    '字符串參數(shù)作為下拉列表選項(xiàng)

    UserControl11.BuildSLItems "X;Y", 2, "列標(biāo)題4", 0

End Sub

按鈕按下后的效果（下圖將三種編輯狀態(tài)通過截圖合成到一張圖片中，實(shí)際使用時(shí)是分別激活其中一個(gè)單元格進(jìn)行編輯）：

6ES72741XK300XA0西門子S7-1200仿真器模塊