WINCC如何使用VB脚本?
一、WINCC如何使用VB脚本?
s("count").write0endiftag(1)=hmiruntime.tags("start_sav").writetag(0)''保存触发变量的状态tag(2)=tag(2)+1iftag(2)>10then''脚本运行10个周期后需要延时执行的脚本内容tag(2)=10‘防止计数溢出endif
二、vb中tab如何使用?
tab:
与 Print # 语句或 Print 方法一起使用,对输出进行定位
语法
Tab[(n)]
可选的 n 参数是在显示或打印列表中的下一个表达式之前移动的列数。若省略此参数,则 Tab 将插入点移动到下一个打印区的起点。这就使 Tab 可用来替换国别中的逗号,此处,逗号是作为十进制分隔符使用的。
说明:如果当前行上的打印位置大于 n,则 Tab 将打印位置移动到下一个输出行的第 n 列上。如果 n 小于 1,则 Tab 将打印位置移动到列 1。如果 n 大于输出行的宽度,则 Tab 函数使用以下公式计算下一个打印位置:
n Mod width
例如,如果 width 是 80,并指定 Tab(90),则下一个打印将从列 10 开始(90/80 的余数)。如果 n 小于当前打印位置,则从下一行中计算出来的打印位置开始打印。如果计算后的打印位置大于当前打印位置,则从同一行中计算出来的打印位置开始打印。
输出行最左端的打印位置总是 1。在使用 Print # 语句将数据写入文件时,最右端的打印位置是输出文件的当前宽度,这一宽度可用 Width # 语句设置。
注意 要确保表格列的宽度足以容纳较宽的字符串。
当 Print 方法与 Tab 函数一起使用时,打印的外观将会被分割为均匀、定宽的列。各列的宽度等于选用字体内以磅数为单位的所有字符的平均宽度。但是,在已打印字符的个数与那些字符所占据的定宽列的数目之间不存在任何关系。例如,大写字母 W 占据超过一个定宽的列,而小写字母 i 则占据少于一个定宽的列。
2.
你输入的数据太大。将 s(10) As Integer改为Long就行了。
代码:
Private Sub cmdsortshow_Click()
Dim k, p, intplace As Long, inttemp As Long, s(10) As Long
For k = 1 To 10
s(k) = InputBox("data=")
Next k
For k = 1 To 9
intplace = k
For p = k + 1 To 10
If s(intplace) > s(p) Then
intplace = p
End If
Next p
inttemp = s(k)
s(k) = s(intplace)
s(intplace) = inttemp
If k < 9 Then
lblsortprompt.Caption = "排序中。。。第" + Str(k) + "趟比较后结果为:"
Else
lblsortprompt.Caption = "排序完成,结果为:"
End If
lblsortingdata.Caption = " "
For p = 1 To 10
lblsortingdata.Caption = lblsortingdata.Caption + Str(s(p))
Next
MsgBox "请观察排序数据变化情况"
Next k
End Sub
三、VB IMAGE控件如何使用?
单击“工程”-“部件”,选中Microsoft Windows Common Control 6.0并确定。这时,我们要用到的控件就出现在左边的工具栏上了。
要做工具栏,首先需要一个叫ImageList的控件来装载图像。在程序界面上添加它,然后右键单击此控件,左键单击“属性”,弹出“属性页”对话框的“图像”,再单击“插入图片”就可以一次性装载图片了(如不满意,以后还可以添加)。图片可在C:\Microsoft Visual Studio\Common\Graphics\Bitmaps\TlBr_W95下选择(这里假设你的VB安装在C盘下)。注意了:在插入图片时给每一张图片注明关键字,以便在引用图片时不至于混乱。如插入“新建”的图片,我们在“关键字”栏注明“New”。
图片有了,接下来在程序界面添加工具栏(ToolBar)。添加后工具栏就出现在菜单下面,右键单击它,选择“属性”,在弹出的“属性页”对话框中的“通用”项作些设置,主要如下两项:
1.“图像列表”:选择ImageList12.“样式”:根据喜爱选择1-trbStandard
四、vb编辑器如何使用?
在窗体出现的情况下,由VB编程环境的菜单中选工具,在其下拉菜单下选菜单编辑器,然后按如下说明操作:
“菜单编辑器”对话框
使用菜单编辑器可以为应用程序创建自定义菜单并定义其属性。
对话框选项
“标题”
使用该选项可以输入菜单名或命令名,这些名字出现在菜单条或菜单之中。
如果想在菜单中建立分隔符条,则应在Caption 框中键入一个连字符 (-)。
为了能够通过键盘访问菜单项,可在一个字母前插入 & 符号。在运行时,该字母带有下划线(& 符号是不可见的),按 ALT 键和该字母就可访问菜单或命令。如果要在菜单中显示 & 符号,则应在标题中连续输入两个 & 符号。
“名称”
允许为菜单项输入控件名。控件名是标识符,仅用于访问代码中的菜单项;它不会出现在菜单中。
“索引”
可指定一个数字值来确定控件在控件数组中的位置。该位置与控件的屏幕位置无关。
“快捷键”
允许为每个命令选定快捷键。
“帮助上下文 ID”
允许为 context ID 指定唯一数值。在 HelpFile 属性指定的帮助文件中用该数值查找适当的帮助主题。
“协调位置”
允许选择菜单的 NegotiatePosition 属性。该属性决定是否及如何在容器窗体中显示菜单。
“复选”
允许在菜单项的左边设置复选标记。通常用它来指出切换选项的开关状态。
“激活的”
由此选项可决定是否让菜单项对事件做出响应,而如果希望该项失效并模糊显示出来,则也可清除事件。
“可视的”
将菜单项显示在菜单上。
“显示窗口列表”
在 MDI 应用程序中,确定菜单控件是否包含一个打开的 MDI 子窗体列表。
“右箭头”
每次单击都把选定的菜单向右移一个等级。一共可以创建四个子菜单等级。
“左箭头”
每次单击都把选定的菜单向上移一个等级。一共可以创建四个子菜单等级。
“上箭头”
每次单击都把选定的菜单项在同级菜单内向上移动一个位置。
“下箭头”
“下箭头”
每次单击都把选定的菜单项在同级菜单内向下移动一个位置。
“菜单列表”
该列表框显示菜单项的分级列表。将子菜单项缩进以指出它们的分级位置或等级。
“下一个”
将选定移动到下一行。
“插入”
在列表框的当前选定行上方插入一行。
“删除”
删除当前选定行。
“确定”
关闭菜单编辑器,并对选定的最后一个窗体进行修改。菜单可以在设计时使用,但在设计时可以通过选定一个菜单,来打开菜单单击事件的“代码”窗口,而不是执行事件代码。
“取消”
关闭菜单编辑器,取消所有修改。
五、VB中日期控件如何使用?
工程-部件,在Microsoft 日历控件 11.0前勾选,添加到工具箱。然后在窗体添加控件。
六、如何使用vb的createobject函数?
1、CreateObject函数简介:创建并返回一个对 ActiveX 对象的引用。
2、CreateObject函数语法 :CreateObject(class,[servername]) ;
3、CreateObject参数简介 :
class必需的;
Variant (String). 要创建的应用程序名称和类;
servername可选的;
Variant (String). 要在其上创建对象的网络服务器名称。
4、CreateObject函数应用 :
每个支持自动化的应用程序都至少提供一种对象类型。例如,一个字处理应用程序可能会提供 Application 对象,Document 对象,以及 Toolbar 对象。 要创建 ActiveX 对象,只需将 CreateObject 返回的对象赋给一个对象变量: ’声明一个对象变量来存放该对象’的引用。Dim as Object 采用后期绑定方式。
Dim ExcelSheet As Object
Set ExcelSheet = CreateObject("Excel.Sheet")
七、使用Vb如何读取串口数据?
VB6.0MsComm控件可以利用OnComm事件连续获取来自外设发送的信号。
基于:
1)MsComm控件的RThreshold 属性不为0和恰当的接收代码。
2)使用电脑主板物理COM口或PCI多串口卡上的COM口COM,这样的COM口是全双工的,发送与接收不会冲突。
3)高质量的接收代码和符合通信协议和数据帧规约的接收处理代码。
实例代码:
Private Sub Form_Load() MSComm1.InputMode = comInputModeBinary '采用二进制传输 MSComm1.InBufferCount = 0 '清空接受缓冲区 MSComm1.OutBufferCount = 0 '清空传输缓冲区 MSComm1.RThreshold = 1 '产生MSComm事件 MSComm1.InBufferSize = 1024 TxtSend = "" TxtSend = "" txtReceive = "" Text2 = ""End SubPrivate Sub MSComm1_OnComm() '接收数据 Dim strBuff As String Select Case MSComm1.CommEvent Case 2 MSComm1.InputLen = 0 strBuff = MSComm1.Input BytReceived() = strBuff jieshou lenInput = Len(strData) Text2 = lenInput \ 2 '数据处理代码 End SelectEnd SubPublic Function jieshou() '接收数据处理为16进制 Dim i As Integer For i = 0 To UBound(BytReceived) If Len(Hex(BytReceived(i))) = 1 Then strData = strData & "0" & Hex(BytReceived(i)) Else strData = strData & Hex(BytReceived(i)) End If Next txtReceive = strDataEnd Function
八、VB如何使用word的域?
一、了解几个与域相关的概念 域是文档中的变量,域分为域代码和域结果。 1、域代码是由域特征字符、域类型、域指令和开关组成的字符串; 2、域结果是域代码所代表的信息。域结果根据文档的变动或相应因素的变化而自动更新。 3、域特征字符是指包围域代码的大括号"{}",它不是从键盘上直接输入的,按键可插入这对域特征字符。 4、域类型就是WORD域的名称,域指令和开关是设定域类型如何工作的指令或开关。 二、实例 1、当前日期域: 域代码{ DATE \* MERGEFORMAT }在文档中每个出现此域代码的地方插入当前日期,其中"DATE"是域类型,"\* MERGEFORMAT"是通用域开关。 2、当前时间域: 域代码 {DATE\@"yyyy'年'M'月'd'日'"\*MERGEFORMAT} 域结果 2009年2月1日 (当天日期)
九、vb中fun函数如何使用?
函数fun的功能是从低位开始依次取出长整型变量s中奇数位上的数,构成一个新数存放在t中。高位仍在高位,低位仍在低位。
fun函数通常在主函数中被调用。
比如int fun(int x,int y),void fun(char* a,char* b) 等等。有先前的定义,就可以在主函数里调用它,比如ans=fun(3,7);或者fun(p1,p2);。
十、excel中如何使用VB编程?
关于这个问题,Excel中可以使用VBA(Visual Basic for Applications)编程,以下是一些常见的VBA操作:
1. 打开VBA编辑器:按下“Alt+F11”或者在开发者选项中点击“Visual Basic”按钮。
2. 编写代码:在VBA编辑器中编写代码,可以使用各种VBA函数和语句来操作Excel工作表和单元格数据。
3. 调试代码:使用调试工具(如断点、单步执行等)来调试代码,发现程序中的错误或问题。
4. 运行代码:将代码保存并执行,可以通过宏来运行代码,也可以通过事件来触发代码执行。
以下是一个简单的VBA代码示例,用于在Excel中插入当前日期:
Sub InsertDate()
ActiveCell.Value = Date
End Sub
在Excel中执行此代码,将在当前活动单元格中插入当前日期。