vb.net轉c代碼 VBNET編程寶典

vb.net 轉 c#

--VB--

創新互聯基于分布式IDC數據中心構建的平臺為眾多戶提供成都移動云計算中心 四川大帶寬租用 成都機柜租用 成都服務器租用。

Public Function ff() As Boolean

ff=true

End Function

--C#

public bool ff()

{

return true;

}

----

這里的 ff=true 是相當于 C#里的 return true; 是給vb函數自身返回值用的.

--VB--

Private Sub Form_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load

ff=true 'vb里可以省略函數的小括號()

End Sub

--C#--

private void Form_Load(System.Object sender, System.EventArgs e)

{

ff() == true;

}

這里的 ff=true 是相當于 C#里的 ff() == true; 是判斷.

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#

給你個網站看

可在線將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代碼換成C

可以試試VBto Converter

VBto Converter是一款VB語言轉換軟件,它支持將MS Visual Basic資源文件(包括源代碼)轉換成MS VC++ MFC, VC++.NET (CLR), VBNET, C#, J#, Borland C++ Builder, Borland Delphi源文件。

VB.NET object 轉換到C#object問題

你實例化對象看看哈

VB 和C# 的object 在變異的時候是不一樣的,你不做修改正常出錯

object指對象,代表的是通用的對象,就是什么對象都可以表示,new只能表示固定的對象

還有注意一下大小寫object和Object是不一樣的

網頁名稱:vb.net轉c代碼 VBNET編程寶典
文章位置:http://m.kartarina.com/article24/hjgcje.html

成都網站建設公司_創新互聯,為您提供移動網站建設品牌網站設計網頁設計公司營銷型網站建設手機網站建設微信小程序

廣告

聲明:本網站發布的內容(圖片、視頻和文字)以用戶投稿、用戶轉載內容為主,如果涉及侵權請盡快告知,我們將會在第一時間刪除。文章觀點不代表本網站立場,如需處理請聯系客服。電話:028-86922220;郵箱:631063699@qq.com。內容未經允許不得轉載,或轉載時需注明來源: 創新互聯

搜索引擎優化
主站蜘蛛池模板: 无码国产乱人伦偷精品视频| 亚洲av无码天堂一区二区三区| 亚洲av中文无码乱人伦在线播放| 亚洲VA中文字幕无码毛片| 直接看的成人无码视频网站| 无码精品蜜桃一区二区三区WW| 亚洲AV无码一区二区乱孑伦AS| 国产精品成人99一区无码| 久久青青草原亚洲AV无码麻豆| HEYZO无码中文字幕人妻| 99无码精品二区在线视频| 中文字幕精品无码亚洲字| 亚洲AV综合永久无码精品天堂| 中文一国产一无码一日韩| 精品久久久无码人妻字幂| 50岁人妻丰满熟妇αv无码区 | 中文字幕乱码人妻无码久久| 亚洲中文字幕无码av在线| 国产成人精品无码一区二区三区| 亚洲AV成人无码网天堂| 色综合久久久无码网中文| 无码精品久久久天天影视| 夜夜添无码试看一区二区三区| 午夜寂寞视频无码专区| 小12箩利洗澡无码视频网站| 亚洲爆乳精品无码一区二区| 99国产精品无码| 无码人妻精品一区二区三区蜜桃| 亚洲中文字幕无码久久综合网| 中文无码vs无码人妻 | 中文无码成人免费视频在线观看| 伊人久久无码精品中文字幕| 麻豆人妻少妇精品无码专区| 尤物永久免费AV无码网站| 韩国精品一区二区三区无码视频| 亚洲日韩精品无码AV海量| 无码无需播放器在线观看| 国内精品久久久久久无码不卡| 国产精品午夜无码体验区| 成人免费无码H在线观看不卡| 少妇性饥渴无码A区免费|