将如下代码改写成vb2005的语言，求高手进，给加高分，急急急
using System;using System.Collections.Generic;
using System.ComponentModel;
using System.Data;
using System.Drawing;
using System.Text;
using System.Windows.Forms;
namespace WordToRichTextBox
{
public partial class Form1 : Form
{
public Form1()
{
InitializeComponent();
}
private void Btn_Open_Click(object sender, EventArgs e)
{
OpenFileDialog open = new OpenFileDialog();
if (open.ShowDialog() == DialogResult.OK)
{
Word.Application newApp = new Word.Application();
// 指定原文件和目标文件
object Source = open.FileName;
object Target = Application.StartupPath + "\\temp.rtf"; ;
// 缺省参数
object Unknown = Type.Missing;
//为了保险,只读方式打开
object readOnly = true;
// 打开doc文件
Word.Document doc = newApp.Documents.Open(ref Source, ref Unknown,
ref readOnly, ref Unknown, ref Unknown,
ref Unknown, ref Unknown, ref Unknown,
ref Unknown, ref Unknown, ref Unknown,
ref Unknown, ref Unknown, ref Unknown,
ref Unknown, ref Unknown);
// 指定另存为格式(rtf)
object format = Word.WdSaveFormat.wdFormatRTF;
// 转换格式
doc.SaveAs(ref Target, ref format,
ref Unknown, ref Unknown, ref Unknown,
ref Unknown, ref Unknown, ref Unknown,
ref Unknown, ref Unknown, ref Unknown,
ref Unknown, ref Unknown, ref Unknown,
ref Unknown, ref Unknown);
// 关闭文档和Word程序
doc.Close(ref Unknown, ref Unknown, ref Unknown);
newApp.Quit(ref Unknown, ref Unknown, ref Unknown);
//加载到RichTextBox
rtBox.LoadFile(Application.StartupPath + "\\temp.rtf");
}
}
private void Btn_Exit_Click(object sender, EventArgs e)
{
Application.Exit();
}
}
} VB 编程语言 --------------------编程问答-------------------- 不要做A语言代码修改为B语言代码的无用功。
也不要做用A语言代码直接调用B语言代码库这样复杂、这样容易出错的傻事。
只需让A、B语言代码的输入输出重定向到文本文件，或修改A、B语言代码让其通过文本文件输入输出。
即可很方便地让A、B两种语言之间协调工作。
--------------------编程问答-------------------- 在vb里怎么将doc的文档显示在richtextbox的控件中？？ --------------------编程问答-------------------- c#不挺好吗 干嘛改成vb? --------------------编程问答-------------------- 我也是没办法，这是老师的要求。。 --------------------编程问答-------------------- 晕阿，很简单的东西，LZ少用用心就做出来了。
Word.Document doc = newApp.Documents.Open(ref Source, ref Unknown,
ref readOnly, ref Unknown, ref Unknown,
ref Unknown, ref Unknown, ref Unknown,
ref Unknown, ref Unknown, ref Unknown,
ref Unknown, ref Unknown, ref Unknown,
ref Unknown, ref Unknown);
// 指定另存为格式(rtf)
object format = Word.WdSaveFormat.wdFormatRTF;
// 转换格式
doc.SaveAs(ref Target, ref format,
ref Unknown, ref Unknown, ref Unknown,
ref Unknown, ref Unknown, ref Unknown,
ref Unknown, ref Unknown, ref Unknown,
ref Unknown, ref Unknown, ref Unknown,
ref Unknown, ref Unknown);
最有用的就这三句，而且在VB里几乎以墨一样，
你就把弄个最基本的VB，然后组件加上，定义加上，照抄就出来了。其他的就是打开文件关闭文件，显示文件了！！
这点脑筋也不愿意动么！！！ --------------------编程问答-------------------- 请热心人,帮忙看看下面的求助吧!
请高手帮忙修正一个注册表模块!已经做成工程文件,有详细的实例的!
http://bbs.csdn.net/topics/390428796 --------------------编程问答-------------------- 不是不动脑筋 是楼上所说的那三句在vb里根本就没有支持的组件可供转换的。 --------------------编程问答--------------------
有阿，你的机器里面装word了么？装了就有的
你自己找找吧，不要太早下结论
补充：VB , 基础类
