vb.net输出字符串 vbnet字符串函数

在vb.net中怎么把一个字符串怎么输出到当前计算机桌面上显示呢

在vb2008下，form具有TransparencyKey属性，将窗体的背景色和TransparencyKey颜色设置一致时，窗体会完全透明，显示文字时，给文字不同的颜色，文字会直接显示当前屏幕之上设置form1属性，TransparencyKey=黑色，BackColor=黑色绘制窗体的代码，给文字以不同颜色 Private Sub Form1_Paint(ByVal sender As Object, ByVal e As System.Windows.Forms.PaintEventArgs) Handles Me.Paint

网站建设哪家好，找创新互联！专注于网页设计、网站建设、微信开发、微信平台小程序开发、集团企业网站建设等服务项目。为回馈新老客户创新互联还提供了衡东免费建站欢迎大家使用！

e.Graphics.DrawString("你好", New Font("黑体", 60, FontStyle.Bold), Brushes.Blue, 0, 0)

End Sub 可以设置窗体置顶属性，永远前端显示也可以显示在桌面，用setparent，父窗体为桌面

VB.NET怎么输出指定字符串文本文件

Dim strFilePath As String =SaveFileDialog1.FileName

Dim sw As StreamWriter = New StreamWriter（strFilePath， True） 'true是指以追加的方式打开指定文件

For i = 0 To j

temp = i.ToString

sw.WriteLine（temp）

sw.Flush（）

sw.Close（）

sw = Nothing

如何用VB.NET生成一个随机字符串

用法 RndString(xx) xx为随机数字长度

比如12位长度的随机字符串则为 RndString(12)

字符串包含数字和大小写字母，函数如下：

Function RndString(ByVal l As Integer) As String

Randomize()

Dim R, i As Integer

Dim S As Char

Dim returnStr As String

returnStr = ""

'a-z 的ASCII码是：97-122

'A-Z 的ASCII码是：65-90

'0-9 的ASCII码是：48-57

For i = 1 To l

R = Int(Rnd() * 62) '随机生成的字符有大小写字母和数字，共有26个

If R 10 Then '如果小于10，则是数字数字的ASCII是48-57 对应随机数字 0-9 所以要将随机数字加48

S = Chr(R + 48) 'Chr 是将把数字按Ascii码转换为对应的字符

ElseIf R 36 Then '如果小于36，则是大写字母大写字母的ASCII是65-90 对应随机数字10-35 所以要将随机数字加55

S = Chr(R + 55)

Else '如果大于36，则是小写字母小写字母的ASCII是97-122 对应随机数字36-62 所以要将随机数字加61

S = Chr(R + 61)

End If

returnStr = returnStr + S

RndString = returnStr

End Function

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

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

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

用VB.NET将字节数组转换为字符串

最近我说明了用VB NET将字符串转换成字节数组的方法如果你需要将一个字节数组转换成字符串可以使用BitConverter ToString或Covert ToBase String方法下面我提供实例说明如何用上两种方法进行转换

字节数组用法

如果你准备恢复用二进制格式保存的文本在System Text命名空间中调用适当编码对象的GetString方法

使用System BitConverter类是将一个字节数组转换成字符串的最快捷的方法这个类为基本数据类型和字节数组之间的转换提供方法要使用这个方法使用超载的ToString方法接受一个字节数组为参数在这种情况下字符串中包括字节数组的每一个十六进制格式的值数值间用破折号隔开使用字符串没有办法自动撤销转换恢复原始的字节数组查看列表A中的例子

Listing A

Private Sub ConvertByteArrayToString() Dim btText() As Byte = { } Dim strText As String strText = BitConverter ToString(btText) MessageBox Show(strText) End Sub 通过System Convert类的ToBase String和FromBase Stirng方法利用Base 编码也可以把字节数组转换成字符串在Base 编码中每个三字节的序列被转换为四个字节每个Base 编码字符为值域中个可能值中的一个查看列表B中的例子

Listing B

Private Sub ConvertByteArrayToString() Dim btText() As Byte = { } Dim strText As String strText = Convert ToBase String(btText) MessageBox Show(strText) End Sub 以上两种方法都可以用来建立一个二进制数据表示法记住为了将一个字节数组恢复成真实的文本信息你必须使用正确的编码类

lishixinzhi/Article/program/net/201311/11708

名称栏目：vb.net输出字符串 vbnet字符串函数
分享链接：http://6mz.cn/article/hgccee.html

网站建设知识