当前位置:首页 > 编程学习 > VB.NET中如何扩充字符串进行固定宽度显示

VB.NET中如何扩充字符串进行固定宽度显示

编程学习2007-05-3162490

  在VB.NET中,当你需要在控制台显示数据或准备好打印数据时,可能需要调整列宽以显示固定长度的数据。本文介绍了使用String对象的PadLeft方法和PadRight方法扩充字符串以进行固定宽度显示。


PadLeft和PadRight方法

     PadLeft和PadRight是字符串类的两个方法,可以分别使用它们在字符串的左边和右边填充空格。这两个方法多接受一个代表总长度的整型数,添加的空格数等于填充总长度减去字符串的当前长度。

     注意:在完成将字符串格式化为固定宽度显示的工作时,应该使用固定宽度的字体,例如Courier等,因为固定宽度的字符占有相同的宽度。否则,填充将会无效。

     程序员经常使用的另一个替代方法是使用tab字符来获得近似固定宽度显示格式。使用tabs的一个问题是,当某行长度比能够显示的长度长时,将会对tab进行扩展,这将导致各行不能很好对齐。


     下面代码我们为大家介绍了如何使用PadLeft和PadRight方法显示字符串。(为了运行该例子,我们添加了一个下拉列表ListBox1并将它的字体设置为固定宽度的字体)

Private Sub PadStrings()
    Dim i As Integer = 0
    Dim  strArrSeasons() AsString = {"Winter", "Spring", "Summer", "Fall"}
    Dim  strArrWeather() AsString = {"Cold", "Warm", "Hot", "Cool"}
    PadArray(strArrSeasons, True)
    PadArray(strArrWeather,  False)
    Dim strAll As String
     
    For i = 0 To strArrSeasons.length –  1
        ListBox1.Items.Add(strArrSeasons(i) & "  " &  strArrWeather(i))
    Next
End Sub
     
Private Sub PadArray(ByRef strArray() As String, ByVal bPadLeft As  Boolean)
    Dim i As Integer = 0
    Dim iMaxLength As Integer =  0
    Dim strItem As String
     
    For Each strItem In strArray
        If strItem.Length >  iMaxLength Then iMaxLength = strItem.Length
    Next
     
    For i = 0 To strArray.Length – 1
        If bPadLeft =  TrueThen
            strArray(i) =  strArray(i).PadLeft(iMaxLength)
        Else
            strArray(i) = strArray(i).PadRight(iMaxLength)
        End If
    Next
End Sub


图一显示了运行代码后的结果。

VB.NET中如何扩充字符串进行固定宽度显示  .NET 编程 第1张

图一


在本例中,我们定义了一个整型变量i和两个字符串数组:strArrSeasons和strArrWeather。每个数组赋初值为预定义好的值;然后,我们将每个数组传递给函数PadArray,并指定在字符串的左侧扩充。


扫描二维码推送至手机访问。

版权声明:本文由海阔天空发布,如需转载请注明出处。

本文链接:https://www.apull.net/html/20070531101.html

标签: .NET编程
分享给朋友:
返回列表

上一篇:密码的故事

下一篇:MD5加密VB版

相关文章

密码的故事

密码的故事

密码的故事Billy Hollis 本文是由一个问题引出的。我需要一种将密码保存在加密文件中的方法,因为我需要记住许多密码,但记忆力却已大不如前。我知道有许多商用工具能够做到这一点,但我感到学习  .NET 中的一项新技术真的很有好处。 我用 Visual Basic® .NET  完成了一个简单而完整的程序,用于加密和解密文件,从中学到了许多知识。既然加密对于多种开发都是一个重要问题,本文就介绍一下如何构造这样的程序。 有各种低级别的技术可以用于加密,...

 C++ string类常用函数

C++ string类常用函数

string类的构造函数:string(const char *s);    //用c字符串s初始化 string(int n,char  c);     //用n个字符c初始化此外,string类还支持默认构造函数和复制构造函数,如string s1;string  s2="hello";都是正确的写法。...

VB连接SQLServer数据库操作代码

VB连接SQLServer数据库操作代码

第一步,在ModConString模块中定义一系列变量'定义一个属性过程反映连接字符串Public Property Get conString() As Variant conString = "data source=.;initial catalog=Sims_four;user End Property'定义一个提供者反映数据库类型Public Property Get conProvide() As Variant co...

VBScript 错误信息

VBScript 错误信息

错误代码 信息5 无效的过程调用或参数6 溢出7 内存不够9 下标越界10 数组长度固定或临时锁定11 被零除13 类型不匹配14 字符串空间溢出28 堆栈空间溢出35 Sub或Function未定义48 加载D...