java能否与vb混合编程,VB与JAVA交互

VB与JAVA交互

Private Sub Command1_Click()

Dim dso As New XMLDSOControl

Dim doc As IXMLDOMDocument

Set doc = dso.XMLDocument

Dim rel  As IXMLDOMNodeList

Set x = CreateObject("Microsoft.XMLHTTP")

x.Open "GET", "http://127.0.0.1:8080/emrb/Mrbmodel?action=dis&userid=11&authority=111

", False

x.send

doc.Load (x.responseXML)

Set Tablelist = doc.getElementsByTagName("record")

Tablelen = Tablelist.length

For i = 0 To (Tablelen - 1)

'Text1.Text = Tablelist.Item(i).selectSingleNode("Fremark").Text

Combo1.AddItem (Tablelist.Item(i).selectSingleNode("pn").Text)

Next

End Sub

Private Sub Command2_Click()

a = "A

AAAA%AAAA

AAAAAA

AAA

AAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAAA"

Dim b As String

b = Now

Set x = CreateObject("Microsoft.XMLHTTP")

x.Open "GET", "http://127.0.0.1:8080/printsys/VfmacSelvet?mac

=" + a + "&time=" + b, False

' x.Open "GET", "http://127.0.0.1:8080/printsys/ExcelExport.jsp

, False"

x.send

Text1.Text = x.responseText

End Sub

相关文档：

Java语言反射提供一种动态链接程序组件的多功能方法。它允许程序创建和控制任何类的对象(根据安全性限制)，无需提前硬编码目标类。这些特性使得反射特别适用于创建以非常普通的方式与对象协作的库。例如，反射经常在持续存储对象为数据库、XML或其它外部格式的框架中使用。Java reflection 非常 ......

Java学习从入门到精通

一、 JDK (Java Development Kit)

JDK是整个Java的核心，包括了Java运行环境(Java Runtime Envirnment)，一堆Java工具和Java基础的类库(rt.jar)。不论什么Java应用服务器实质都是内置了某个版本的JDK。因此掌握JDK是学好Java的第一步。最主流的J ......

开发环境  eclipse3.2 (没有配置环境 请参看上一篇日志)

新建项目：

UserCover(名称随便) 做个简单的报道并记录调用server的username

新建包：com.axis2.test

新建接口：

package com.axis2.test;

public interface UserCover {

public void CoverName(String myname);

public String getUserList ......

转载自 http://littlefermat.blog.163.com/blog/static/59771167200962810120843/

Enum作为Sun全新引进的一个关键字，看起来很象是特殊的class, 它也可以有自己的变量，可以定义自己的方法，可以实现一个或者多个接口。当我们在声明一个enum类型时，我们应该注意到enum类型有如下的一些特征。

1．它不能有public的构造函� ......

'创建快捷方式，兼容vista

'要把vb6stkit.DLL放到程序目录

'敖士伟 09-10-27

'只对“桌面”和“开启”有效，其它还没做

'=========开启外部同步程序定义开始

Const SYNCHRONIZE = &H100000

Const INFINITE = &HFFFF 'Wait forever

Const WAIT_OBJECT_0 = 0 'The state of the spe ......