物流信息系统实验分析报告

实验报告书

课程名称：物流信息系统

学生姓名：学号：

所在班级：所在系（部）：物流工程系

指导教师：

实验学期： 2013 ~ 2014 学年第一学期

山东交通学院交通与物流工程

一、实验名称

物流信息系统认识上机

二、时刻

2013年9月14日

三、地点

交通与物流工程实验中心，机房（6207、6205、6103室）

四、指导教师

刘建磊

五、实验目的

通过一般的物流信息系统软件的实际操作，认识这类软件的常见要紧功能，了解物流过程中的库存治理、运输治理、配送治理流程，学会这类软件的差不多操作。

六、实验用仪器设备

计算机、相关物流信息系统软件

七、实验内容与实验步骤

1 使用物流治理系统软件，获知其要紧功能有：

1部门资料设置：对部门资料进行增加、删除、修改、查询等操作，截图如下：

2车辆调度安排：随时掌握司机以及车辆的动态，对车辆进行合理的安排，截图如下：

3车辆资料设置：将车辆以及司机的资料电子化，方便、快捷的对车辆信息进行及时的更新，来对车辆的信息做到进一步的完善，截图如下：

4密码修改：对密码进行简单的修改工作，截图如下：

5物资托运治理：进行物资托运的各项内容设置，比如对托运的物资进行增减，承运单位的各种信息，以及收货单位的各种信息，截图如下：

除以上功能外，该物流治理系统软件还具有物资验收治理、客户资料设置、司机资料设置等。

使用物流物流治理系统软件，获知其要紧功能有：

1物资入库单填写：要紧记录物资的编号、数量、名称等项目，截图如下：

2物资出库单填写：要紧内容和入库单的大体相同，截图如下：

3用户治理：通过密码设置来进行用户的识不与治理，截图如下：

3 使用钢材行业物流治理软件，获知其要紧功能有：

1审核报损出库单：对报损物品进行备注与审核，截图如下：

2查询存款单，截图如下：

一、实验名称

物流信息技术上机

二、时刻

2013年9月18日

三、地点

交通与物流工程实验中心，机房（6207、6205、6103室）

四、指导教师

刘建磊

五、实验目的

熟悉VB的系统环境，了解VB程序的编写、保存和编译的方法过程；掌握差不多语句的使用；掌握表达式的正确书写方法及函数、运算符的正确使用；掌握逻辑表达式及关系表达式的正确书写形式，掌握IF语句单行和块书写格式及其正确使用。

六、实验用仪器设备

计算机、VisualBasic软件

七、实验内容与实验步骤

1 编一程序，程序运行的初始界面如图所示，当用户在文本框中输入姓名，例如输入“张三”，单击“确定”按钮，则程序的运行情况如图1-2所示，假如单击“结束”按钮，即结束程序运行。

源代码：

Private Sub Command1_Click()

Command2.Enabled = False

Text1.Text = ""

End Sub

Private Sub Command2_Click()

End

End Sub

2 设计一个猜数字游戏软件，点击出题按钮，产生一个10到99的随机数，然后在文本框中由用户输入数字，假如结果不对，应提示是大了，依旧小了，否则提示正确。运行界面如图3-1所示。

程序源代码为：

Dim a As Single

Private Sub Command1_Click()

a = Int(Rnd * 90) + 10

End Sub

Private Sub Command2_Click()

Dim b As Single

Dim c As Single

c = a

b = Text1.Text

If c < b Then MsgBox ("您猜的数字大了，加油加油")

If c > b Then MsgBox ("您猜的数字小了，加油加油")

If c = b Then MsgBox ("您猜对了，恭喜恭喜")

Text1.Text = ""

End Sub

Private Sub Command3_Click()

End

End Sub

3 设计一个登陆界面，包含用户名、密码及文本框，确定按钮，退出按钮，并编写代码实现，用户名和密码正确时弹出对话框，提示“欢迎使用该系统”，否则提示“用

户名和密码错误，请重新输入”

截图如下：

写入实现上述内容的一段代码:

Dim a As Single

Dim b As Single

Private Sub Command1_Click()

a = "123"

b = "456"

If Text1.Text = a And Text2.Text = b Then MsgBox ("欢迎使用该系统")

Else

MsgBox ("密码错误，请重新输入")

End If

Text1.Text = ""

Text2.Text = ""

End Sub

一、实验名称

物流信息技术上机

二、时刻

2013年10月12日

三、地点

交通与物流工程实验中心，机房（6207、6205室）

四、指导教师

张良智

五、实验目的

掌握For 语句的使用,掌握Do …Loop{While|Until}两种形式的使用。掌握如何操纵循环条件，防止死循环或不循环。熟练掌握循环条件设置及循环的操纵方法。掌握数组的声明、数组元素的引用,掌握静态数组和动态数组的使用差不,应用数组解决与数组有关的常用问题。

六、实验用仪器设备

计算机、VisualBasic 软件

七、实验内容与实验步骤

1、编一程序，显示出所有的水仙花数。所谓水仙花数是指：一个三位数的各位数

字立方和等于该数字本身。如：153=333351++，因此153是一个水仙花数。

截图如下：

程序源代码为

Private Sub Form_click()