vb.net发qq,VBNET下载

VB.NET中能否做一个像QQ那样的聊天框,可以输入文字和图片?

第一个问题 qq聊天室 必须能 用vb都可以做

创新互联专注于茄子河网站建设服务及定制,我们拥有丰富的企业做网站经验。 热诚为您提供茄子河营销型网站建设,茄子河网站制作、茄子河网页设计、茄子河网站官网定制、成都微信小程序服务,打造茄子河网络公司原创品牌,更为您提供茄子河网站排名全网营销落地服务。

第二个问题 vb.net插入数学公式 可以把这些公式封装到一个类中,调用就是了

有vb.net 的网上商店可以参考下吗?有的话发一下229747400@qq.com谢谢

可以应用百度Hi通知我

有时间可以解决你的问题

同样的要求也可以通知我

ES:\\100C3BFFB79DC3F4BBFBC69C8DDC4BB9

交易提醒:预付定金是陷阱

VB.NET能编写类似QQ程序的服务端么

可以的,服务器用WIN 2000/NT了,语言只是个工具而已,想实现的目的用所选的工具都能实现,只是实现周期的长短了。vb可以做任何事,比如高级应用,线程等,但要用到API,如果用C/c++就不用API 了,所以工具的选择还是蛮重要的!

vb.net 2008 我想用代码复制一个文件到剪贴板。 用户然后在QQ对话框中右击粘贴就可直接发送。 代码怎么写

复制什么文件呢?

给你举个例子:复制音频文件

Public Class Form1  

'VB.Net复制读取音频文件并复制到剪贴板  

Private Sub Button1_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button1.Click  

Try  

Dim MyData As Byte()  

MyMyData = My.Computer.FileSystem.ReadAllBytes("WindowsXP.wav")  

My.Computer.Clipboard.SetAudio(MyData)  

MessageBox.Show("已经成功将音频数据VB.Net复制到剪贴板!", "51cto提示", MessageBoxButtons.OK, MessageBoxIcon.Information)  

Catch ex As Exception  

MessageBox.Show("将音频数据复制到剪贴板出现错误,请检查音频文件是否已经存在?", "51cto提示", MessageBoxButtons.OK, MessageBoxIcon.Error)  

End Try  

End Sub  

'粘贴剪贴板音频数据并播放  

Private Sub Button2_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button2.Click  

Try  

Dim MyData As Object  

MyMyData = My.Computer.Clipboard.GetData(DataFormats.WaveAudio)  

My.Computer.Audio.Play(MyData, AudioPlayMode.Background)  

Catch ex As Exception  

MessageBox.Show("剪贴板上不存在指定的音频数据!", "51cto提示", MessageBoxButtons.OK, MessageBoxIcon.Error)  

End Try  

End Sub  

'清空剪贴板上的音频数据  

Private Sub Button3_Click(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles Button3.Click  

My.Computer.Clipboard.Clear()  

End Sub  

End Class

完善一下答案,现在所谓的复制粘贴文件操作,只是复制文件的地址,然后copy到指定地址,你要做的就是把文件的地址复制到剪贴板就好。所谓的剪切,也就是copy后多了一个delete功能。大同小异。

有谁搞过vb.net或c#给QQ好友发信息的?怎样实现的,能不能说说

using System;

using System.Collections.Generic;

using System.ComponentModel;

using System.Data;

using System.Drawing;

using System.Text;

using System.Windows.Forms;

using System.Security.Cryptography;

using System.Diagnostics;

namespace QQLogin

{

public partial class QQLoginForm : Form

{

public QQLoginForm()

{

InitializeComponent();

}

UserInfo ui;

private void button1_Click(object sender, EventArgs e)

{

//单用户登陆

if (ui == null)

{

ui = new UserInfo();//如果没有提取出来对象,就创建一个

}

if (ui != null)

{

ui.Username = this.txtUser.Text.Trim();

ui.Password = this.txtPwd.Text;

ui.Type = this.cboType.Text == "正常" ? "41" : "40";

if (this.ValidateInput())

{//验证是否输入完全

if (string.IsNullOrEmpty(ui.Path))

{//判断是否有QQ路径,如果没有就打开对话框来选择一下

DialogResult dr = this.opfQQ.ShowDialog();

if (dr == DialogResult.OK)

{

ui.Path = opfQQ.FileName;//将选择的路径赋值给对象

this.LoginQQ(ui.Username, ui.Password, ui.Type, ui.Path);//登陆QQ

}

}

else

{

this.LoginQQ(ui.Username, ui.Password, ui.Type, ui.Path);

}

}

SerializeHelper.SerializeUserInfo(ui);//每次登陆都序列化保存一次

}

}

private bool ValidateInput()

{//验证是否输入完整

if (this.txtUser.Text == "")

{

this.txtUser.Focus();

return false;

}

else if(this.txtPwd.Text=="")

{

this.txtPwd.Focus();

return false;

}

return true;

}

private void LoginQQ(string user,string pwd,string type,string path)

{//登陆QQ的命令,通过CMD命令来执行

Process MyProcess = new Process();

//设定程序名

MyProcess.StartInfo.FileName = "cmd.exe";

//关闭Shell的使用

MyProcess.StartInfo.UseShellExecute = false;

//重定向标准输入

MyProcess.StartInfo.RedirectStandardInput = true;

//重定向标准输出

MyProcess.StartInfo.RedirectStandardOutput = true;

//重定向错误输出

MyProcess.StartInfo.RedirectStandardError = true;

//设置不显示窗口

MyProcess.StartInfo.CreateNoWindow = true;

//执行强制结束命令

MyProcess.Start();

MyProcess.StandardInput.WriteLine(path+" /start QQUIN:"+user+" PWDHASH:" + EncodeHash.pwdHash(pwd) + " /stat:"+type);//直接结束进程ID

MyProcess.StandardInput.WriteLine("Exit");

}

private void btnExit_Click(object sender, EventArgs e)

{

Application.Exit();

}

private void txtUser_KeyPress(object sender, KeyPressEventArgs e)

{

if ((e.KeyChar '0' || e.KeyChar '9')e.KeyChar!=8)

{//只能输入数字和退格键

e.Handled = true;

}

}

private void QQLoginForm_Load(object sender, EventArgs e)

{

LoadInfo();//单用户获取

}

private void LoadInfo()

{//单用户获取

ui = SerializeHelper.DeserializeUserInfo();//返回获取后对象

if (ui != null)

{

this.txtUser.Text = ui.Username;//填充文本框

this.txtPwd.Text = ui.Password;//填充密码框

this.cboType.SelectedIndex = ui.Type == "41" ? 0 : 1;//选择登陆方式

}

else

{

this.cboType.SelectedIndex = 0;

}

}

private void btnConfig_Click(object sender, EventArgs e)

{

ConfigForm cf = new ConfigForm();

cf.ShowDialog();

LoadInfo();

}

}

}

using System;

using System.Collections.Generic;

using System.ComponentModel;

using System.Data;

using System.Drawing;

using System.Text;

using System.Windows.Forms;

namespace QQLogin

{

public partial class ConfigForm : Form

{

UserInfo ui;

public ConfigForm()

{

InitializeComponent();

}

private void txtPath_Click(object sender, EventArgs e)

{//点击一次文本框,弹出一次对话框来选择QQ路径

DialogResult dr = this.opfQQ.ShowDialog();

if (dr == DialogResult.OK)

{

this.txtPath.Text = opfQQ.FileName;

}

}

private bool ValidateInput()

{//验证是否输入完整

if (this.txtUser.Text == "")

{

this.txtUser.Focus();

return false;

}

else if (this.txtPwd.Text == "")

{

this.txtPwd.Focus();

return false;

}

else if (this.txtPath.Text == "")

{

return false;

}

return true;

}

private void btnCancel_Click(object sender, EventArgs e)

{

this.Close();

}

private void ConfigForm_Load(object sender, EventArgs e)

{

LoadInfo();

}

private void btnSave_Click(object sender, EventArgs e)

{

ui = new UserInfo();

ui.Username = this.txtUser.Text.Trim();

ui.Password = this.txtPwd.Text;

ui.Type = this.cboType.Text == "正常" ? "41" : "40";

ui.Path = this.txtPath.Text;

if (this.ValidateInput())

{

SerializeHelper.SerializeUserInfo(ui);

this.Close();

}

}

private void LoadInfo()

{

ui = SerializeHelper.DeserializeUserInfo();

if (ui != null)

{

this.txtUser.Text = ui.Username;

this.txtPwd.Text = ui.Password;

this.cboType.SelectedIndex = ui.Type == "41" ? 0 : 1;

this.txtPath.Text = ui.Path;

}

else

{

this.cboType.SelectedIndex = 0;

}

}

}

}

你好,我问学过VB.NET,才学一些VB,不知VB。NET如何。我的QQ594470615,请加为好友,以便请教。谢谢。

vb.net和vb就语言来说区别不是很大,但是vb.net是基于dotnet的框架的,功能会强大许多,但是vb.net程序必须在装有dotnet的机子上才能运行(普通xp系统不能运行,但vista、7可以),通用性大大降低

vb是一个简易的语言,如果你有vb基础,那么vb.net会很简单


当前题目:vb.net发qq,VBNET下载
本文地址:http://cdiso.cn/article/hdisii.html

其他资讯