VB.net的Java代碼生成配售不必要的空間

您好林試圖讓VB.net應用，使我的插件我在寫這就是vb.net應用程序有VB.net的Java代碼生成配售不必要的空間

Public Class Form1 


    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click 
     Dim s As String = "" 
     Dim i As Integer = 0 
     Dim X As Integer = Int(TextBox2.Text) 
     Dim Z As Integer = Int(TextBox3.Text) 
     Dim YDif As Integer = Int(TextBox4.Text) 
     Dim YStart As Integer = Int(TextBox5.Text) 
     Dim World As String = TextBox6.Text 
     Dim Building As String = TextBox1.Text 
     Dim Y As Integer = 0 
     'Diff * Floor + Start 
     '6 * 0 + start 
     Do Until i = NumericUpDown1.Value 
      Y = (YDif * i) + YStart 
      s = s + "LiftHandeler.Buildings.put(loc(""" + World + """," + Str(X) + "," + Str(Y) + "," + Str(Z) + "), """ + Building + """);" + vbNewLine 
      i = i + 1 
     Loop 
     i = 0 
     Do Until i = NumericUpDown1.Value 
      Y = (YDif * i) + YStart 
      s = s + "LiftHandeler.Floors.put(""" + Building + Str(i + 1) + """,loc(""" + World + """," + Str(X) + "," + Str(Y) + "," + Str(Z) + "));" + vbNewLine 
      i = i + 1 
     Loop 

     s = s + "LiftHandeler.FloorsAmt.put(""" + Building + """, " + Str(NumericUpDown1.Value) + ");" 

     My.Computer.Clipboard.SetText(s) 
    End Sub 
End Class

代碼的Java代碼

輸出應

LiftHandeler.Buildings.put(loc("world", 43, 22, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 26, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 30, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 34, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 38, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 42, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 46, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 50, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 54, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 58, 971), "Andrew"); 
LiftHandeler.Floors.put("Andrew1",loc("world", 43, 22, 971)); 
LiftHandeler.Floors.put("Andrew2",loc("world", 43, 26, 971)); 
LiftHandeler.Floors.put("Andrew3",loc("world", 43, 30, 971)); 
LiftHandeler.Floors.put("Andrew4",loc("world", 43, 34, 971)); 
LiftHandeler.Floors.put("Andrew5",loc("world", 43, 38, 971)); 
LiftHandeler.Floors.put("Andrew6",loc("world", 43, 42, 971)); 
LiftHandeler.Floors.put("Andrew7",loc("world", 43, 46, 971)); 
LiftHandeler.Floors.put("Andrew8",loc("world", 43, 50, 971)); 
LiftHandeler.Floors.put("Andrew9",loc("world", 43, 54, 971)); 
LiftHandeler.Floors.put("Andrew10",loc("world", 43, 58, 971)); 
LiftHandeler.FloorsAmt.put("Andrew", 10);

但代碼輸出，它正在爲

LiftHandeler.Buildings.put(loc("world", 43, 22, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 26, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 30, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 34, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 38, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 42, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 46, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 50, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 54, 971), "Andrew"); 
LiftHandeler.Buildings.put(loc("world", 43, 58, 971), "Andrew"); 
LiftHandeler.Floors.put("Andrew 1",loc("world", 43, 22, 971)); 
LiftHandeler.Floors.put("Andrew 2",loc("world", 43, 26, 971)); 
LiftHandeler.Floors.put("Andrew 3",loc("world", 43, 30, 971)); 
LiftHandeler.Floors.put("Andrew 4",loc("world", 43, 34, 971)); 
LiftHandeler.Floors.put("Andrew 5",loc("world", 43, 38, 971)); 
LiftHandeler.Floors.put("Andrew 6",loc("world", 43, 42, 971)); 
LiftHandeler.Floors.put("Andrew 7",loc("world", 43, 46, 971)); 
LiftHandeler.Floors.put("Andrew 8",loc("world", 43, 50, 971)); 
LiftHandeler.Floors.put("Andrew 9",loc("world", 43, 54, 971)); 
LiftHandeler.Floors.put("Andrew 10",loc("world", 43, 58, 971)); 
LiftHandeler.FloorsAmt.put("Andrew", 10);

通知不必要的空間後，大廈名稱（安德魯），並在所有Floors.put標籤

來源

2015-11-08 Andrew Aubury

樓層數通過更換

s = s + "LiftHandeler.Floors.put(""" + Building + Str(i + 1) + """,loc(""" + World + """," + Str(X) + "," + Str(Y) + "," + Str(Z) + "));" + vbNewLine

隨着

s = s + "LiftHandeler.Floors.put(""" + Building + "" + Str(i + 1).Replace(" ", "") + """,loc(""" + World + """," + Str(X) + "," + Str(Y) + "," +Str(Z) + "));" + vbNewLine

修正問題

來源

2015-11-08 16:30:41

VB.net的Java代碼生成配售不必要的空間

回答

相關問題