vb.net打印字符串,vb窗口打印

vb.net 怎么用print打印字符串到窗口？

vb的函数已经不适合vb.net了，想学vb，得装个vb6。用vb.net的话，使用Debug.WriteLine("hello world")，可以在输出窗口查看到这个信息，这是最简单的，想直接写窗体就得多写几行代码了，具体搜索一下

创新互联公司是一家专业提供北塔企业网站建设,专注与做网站、成都网站制作、H5页面制作、小程序制作等业务。10年已为北塔众多企业、政府机构等服务。创新互联专业网络公司优惠进行中。

VB.NET 打印问题。

先拖过来控件PrintDocument1，然后双击PrintDocument1，在它的PrintPage事件中加入代码如下：

Private Sub PrintDocument1_PrintPage(ByVal sender As System.Object, ByVal e As System.Drawing.Printing.PrintPageEventArgs) Handles PrintDocument1.PrintPage

dim a as String

a="abcd"

Dim mypen As Pen = New Pen(Color.Blue, 2)

e.Graphics.DrawString(a, New Font("宋体", 20), New Pen(Color.Black, 1).Brush, 30, 30)

End Sub

调用下面语句可直接用默认打印机打印出来：

PrintDocument1.Print()

vb.net 如何实现输出一串字符串中的所有字符以及每个字符的出现次数？

使用一个单重的循环扫描这个字符串中的所有字符，对每一个字符的出现次数进行统计，最后输出每个字符的出现次数。

Private Sub Command1_Click()

s = InputBox("请输入一个英文字符串：")

Dim a(128) As Integer

For i = 1 To Len(s)

t = Asc(Mid(s, i, 1))

a(t) = a(t) + 1

Next i

For i = 1 To 127

If a(i) 0 Then Print Chr(i); ":"; a(i)

Next i

End Sub