下拉列表 选择后显示当前文本。
Function judgepr(tablename,rownum)
Dim temp
temp=Trim(getvaluenum(tablename,"stepprdisp2","stepnum",rownum))
If StrComp(temp,"DEV1",1)=0 Then
judgepr=0
Exit Function
End If
If StrComp(temp,"DEV2",1)=0 Then
judgepr=1
Exit Function
End If
' If StrComp(temp,"DI_Water",1)=0 Then
' judgepr=2
' Exit Function
' End If
' If StrComp(temp,"DY",1)=0 Then
' judgepr=3
' Exit Function
' End If
End Function
我已经把两个参数程序都屏蔽了,为什么运行WINCC还是出现四个参数的选择??
还需要更改哪块程序呢?谢谢。此处控间好象同VB有关,装完VB才能看见有双面箭头控件显示。
我是VBS初学者请大家帮忙。