<?xml version="1.0" encoding="utf-8" ?><rss version="2.0"><channel><title><![CDATA[yangxaoyang的博客]]></title><description><![CDATA[]]></description><link>https://blog.youkuaiyun.com/yangxaoyang</link><language>zh-cn</language><generator>https://blog.youkuaiyun.com/</generator><copyright><![CDATA[Copyright &copy; yangxaoyang]]></copyright><item><title><![CDATA[VB.net在窗体上“写"文字]]></title><link>https://blog.youkuaiyun.com/yangxaoyang/article/details/102726934</link><guid>https://blog.youkuaiyun.com/yangxaoyang/article/details/102726934</guid><author>yangxaoyang</author><pubDate>Thu, 24 Oct 2019 16:51:32 +0800</pubDate><description><![CDATA[从VB6过来的人都知道可以在窗体上打印输出文字，但这招vbnet中就不管用了，但还是能用，下面代码就实现了这个功能。
	
	Dim g As Graphics = Me.CreateGraphics
    g.DrawString("VBNET", Me.Font, Brushes.Black, 0, 0)
    g.Dispose()


...]]></description><category></category></item><item><title><![CDATA[把字符串格式的公式转换为可计算的公式]]></title><link>https://blog.youkuaiyun.com/yangxaoyang/article/details/84888439</link><guid>https://blog.youkuaiyun.com/yangxaoyang/article/details/84888439</guid><author>yangxaoyang</author><pubDate>Fri, 07 Dec 2018 22:45:42 +0800</pubDate><description><![CDATA['一个小型计算器的例子
  Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
        Dim exp As String
        exp = TextBox1.Text
        Dim t As Type = Type.GetTypeFromProgID(&quot;MS...]]></description><category></category></item><item><title><![CDATA[非常简单的一个数组]]></title><link>https://blog.youkuaiyun.com/yangxaoyang/article/details/84888415</link><guid>https://blog.youkuaiyun.com/yangxaoyang/article/details/84888415</guid><author>yangxaoyang</author><pubDate>Fri, 07 Dec 2018 22:42:41 +0800</pubDate><description><![CDATA[Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
Dim a(10) As Integer
For x = 0 To 9
a(x) = x + 1
TextBox1.Text = TextBox1.Text + Str(a(x)) + vbCrLf
Next
End Sub

]]></description><category></category></item></channel></rss>