资讯

精准传达 • 有效沟通

从品牌网站建设到网络营销策划,从策略到执行的一站式服务

vb.net转c vb60转net

vb.net 调用C语言可执行程序并传值?

在c语言中每一个变量都有两个属性一个是值,一个是址。比如inta=2;变量a的值是2,变量a的地址,可以用取地址

成都创新互联公司专注于网站建设|成都网站维护公司|优化|托管以及网络推广,积累了大量的网站设计与制作经验,为许多企业提供了网站定制设计服务,案例作品覆盖成都办公窗帘等行业。能根据企业所处的行业与销售的产品,结合品牌形象的塑造,量身设计品质网站。

操作符

获取,即a。因此以C语言的函数传递中具备两种方式传递参数,一种是传址,一种传值。比如voidf1(intv){;}//函数f1v

vb.net代码翻译成c#代码!

public string GetAllData(bool Verbose = true)

{

ListViewItem lvi = default(ListViewItem);

try {

ports.Serial.settings.SetStandard(MyPort, 9600, 0);

ports.Serial.settings.useDTR = 1;

ports.Serial.settings.useRTS = 1;

if ((ports.Serial.Open() == false)) {

return "Failed To Open Port";

}

if (Verbose) {

lvi = status.setMessage("WeatherDuck", "Data Sample", "Begin", true);

lvi.ForeColor = System.Drawing.Color.Blue;

}

System.Threading.Thread.Sleep(por_delay);

ports.Serial.FlushRcv();

ports.Serial.SendString("T");

System.Threading.Thread.Sleep(read_delay);

string Temperature = ports.Serial.ReadString();

if ((Temperature.Length == 0))

return "Failed To Read Temperature";

char[] split = ",".ToCharArray();

string[] temp = Temperature.Split(split, 2);

_tempC = temp[0];

_tempF = temp[1];

if (Verbose)

lvi.SubItems(2).Text = "Done Temperature";

ports.Serial.SendString("H");

System.Threading.Thread.Sleep(read_delay);

_humidity = ports.Serial.ReadString();

if ((_humidity.Length == 0))

return "Failed To Read Humidity";

if (Verbose)

lvi.SubItems(2).Text = "Done Humidity";

ports.Serial.SendString("L");

System.Threading.Thread.Sleep(read_delay);

_lightlevel = ports.Serial.ReadString();

if ((_lightlevel.Length == 0))

return "Failed To Read LightLevel";

if (Verbose)

lvi.SubItems(2).Text = "Done Light Level";

ports.Serial.SendString("F");

System.Threading.Thread.Sleep(read_delay);

_airflow = ports.Serial.ReadString();

if ((_airflow.Length == 0))

return "Failed To Read Air Flow";

if (Verbose)

lvi.SubItems(2).Text = "Done Air Flow";

int i = 0;

while ((true)) {

i = i + 1;

if ((i = sound_delay))

break; // TODO: might not be correct. Was : Exit While

System.Threading.Thread.Sleep(500);

if (Verbose)

lvi.SubItems(2).Text = "Sampling Sound Level: " + i.ToString();

}

ports.Serial.SendString("S");

System.Threading.Thread.Sleep(read_delay);

_soundlevel = ports.Serial.ReadString();

ports.Serial.SendString("S");

System.Threading.Thread.Sleep(read_delay);

_soundlevel = ports.Serial.ReadString();

if ((_soundlevel.Length == 0))

return "Failed To Read Sound Level";

return "Success";

} catch (Exception bug) {

if (Verbose)

status.setMessage("WeatherDuck", bug.Message, "Error", false);

return "Exception During Get Data: " + bug.Message;

} finally {

ports.Serial.Close();

if (Verbose) {

lvi = status.setMessage("WeatherDuck", "Data Sample", "Done", true);

lvi.ForeColor = System.Drawing.Color.Blue;

lvi = status.setMessage("WeatherDuck", "Port Status", "Closed", true);

lvi.ForeColor = System.Drawing.Color.Blue;

}

}

}

如何在vb.net调用c程序

------------------------------------------00000000000000000000000000++++++++++++++++++

怎样将VB代码换成C

可以试试VBto Converter

VBto Converter是一款VB语言转换软件,它支持将MS Visual Basic资源文件(包括源代码)转换成MS VC++ MFC, VC++.NET (CLR), VBNET, C#, J#, Borland C++ Builder, Borland Delphi源文件。

在vs2008中怎样将vb的项目转换成c#的项目?

这需要三个步骤:

第一步:创建一个C#项目,在其中添加相应的窗体和引用,将VB2008中相应窗体上的控件复制到C#相应的窗体上;

第二步:使用C#与VB.NET转换工具软件或者到“”,将VB2008 的代码转换成C#代码。

第三步:工具软件或者在线转换,转换后的代码会有一些错误或者无法转换的部分,进行简单的人工修正。

OK,你成功了!

如何把下面用vb.net语言编写的代码改成c#

给你个网站看

可在线将vb.net代码转成c#的,我用过,还可以的,但是转后也要改动一些。这里还有将c#转vb.net的。

这是我转的:

string[] ArrValue = new string[43];

int Nums;

public void Page_Load(object Sender, EventArgs E)

{

int I;

if (!IsPostBack) {

for (I = 1900; I = 2101; I++) {

ListItem IItem = new ListItem();

IItem.Text = (string)I;

if (I == Year(Now)) {

IItem.Selected = "True";

}

DropYear.items.add(IItem);

}

for (I = 1; I = 12; I++) {

ListItem IItem = new ListItem();

IItem.Text = (string)I;

if (I == Month(Now)) {

IItem.Selected = "True";

}

DropMonth.items.add(IItem);

}

}

DispDetail(Conversion.Val(DropYear.SelectedItem.Text), Conversion.Val(DropMonth.SelectedItem.Text));

}

public void DispDetail(int YYear, int MMonth)

{

System.DateTime theDate;

int theYear;

int theMonth;

int theDay;

int theWeek;

int theFirstNum;

int NumOfMonth;

int i;

string theStr;

theYear = YYear;

theMonth = MMonth;

theDay = 1;

//获得所要查询的月的第一天日期

theDate = DateSerial(theYear, theMonth, theDay);

//确定所要查询的第一天是星期几

theWeek = weekday(theDate);

theFirstNum = theWeek;

//确定所要查询的月的天数

NumOfMonth = GetDayNum(theyear, themonth);

for (i = 0; i = 41; i++) {

ArrValue(i) = "";

}

for (i = 0; i = NumOfMonth - 1; i++) {

ArrValue(theFirstNum - 1 + i) = i + 1;

}

}

public object GetDayNum(int YYear, int MMonth)

{

object functionReturnValue = null;

if (MMonth == 1 | MMonth == 3 | MMonth == 5 | MMonth == 7 | MMonth == 8 | MMonth == 10 | MMonth == 12) {

functionReturnValue = 31;

}

else {

if (MMonth == 4 | MMonth == 6 | MMonth == 9 | MMonth == 11) {

functionReturnValue = 30;

}

else {

if (((YYear % 4 == 0) (YYear % 100 != 0)) | (YYear % 400 == 0)) {

functionReturnValue = 29;

}

else {

functionReturnValue = 28;

}

}

}

return functionReturnValue;

}


文章标题:vb.net转c vb60转net
分享路径:http://cdkjz.cn/article/dooscch.html
多年建站经验

多一份参考,总有益处

联系快上网,免费获得专属《策划方案》及报价

咨询相关问题或预约面谈,可以通过以下方式与我们联系

大客户专线   成都:13518219792   座机:028-86922220