WY_N = InStr(1, Me.Combo11(0).Text, "～") 这句什么意思

谢谢了  对 是这样的
但这个语句好像和instr这个函数的顺序不是很一样

Port_W &H303, DO_5 + DO_3
Port_W &H303, DO_1
还有这两句是什么意思 这是研华的控制板卡上的语句 不是很明白这是什么意思

InStr 函数
      

返回 Variant (Long)，指定一字符串在另一字符串中最先出现的位置。

语法

InStr([start, ]string1, string2[, compare])

InStr 函数的语法具有下面的参数：

部分 说明
start 可选参数。为数值表达式，设置每次搜索的起点。如果省略，将从第一个字符的位置开始。如果 start 包含 Null，将发生错误。如果指定了 compare 参数，则一定要有 start 参数。
string1 必要参数。接受搜索的字符串表达式。
string2 必要参数。被搜索的字符串表达式。
Compare 可选参数。指定字符串比较。如果 compare 是 Null，将发生错误。如果省略 compare，Option Compare 的设置将决定比较的类型。


设置

 compare 参数设置为：

常数 值 描述
vbUseCompareOption -1 使用Option Compare 语句设置执行一个比较。
vbBinaryCompare 0 执行一个二进制比较。
vbTextCompare 1 执行一个按照原文的比较。
vbDatabaseCompare 2 仅适用于Microsoft Access，执行一个基于数据库中信息的比较。


返回值

如果 InStr返回
string1 为零长度 0
string1 为 Null Null
string2 为零长度 Start
string2 为 Null Null
string2 找不到 0
在 string1 中找到string2  找到的位置
start > string2 0


说明

InStrB 函数作用于包含在字符串中的字节数据。所以 InStrB 返回的是字节位置，而不是字符位置。

是呢
Public Declare Function Port_R Lib "dlportio.dll" Alias "DlPortReadPortUchar" (ByVal Port As Long) As Byte
Public Declare Sub Port_W Lib "dlportio.dll" Alias "DlPortWritePortUchar" (ByVal Port As Long, ByVal value As Byte)

Public Declare Sub DlPortWritePortUchar Lib "dlportio.dll" (ByVal Port As Long, ByVal value As Byte)
Public Declare Sub DlPortWritePortUshort Lib "dlportio.dll" (ByVal Port As Long, ByVal value As Integer)
Public Declare Sub DlPortWritePortUlong Lib "dlportio.dll" (ByVal Port As Long, ByVal value As Long)
定义是这样的
不知道 什么意思
dlportio.dll这个文件 不知道怎么来的
请指教 谢谢了

网上去下一个。http://www.
用来操作并口