快速业务通道

在IBM Lotus Domino Designer中使用Java构建应用程序 - 编程入门网

作者 佚名技术 来源 NET编程 浏览 发布时间 2012-06-20

创建函数

关于函数语法,LotusScript 和 Java 有两个主要的不同之处。首先,返回类型放在函数名前面(这与 LotusScript 相反,在 LotusScript 中返回类型放在末尾);第二,Java 使用返回关键字从函数返回值(请参见清单 1)。

清单 1. 创建函数示例

return _type function_name(parameter_type 1 parameter_name 1,   parameter_type2 parameter_name2)  {  // 函数代码 ...   return return_type_object;  }

Java LotusScript
public int product(int x, int y)   {    return x*y;   }

Function product(x As Integer, y As Integer) As Integer     product = x * y    End Function 

Calling the function: int i = product(2,4);   System.out.println(i);

Calling the function: Dim i As Integer   i = product(2, 4)  Print i

创建类

Java 中创建类的语法与 LotusScript 中的类似。它们都使用带有 private/public 选项的类关键字,并且都支持类成员以及类方法。但是,需要注意 LotusScript 类构造方法使用 New 关键字,而 Java 使用无参数的类名称(请参见清单 2 和表 4)。

清单 2. 创建类示例

class class_name  {   type class_member1;   type class_member2;   ....    class _name()  // 构造方法    {     // 构造方法代码    }   return _type class_method1 (parameter list)   {     // 方法代码    }   return _type class_method2(parameter list)   {     // 方法代码    }   ....   }

在IBM Lotus Domino Designer中使用Java构建应用程序(5)

时间:2011-01-24 IBM Oscar Hernandez

表 4. 创建类

Java LotusScript
public class Person   {    private String Name;    private int Age;   public Person()    {      this.Name="";      this.Age=0;    }    public void SetName(String name)    {      this.Name = name;    }    public String GetName()    {      return this.Name;    }    public void SetAge(int age)    {      this.Age = age;    }    public int GetAge()    {      return this.Age;    }    public void AddYears(int i)    {      this.Age = this.Age + i;    }   }

Public Class Person    Private PName As String    Private PAge As Integer    Sub New      PAge = 0       PName = ""    End Sub    Public Property Set Person_Name As String      PName = Person_Name    End Property     Public Property Get Person_Name As String      Person_Name = PName    End Property     Public Property Set Age As Integer       PAge = Age    End Property     Public Property Get Age As Integer       Age = PAge    End Property     Sub AddYears (i As Integer)      PAge = PAge + i    End Sub   End Class

创建类的实例 :

Person p = new Person();   p.SetName("John Doe");   p.SetAge(20);   System.out.println(p.GetName() + " " +p.GetAge());   p.AddYears(5);   System.out.println(p.GetName() + " " +p.GetAge());

创建类的实例 :

Dim p As New Person   p.Person_Name = "John Doe"   p.Age = 20    Messagebox p.Person_Name & " " & Cstr(p.Age)   p.AddYears(5)   Messagebox p.Person_Name & " " & Cstr(p.Age)

凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务,公司网站:http://www.lingzhong.cn 为了给广大客户了解更多的技术信息,本技术文章收集来源于网络,凌众科技尊重文章作者的版权,如果有涉及你的版权有必要删除你的文章,请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息,谢谢!

分享到: 更多

Copyright ©1999-2011 厦门凌众科技有限公司 厦门优通互联科技开发有限公司 All rights reserved

地址(ADD):厦门软件园二期望海路63号701E(东南融通旁) 邮编(ZIP):361008

电话:0592-5908028 传真:0592-5908039 咨询信箱:web@lingzhong.cn 咨询OICQ:173723134

《中华人民共和国增值电信业务经营许可证》闽B2-20100024  ICP备案:闽ICP备05037997号