本文目录一览：

• 1、用vb编写一个小程序程序
• 2、用vb制作小程序——时钟
• 3、如何用VB编写一个自动换行的小程序?
• 4、用vb编一个小程序
• 5、如何用vb制作一个内存优化的小程序?
• 6、如何使用VB编写一个简单的小程序?

用vb编写一个小程序程序

1、首先启动vb0，执行文件-新建命令，弹出新建工程对话框，在该对话框中选择标准的exe后点击打开按钮，进入vb程序主界面。在主界面中，按住鼠标左键按住窗体周围的任意一个小正方形进行拖拽，调节窗体的大小，直至自己满意为止。

2、在桌面上，鼠标左键双击程序，在打开的VB6主界面上，左边是工具菜单栏，单击标签按钮，在Form1窗口上，绘制出一Label1，然后在其属性窗口上改个名字，如Caption为第一数，如下图所示。

3、新建一个文本框Text1，Text属性为空，MultiLine属性为True，ScrollBars属性为2。

4、Private Sub Command1_Click()Dim i As Integer For i = 1 To 100 Print i + 1 Next i End Sub 如果按照你的要求，程序应该是如上，但如上的程序好像没有什么意义，应该是你问错了吧。

5、b(2) = 27 ...赋值 自己写吧 b(8) = 80 Dim c(1 To 8)For i = 1 To 8 c(i) = a(i) + b(i)Print c(i)Next i 窗体单击？要是的话 就是这个程序啦。

用vb制作小程序——时钟

在窗体上画15条线，也就是VB中的line控件，控件数组0~14。

VB可使用Timer控件、Line控件和绘图或加载图片等制作指针式时钟。Timer 控件，通过引发 Timer 事件，Timer 控件可以有规律地隔一段时间执行一次代码。Line 控件，Line 控件是图形控件，它显示水平线、垂直线或者对角线。

这个无需代码，只要建一个窗体并放入StatusBar控件，进入该属性自定义，插入两个窗格，样式分别为sbrtime和sbrdate即可。

窗体布局已经完成，下面就开始正式的程序设计。第一步，刚打开程序时，必须提取出今天的日期。双击窗口的空白处，弹出代码窗口，写入如下代码。绿色的文字是注释，可参考其含义，你们在编写代码时不必写入。

如何用VB编写一个自动换行的小程序?

所以只能用两个text，其中一个自动换行，另一个不自动换行。程序运行后用显示与隐藏实现你需要的功能。

vb6中用鼠标拖放文本框大小。vb6的文本框让文本自动换行的方法是设置它的MultiLine属性为true.vb6全称全称为VisualBasic 0，是微软公司推出的可视化编程工具MSDN之一，是目前世界上使用最广泛的程序开发工具。

Private Sub Command1_Click()t = 我是中国人。他是日本人。你是哪里人。tt = Split(t， 。， -1)LabelCaption = tt(0) & 。LabelCaption = tt(1) & 。LabelCaption = tt(2) & 。

VB0中可以通过对Label控件的WordWrap 属性设置，满足汉字和字母文本换行。

这一种是当你的鼠标想去点击按钮1时就会随机跑动，不让人可以点到。

用vb编一个小程序

在桌面上，鼠标左键双击程序，在打开的VB6主界面上，左边是工具菜单栏，单击标签按钮，在Form1窗口上，绘制出一Label1，然后在其属性窗口上改个名字，如Caption为第一数，如下图所示。

Private Sub Command1_Click()Dim i As Integer For i = 1 To 100 Print i + 1 Next i End Sub 如果按照你的要求，程序应该是如上，但如上的程序好像没有什么意义，应该是你问错了吧。

去下载一个VB0的MSDN 帮助。只是些公式函数而已。MSDN里有例子。

如何用vb制作一个内存优化的小程序?

在桌面上，鼠标左键双击程序，在打开的VB6主界面上，左边是工具菜单栏，单击标签按钮，在Form1窗口上，绘制出一Label1，然后在其属性窗口上改个名字，如Caption为第一数。

新建一个文本框Text1，Text属性为空，MultiLine属性为True，ScrollBars属性为2。

Private Sub Command1_Click()Dim i As Integer For i = 1 To 100 Print i + 1 Next i End Sub 如果按照你的要求，程序应该是如上，但如上的程序好像没有什么意义，应该是你问错了吧。

这一种是当你的鼠标想去点击按钮1时就会随机跑动，不让人可以点到。

如何使用VB编写一个简单的小程序?

打开你的vb程序，添加一个标准工程，如图，单机打开 待你进行编程的界面 添加三个line控件，一个timer控件，一个shape控件，（双击控件即可添加一个）修改timer的属性，在右侧的属性窗口内。

在桌面上，鼠标左键双击程序，在打开的VB6主界面上，左边是工具菜单栏，单击标签按钮，在Form1窗口上，绘制出一Label1，然后在其属性窗口上改个名字，如Caption为第一数，如下图所示。

方法二：LABEL1复制粘贴为组控件 Private Sub Command1_Click()t = 我是中国人。他是日本人。你是哪里人。tt = Split(t， 。

）可以通过 VB 的 Val 函数来实现：Function toDecimal(hex As String)toDecimal = Val(&H & hex)End Function （如果 Val 接收到的字符串以 &H 开头，Val 将把它当作十六进制数而返回与其对应的十进制数。

第一个：Private Sub Command1_Click()TextText = 我来自 + TextText End Sub 第二问：回楼主：这个需要用到截取字符串函数。