vbnet代码,vb·net

vb.net程序代码怎么写啊

函数百度：

创新互联是一家集网站建设,顺德企业网站建设,顺德品牌网站建设,网站定制,顺德网站建设报价,网络营销,网络优化,顺德网站推广为一体的创新建站企业，帮助传统企业提升企业形象加强企业竞争力。可充分满足这一群体相比中小企业更为丰富、高端、多元的互联网需求。同时我们时刻保持专业、时尚、前沿，时刻以成就客户成长自我，坚持不断学习、思考、沉淀、净化自己，让我们为更多的企业打造出实用型网站。

StrReverse函数 描述返回一个字符串，其中一个指定子字符串的字符顺序是反向的。语法StrReverse(string1)参数string1是一个字符串，它的字符顺序要被反向。如果string1是一个长度为零的字符串("")，则返回一个长度为零的字符串。如果string1为Null，则产生一个错误。

典型的例子是用strReverse函数生成回文数。

例如 StrReverse(i)=i 这就是判断i是否为回文数的一个VB语句

text1.text=StrReverse("abcd")

返回：“dcba

请教一段VB.net代码？请高手指点下

vb.net采用的GDI+实现图形绘制，不再使用VB6的Print、Line等语句

'改成这样试试

Sub Add(ByVal a As Integer, ByVal b As Integer)

a=a+1

b+b+1

End Sub

VB.net中怎么通过代码对textbox中的font下的各个属性进行修改？

通过下面的方法进行修改：

TextBox1.Font = New Font("Arial", 16, FontStyle.Bold)       'Arial字体,大小:16,粗体

'TextBox1.Font = New Font("Arial", 16, FontStyle.Italic)    'Arial字体,大小:16,斜体

'TextBox1.Font = New Font("Arial", 16, FontStyle.Regular)   'Arial字体,大小:16,正常

'TextBox1.Font = New Font("Arial", 16, FontStyle.Strikeout) 'Arial字体,大小:16,删除线

'TextBox1.Font = New Font("Arial", 16, FontStyle.Underline) 'Arial字体,大小:16,下划线

TextBox1.ForeColor = Color.Red  '前景色

VB.NET的简介

VB.net是微软最新平台技术，是.netframeworkSDK的一种语言。VB.net和VC#.net在功能上没有区别。编译以后生成的可执行文件被称为Assembly，即程序集。

VB.net的版本号是VisualBasic7.0，它的运行是建立在CLR(CommonLanguageRuntime)和MSIL(MicrosoftIntermediateLanguage)虚拟器上的。其实，它的机制和Java差不多。

VB.NET的特点

1.真正成为面向对象以及支持继承性的语言。

2.窗体设计器支持可视化继承，并且包含了许多新的特性，比如自动改变窗体大小、资源本地化支持、数据类工具内在支持XML数据。

3.直接建立在.NET的框架结构上，因此开发人员可以充分利用所有.NET平台特性，也可以与其他的.NET语言交互。

4.为Windows应用程序提供了XCOPY部署，开发者不再需要为DLL的版本问题担忧。

VB.net的语言特点：

1.代码托管。被托管的代码享受.netframework提供的安全保障和垃圾回收机制，但是这也同时表明，你的程序被框在Framework里面了。API变得不太方便。

2.强大的面向对象特性。现在VB7已经是一个完全的面向对象程序。

现在VB7已经支持类的各种特性：继承，函数的覆盖，重载，虚拟，隐藏??

3.功能强大，程序界面更标准。

4.程序代码结构化更强，开发环境舒适体贴。

跪求vb.net代码

新建窗口，添加picture控件

利用line()方法画线

line(开始x坐标,开始y坐标)-(结束x坐标,结束y坐标),线的颜色，画线的方式(默认为线，B为矩形无填充，BF为填充的矩形)

For i = 1 To 16

Picture1.Line (0, Picture1.Height / 2)-(i * (Picture1.Width / 16), 0), RGB(255, 0, 0)

Picture1.Line (0, Picture1.Height / 2)-(i * (Picture1.Width / 16), Picture1.Height), RGB(255, 0, 0)

Picture1.Line (Picture1.Width, Picture1.Height / 2)-(i * (Picture1.Width / 16), 0), RGB(0, 255, 0)

Picture1.Line (Picture1.Width, Picture1.Height / 2)-(i * (Picture1.Width / 16), Picture1.Height), RGB(0, 255, 0)

Next i

如果要在窗口上画也可以调用窗口的line方法即form.line()