omron plc怎么写读系统时间的程序

omron plc怎么写读系统时间的程序,第1张

1、首先第一步就是要进行把数据线或者网线插到PLC插口内,一端连接电脑(以太网需要设置电脑IP与PLC CPU 的IP处于同一网段)即可。

2、接着就是要进行从PLC下载最新程序,这时候注意的是打开备份的程序,在线程序,如下图所示。

3、然后这时候就是要进行点击菜单栏,注意的是找到编程选项即可。

4、接着就是点击选择在线编辑选项内的开始,这时候注意的是PLC在所选择的程序条内编辑,(开始编辑的行呈现白色)。

5、最后一步就是修改所选的程序,待修改完成后 *** 作在线编辑菜单内的发送变更。然后就是修改后的程序更新到PLC内,修改就完成了,如下图所示。

'版本号可以用app方式查看

Private Sub Form_Load()

Label1Caption = AppRevision

End Sub

'时间可以参考一下

如果只是查看大小、修改时间的话,可以直接使用VB内建函数:

返回文件修改时间:FileDateTime(文件路径)

返回文件字节大小:FileLen(文件路径)

示例:

Private Sub Form_Load()

Dim sOut As String

Const sFile As String = "C:\\WINDOWS\

otepadexe"

sOut = "文件路径: " & sFile & vbCrLf & _

"修改日期: " & FileDateTime(sFile) & vbCrLf & _

"文件大小: " & FileLen(sFile) & "字节"

MsgBox sOut

End Sub

如果要更多属性,则需要用到FSO。只有运行时确定用户的机器上有且没有禁用“Microsoft Scripting Runtime”。

工程=>引用,钩选“Microsoft Scripting Runtime”,确定。

示例:

Private Sub Form_Load()

Dim sOut As String

Const sFile As String = "C:\\WINDOWS\

otepadexe"

sOut = "文件路径: " & sFile & vbCrLf & _

"创建日期: " & GetFileAttr(sFile, 0) & vbCrLf & _

"修改日期: " & GetFileAttr(sFile, 1) & vbCrLf & _

"访问日期: " & GetFileAttr(sFile, 2) & vbCrLf & _

"文件大小: " & GetFileAttr(sFile, 3) & "字节" & vbCrLf & _

"文件类型: " & GetFileAttr(sFile, 4)

MsgBox sOut

End Sub

Private Function GetFileAttr(sPath As String, iAttr As Integer)

Dim oFSO As New FileSystemObject

Dim oFile As File

Dim sOut As String

Set oFile = oFSOGetFile(sPath)

Select Case iAttr

Case 0 '创建日期

sOut = oFileDateCreated

Case 1 '修改日期

sOut = oFileDateLastModified

Case 2 '访问日期

sOut = oFileDateLastAccessed

Case 3 '文件大小

sOut = oFileSize

Case 4 '文件类型

sOut = oFileType

End Select

GetFileAttr = sOut

End Functio

这个好解决,首先取出系统运行的时间,存放在一个变量里,等待代码执行完毕后,再把当前的时间减去执行前的时间。给你写下代码吧:版本 2支持库 spec局部变量 执行前, 整数型执行前 = 取启动时间 ()计次循环首 (100, ) 调试输出 (“1”)计次循环尾 ()信息框 (到文本 ((取启动时间 () - 执行前) ÷ 1000) + “秒”, 0, )

MediaPlayer mediaPlayer = new MediaPlayer();

mediaPlayersetDataSource("D://aaamp3");

mediaPlayerprepare();

int time = mediaPlayergetDuration();

time就是时长

Private Sub Command1_Click()

Dim fs, f, s

filespec = "d:\1txt"

Set fs = CreateObject("ScriptingFileSystemObject")

Set f = fsGetFile(filespec)

s = UCase(filespec) & vbCrLf

s = s & "Created: " & fDateCreated & vbCrLf '建立时间

s = s & "Last Accessed: " & fDateLastAccessed & vbCrLf '最后访问时间

s = s & "Last Modified: " & fDateLastModified '最后更改时间

MsgBox s, 0, "File Access Info "

End Sub

一 获取当前系统时间和日期并格式化输出:

import javautilDate;

import javatextSimpleDateFormat;

public class NowString {

public static void main(String[] args) {

SimpleDateFormat df = new SimpleDateFormat("yyyy-MM-dd HH:mm:ss");//设置日期格式

Systemoutprintln(dfformat(new Date()));// new Date()为获取当前系统时间

}

}

二 在数据库里的日期只以年-月-日的方式输出,可以用下面两种方法:

1、用convert()转化函数:

String sqlst = "select convert(varchar(10),bookDate,126) as

convertBookDate from roomBook where bookDate between '2007-4-10' and

'2007-4-25'";

Systemoutprintln(rsgetString("convertBookDate"));

2、利用SimpleDateFormat类:

先要输入两个java包:

import javautilDate;

import javatextSimpleDateFormat;

然后:

定义日期格式:SimpleDateFormat sdf = new SimpleDateFormat(yy-MM-dd);

sql语句为:String sqlStr = "select bookDate from roomBook where bookDate between '2007-4-10' and '2007-4-25'";

输出:

Systemoutprintln(dfformat(rsgetDate("bookDate")));

java中获取当前日期和时间的方法

import javautilDate;

import javautilCalendar;

import javatextSimpleDateFormat;

public class TestDate{

public static void main(String[] args){

Date now = new Date();

SimpleDateFormat dateFormat = new SimpleDateFormat("yyyy/MM/dd HH:mm:ss");//可以方便地修改日期格式

String hehe = dateFormatformat( now );

Systemoutprintln(hehe);

Calendar c = CalendargetInstance();//可以对每个时间域单独修改

int year = cget(CalendarYEAR);

int month = cget(CalendarMONTH);

int date = cget(CalendarDATE);

int hour = cget(CalendarHOUR_OF_DAY);

int minute = cget(CalendarMINUTE);

int second = cget(CalendarSECOND);

Systemoutprintln(year + "/" + month + "/" + date + " " +hour + ":" +minute + ":" + second);

}

}

有时候要把String类型的时间转换为Date类型,通过以下的方式,就可以将你刚得到的时间字符串转换为Date类型了。

SimpleDateFormat sdf=new SimpleDateFormat("yyyy-MM-dd");

javautilDate time=null;

try {

time= sdfparse(sdfformat(new Date()));

} catch (ParseException e) {

eprintStackTrace();

}

以上就是关于omron plc怎么写读系统时间的程序全部的内容,包括:omron plc怎么写读系统时间的程序、VB程序如何读取自己的版本号和时间信息、易语言怎么获取代码的执行时间等相关内容解答,如果想了解更多相关内容,可以关注我们,你们的支持是我们更新的动力!

欢迎分享,转载请注明来源:内存溢出

原文地址:https://54852.com/zz/10163409.html

(0)
打赏 微信扫一扫微信扫一扫 支付宝扫一扫支付宝扫一扫
上一篇 2023-05-05
下一篇2023-05-05

发表评论

登录后才能评论

评论列表(0条)

    保存