VB.net的Java代码生成配售不必要的空间

Question

您好林试图让VB.net应用，使我的插件我在写这就是vb.net应用程序有

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标签

Answer 1

楼层数通过更换

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 

修正问题