C#代码也VB

习惯于用某一种语言做开发,时间长了以后很多人可能会对其它语言有排斥或抵触,其实... 退一步海阔天空!

比如:经常看到有人问"如何用c# ping 网址?",园子里搜索了一下:[c#下实现ping操作]这篇算是总结得比较全面了,但其实...如果愿意暂时从C#的世界中退出来环顾一下周围,方法更简单:

先添加对Microsoft.VisualBasic的引用,然后参考下面的代码:

...
using Microsoft.VisualBasic.Devices;
...

Computer myComputer = new Computer();
Boolean ping = myComputer.Network.Ping("www.cnblogs.com");
if (ping)
{
	Response.Write("您的机器可以上博客园!");
}
else
{
	Response.Write("博客园网站无法访问!");
}

再比如:如何用c#做汉字的简<-->繁转换?

using Microsoft.VisualBasic;
...

Response.Write(Strings.StrConv("菩提树下的杨过", VbStrConv.TraditionalChinese, 0));

这样就将简体中文换为繁体了,类似的:

Response.Write(Strings.StrConv("菩提樹下的楊過", VbStrConv.SimplifiedChinese, 0));

这样就可以将繁体中文转换为简体

 

如何得到当前webApplication的程序集名称以运行时目录?

using System;
using Microsoft.VisualBasic.ApplicationServices;

namespace aspxwebForm
{
    public partial class WebForm1 : System.Web.UI.Page
    {
        protected void Page_Load(object sender, EventArgs e)
        {
            ApplicationBase app = new ApplicationBase();
            Response.Write("<br/>程序集名称:" + app.Info.AssemblyName);
            Response.Write("<br/>程序集运行时所在目录:" + app.Info.DirectoryPath);
        }
    }
}

 

如何搜索某目录及其子目录中文件内容包含'abc'的文件?

using System;
using Microsoft.VisualBasic.Devices;
using Microsoft.VisualBasic.FileIO;

namespace aspxwebForm
{
    public partial class WebForm1 : System.Web.UI.Page
    {
        protected void Page_Load(object sender, EventArgs e)
        {
            Computer myComputer = new Computer();
            var list = myComputer.FileSystem.FindInFiles("c:\\temp\\", "abc", true, SearchOption.SearchAllSubDirectories);

            foreach (var item in list)
            {
                Response.Write(item + "<br/>");
            }

        }
    }
}

 

上面的代码将搜索c:\temp以所有子目录中包含"abc"的文件(不区分大小写)

 

文中列出的几个小应用只能算是抛砖引玉,如果大家发现VB.Net中更好玩、更简洁的应用,欢迎回贴.

时间: 2024-10-24 08:51:40

C#代码也VB的相关文章

代码-关于vb.net反编译的问题---请高人指点

问题描述 关于vb.net反编译的问题---请高人指点 背景:使用asp.net做前台页面,后台代码是vb.net.之后使用VS发布网站.发布网站的时候将所有资源(包括aspx/aspx.vb/js/resource等等吧)都打包为DLL.在网站的Bin目录下. 任务:需要将Bin目录下的DLL反编译后获得代码,之后再编译得到代码生成DLL后放到网站发布的Bin目录下.之后重启IIS服务,网站可以正常运行.也就是说页面可以显示出来. 遇到的问题.使用Reflactor反编译代码后,得到vb.ne

access-求登陆界面代码,vb实现

问题描述 求登陆界面代码,vb实现 数据库是用access做的,用vb做的界面设计,怎么实现登陆界面的啊,只需要登陆和确认. 解决方案 VB的form里面加几个编辑框.几个按钮的事情 代码则需要加一个访问access的实现 随便百度一下都一堆

使用Web服务将C#代码转换为VB.NET代码

web|web服务|转换 Internet正在飞速的发展,将来的Web站点不会象今天这样单调,而是可以将它直接与企业.应用程序或设备相连接.这样的站点也摆脱了简单的被动访问而成为可重用智能服务. 本文将说明如何使用www.kamalpatel.net提供的Web服务支持将C#代码转换成VB.NET格式的代码.由于在此文中讲到的内容使用到了Web服务,所以需先添加Web服务引用.在IE里输入如下地址"http://www.kamalpatel.net/convertcsharp2vbservice

这两段世界上最简单的C#代码用VB语法怎么写呢?

问题描述 1,就是传说中的数据库链接类publicstaticSqlConncetioncreateCon(){sqlconnectioncon=.................;returncon;}2,datagrid隐藏列datagrid1.columns[1],visible=false;datagrid1.databind()肯定很简单.但是我今天才接触VB语法比较2.请各位指点! 解决方案 解决方案二:publicsharedfunctioncreateCon()assqlconn

把从网络读取时间的代码从VB代码转到C#代码,变动很大。

问题描述 这是VB.NET的代码,用了createObject的后期绑定方式.要把这种代码转到C#,难度大啊,哈哈哈ModuleModule1'这是一个获取网络时间的模块PublicFunctionGetBJTime()AsDateOnErrorGoToErrNotimeDimoAsObjectDimsTimeAsStringo=CreateObject("WinHttp.WinHttpRequest.5.1")Witho.open("GET","http

VB6.0代码转VB.NET

问题描述 大家好,能否帮我把下面代码转成VB.NET的?谢谢!其实中UnzipPhoto是我引用的外部DLL文件dimstrSQLasstringDimtestAsUnzipPhoto.clsUnzipPhotoDimcnDataBaseAsADODB.ConnectionDimrsExpPortPhotoAsADODB.RecordsetSetrsExpPortPhoto=NewADODB.RecordsetSettest=NewUnzipPhoto.clsUnzipPhotostrSQL="

aspx二维数据排序代码(c#,vb.net)

   代码如下 复制代码 using System; class Program {   static void Main(string[] args)   {   //冒泡排序 循环总共执行次数   int BubbleSortCount = 0;   //改进的冒泡排序 循环总共执行次数   int ImprovedBubbleSortCount = 0;   //冒泡排序所需的临时变量   int temp;   //一个交错二维数组,用于保存测试数据   int[][] arr2 = n

求大神帮我把这段VB代码转下VB.NET,跪求

问题描述 PublicFunctionRC4(inpAsString,keyAsString)AsStringDimS(0To255)AsByte,K(0To255)AsByte,iAsLongDimjAsLong,tempAsByte,YAsByte,tAsLong,xAsLongDimOutpAsStringFori=0To255S(i)=iNextj=1Fori=0To255Ifj>Len(key)Thenj=1K(i)=Asc(Mid(key,j,1))j=j+1Nextij=0Fori

经典常用的VB代码标签

〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓粗体----------------------------------------vB代码标签 bvB代码替换 <b>{param}</b>vB代码示例 粗体vB代码说明 [b] 标签允许你显示粗体文本使用{option}? 否〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓 〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓〓