///////////modules code///////
public Structure OtherlblName_ST
public Buf_Name() as string
public BufNumber as integer
end Structure
public Buf_Unit(8) as OtherlblName_ST
Buf_Unit(1).Buf_Name(1)=“batch56”
//////////視窗代碼//////////
Label1.text = Buf_Unit(1).Buf_Name(1)
請哪位大神指點一下需要補充哪些代碼
uj5u.com熱心網友回復：
你是要干啥。uj5u.com熱心網友回復：
你需要 做什么，幫你翻譯成 c# 嗎
代碼如下
///////////modules code///////
public struct OtherlblName_ST
{
public string Buf_Name[];
public int BufNumber;
}
public OtherlblName_ST[] Buf_Unit = new OtherlblName_ST[8];
Buf_Unit[0].Buf_Name[0]=“batch56;
//////////視窗代碼//////////
Label1.text = Buf_Unit[0].Buf_Name[0];
uj5u.com熱心網友回復：
修正后的代碼：public struct OtherlblName_ST
{
public string[] Buf_Name;
public int BufNumber;
}
public OtherlblName_ST[] Buf_Unit = new OtherlblName_ST[8];
public void Sub()
{
Buf_Unit[0].Buf_Name[0] = "batch56";
//////////視窗代碼//////////
Label1.text = Buf_Unit[0].Buf_Name[0];
}
uj5u.com熱心網友回復：
以前VB6.0中使的Module code//////
Public Type OtherlblName
Buf_Name(5) As String
Buf_Number As Integer
End Type
Public Other_Unit(8) As OtherlblName
Public sub Buf_Str_Data_TSF()
Dim i As Integer
Dim j As Intege
for i = 1 to 8
for j = 1 to 5
Other_Unit(i).Buf_Name(j) = “bath”
Next j
Next i
End sub
視窗代碼
Private Sub Form_Load()
call Buf_Str_Data_TSF()
Label1.Caption = Other_Unit(i).Buf_Name(j)
End Sub
現在軟體想用VS2015重新寫，想運用上面的方式
轉載請註明出處，本文鏈接：https://www.uj5u.com/net/133023.html
標籤：VB.NET
上一篇：c# 使用MySqlBulkLoader 出現2個問題：
下一篇：tsql = "insert into [Sheet1$](t1) values('123')"這段sql陳述句有什么問題嗎?