是否有可用于自动格式化vb.net代码的工具 - 专门用于在预定义的行长度添加换行符?我正在使用大量代码来处理长行(数千行),并且手动重新格式化它非常耗时。我已经看到了许多用于将代码重新排列到区域等的工具,但是没有找到任何重新格式化换行符的工具。免费会很棒。
答案 0 :(得分:2)
尝试让VS自动换行。该选项应该在Tools |中选项|基本|设置|自动换行。
另一件事是去编辑|高级|格式化文档菜单选项,有助于清除空间中没有格式良好的文档。
第三个选项是安装DevExpress的Code Rush Xpress插件,它为代码块的开始和结束添加了非常方便的垂直线,并且还有助于重构代码。你可以从这里得到它:http://devexpress.com/Products/Visual_Studio_Add-in/CodeRushX/。它是免费的,但不支持Visual Studio的Express版本。
答案 1 :(得分:0)
使用Visual Studio 2008,你必须使用Ctrl + A + K + F来格式化你的c#,vb代码
答案 2 :(得分:0)
我知道这是很久以前发布的。但是,如果有人有同样的问题,试试我做的这个子。子将有两个输出(Textbox1 =具有中断的代码,Textbox3 =一个内联代码)。
创建两个文本框(名为Textbox1和Textbox3)和一个按钮(Button1)
创建一个sub(名称你想要的名字)并输入以下代码:
Try
Dim x As String = TextBox1.Text
x = x.Replace("& """, "")
x = x.Replace(""" _", "")
x = x.Replace("""", "")
x = x.Replace(vbNewLine, "")
x = x.Replace(vbTab, "")
While x.Contains(" ") '2 spaces.
x = x.Replace(" ", " ") 'Replace with 1 space.
End While
TextBox3.Text = x
Dim l As Integer = Len(x)
Dim xlim As Integer = InputBox("Specify the maximum number of characters for each line:", "Line Max", 66)
Dim ylim As Double = 0
TextBox1.Text = ""
ylim = l / xlim
If Int(ylim) <> ylim Then
ylim = Int(ylim) + 1
Else
ylim = Int(ylim)
End If
Dim una As String = "", huli As String = ""
Dim mynewstring As String = ""
Dim startin As Integer = 1
For i = 1 To ylim
If i = 1 Then
una = """"
Else
una = vbTab & "& """
End If
If i = ylim Then
huli = """"
Else
huli = """ _"
End If
mynewstring = mynewstring & una & Strings.Mid(x, startin, xlim) & huli & vbNewLine
startin += xlim
Next
TextBox1.Text = mynewstring
Catch ex As Exception
MsgBox(ex.Message)
End Try
P.S。我没有添加代码来恢复原始输入。