vb编写的实用例子（用vb编写程序）

本文目录一览：

• 1、VB里的mousemove事件举例
• 2、vb用function怎样自定义函数?格式怎么写?举个例子,比如inputbox函数用...
• 3、vb实例编程问题,字体改变,要求编出详细程序
• 4、vb怎么实现输入1至15的整数,然后分成3行,每行5个数,输出
• 5、怎样用VB做一个最简单的时钟?
• 6、谁知道vb中msgbox的语法,请举个完整的例子!

VB里的mousemove事件举例

1、在 Visual Basic （VB） 中，MouseMove 事件会在鼠标指针在不同对象之间移动时连续触发。当鼠标停留在对象的边界区域内时，除非有其他对象捕获鼠标，否则该对象会接收到这一事件。

2、首先，当鼠标在表单（Form）上移动时，无论是否经过标签（Label），标签的文本颜色都会发生变化。在Form_MouseMove事件中，代码设置了标签的文本颜色为黑色（RGB（0， 0， 0），并取消了文本的下划线（FontUnderline = False）。

3、MouseMove事件概述 在Visual Basic编程中，MouseMove事件是鼠标指针在控件上移动时触发的事件。当用户的鼠标光标在指定的控件区域内移动时，该事件会被触发，允许程序员执行特定的代码或操作。事件处理过程 在VB中处理MouseMove事件，通常需要在相关的控件事件处理器中编写代码。

4、首先MouseMove属性不是属性而是事件，当鼠标在picture2上面移动时触发MouseMove事件。其中几个参数的解释：button：鼠标滑动时如果按住左键则返回1，如果是按右键则返回2，没有按任何按键则返回0。shift：鼠标滑动同时如果同时按住了键盘的Shift键则返回1，如果没按则返回0 。

5、Form_MouseMove事件，会返回鼠标在窗口中的位置（x，y）。当鼠标的x，y超出客体的范围时，程序想做什么就自己编啦。用API检测鼠标在窗口中的位置。

6、LeftDown = （Button And vbLeftButton） 0 CtrlDown = （Shift And vbCtrlMask） 0 然后，接下去可对结果的各种组合进行检测，其操作如下：If LeftDown And CtrlDown Then 注意 为了对鼠标按钮按下和释放所引起的事件进行处理，可使用 MouseDown 和 MouseUp 事件过程。

vb用function怎样自定义函数?格式怎么写?举个例子,比如inputbox函数用...

在VB0中定义自定义函数的过程需要仔细规划。首先，打开VB0，新建一个工程，在窗体中添加一个命令按钮，将Caption分别改为“调用函数”，将窗体Form1的Caption属性改为“VB0自定义函数”，并调整界面布局，确保用户界面简洁直观。

打开VB0，新建一个工程，在窗体中添加一个命令按钮，caption分别改为“调用函数”，将窗体Form1的caption属性改为“VB0自定义函数”，将界面设置成下图：双击窗体Form1，进入代码编辑窗口，单击左侧下拉三角形，选择通用。

用function自定义函数，跟一般的子程序基本相同。不同的是，function需要有返回值 例如 private function sumQiuHe（x as integer，y as integer）sumQiuHe=x+y end function 然后，在其他程序段中调用 dim i as integer i=sumQiuHe（3，5）即可得i=8 至于自定义inputbox 这个估计是有些难度了。

在VB中使用function关键字定义自定义函数，其基本结构与普通子程序相似。然而，function的关键特性在于它可以返回值，这意味着你可以将函数的结果存储在变量中并进一步使用。

vb实例编程问题,字体改变,要求编出详细程序

1、在VB编程中，你可以通过简单的代码实现文本框字体的动态改变。首先，确保在你的窗体上放置了一个文本框（Text1）和四个命令按钮（Command1， Command2， Command3， Command4）。将四个命令按钮的Caption属性分别设为：宋体、黑体、华文楷体、华文仿宋。

2、在VB编程中，如果你想让一个文本控件的字体变得粗体，可以使用如下语句：textfontbold = true。这里的text1是指定的文本控件名称。如果希望根据某个Check控件的状态来改变字体粗细，可以使用逻辑表达式。例如，当Check控件被选中时，其值为1，字体会变粗；否则，字体保持正常。

3、在VB编程中，可以通过多种方式来调整列表框（List1）的字体样式。当用户点击下拉列表（Combo1）中的某个选项时，可以动态地改变列表框的字体。

4、首先，我们需要在按钮（Command1）的点击事件（Command1_Click）中编写相应的代码。在代码中，我们使用了以下属性来设置TEXTBOX（Text1）的字体属性： 字体名称（FontName）：设置字体的名称。例如，设置为“宋体”。这将改变文本的显示字体，使得文本以宋体显示。

5、在VB编程中，如果你想更改文本框（如Text1）的字体，可以使用font属性。例如，你可以将字体设置为“楷体”。这可以通过以下代码实现：TextFont.Name = 楷体这里，TextFont.Name表示设置文本框Text1的字体名称。楷体是设置的具体字体类型。

vb怎么实现输入1至15的整数,然后分成3行,每行5个数,输出

1、在Visual Basic中，可以通过编写一个简单的程序来实现输入1至15的整数，并将其分成3行，每行5个数输出。这里给出一个具体的方法：首先，我们需要在窗体上放置一个命令按钮，并将其名称设置为Command1。

2、另一种方法是在赋值时使用vbCrLf进行换行。例如，如果你正在编写代码并需要将一个值赋给一个多行文本框，可以这样操作：Dim str As String = 第一行文本 & vbCrLf & 第二行文本 & vbCrLf & 第三行文本。然后将str赋值给文本框的text属性即可。

3、说明： Randomize 语句用于初始化随机数生成器。 Int 生成一个 0 到 9 之间的随机整数。 vbNewLine 是一个常量，用于在字符串中插入换行符，使得每个数字在图片框中单独占一行显示。 PictureCls 用于清除图片框中的现有内容。 PicturePrint strTemp 将拼接好的字符串输出到图片框中。

4、多维数组： VB支持多维数组，可以在“Dim”语句中使用多个括号来指定数组的维度和大小。例如，定义一个5行4列的二维整数数组：Dim arrMulti As Integer。 数组选项： 在定义数组时，可以使用一些关键字来指定数组的特性。例如： Static：指定数组为静态数组，其生命周期贯穿整个程序运行期间。

5、固定大小的数组： 如果要定义具有固定大小的数组，可以在“Dim”语句中指定数组的大小。例如，定义一个包含10个整数的数组：Dim arrFixed As Integer。 多维数组： VB支持多维数组，可以在“Dim”语句中使用多个括号来指定数组的维度和大小。

怎样用VB做一个最简单的时钟?

要在VB中创建一个简单的时钟，您需要在窗体上放置一个标签（Label）和一个计时器（Timer）。接着，编写两个子程序：一个用于启动时钟，另一个用于更新时间显示。首先，在窗体加载时设置计时器的间隔为2000毫秒（即2秒），并启用计时器。同时，将当前时间显示在标签上。

在VB编程中，编写一个简单的电子闹钟程序是一个很好的入门练习。首先，我们定义一个整数变量a用于存储用户输入的时间。当用户点击Command1按钮时，会弹出一个输入框，让用户输入时间，并将输入的时间值存储到变量a中。接下来，我们将重点放在Timer1定时器上。

在VB中，首先创建一个新的Form1，并在其上放置一个Command按钮、一个Label控件和一个Timer控件。通过配置这些控件，我们可以实现一个简单的倒计时功能。首先，我们定义一个名为ts的整型变量，用于存储倒计时的秒数。

本代码实现了一个简单的VB时钟倒计时功能。用户可以通过输入框输入倒计时秒数，然后点击按钮启动倒计时。在按钮点击事件处理程序中，首先从输入框获取用户输入的倒计时秒数，并将其赋值给变量n。接着，将label控件的文本设置为n，显示当前倒计时值。

．如何画时钟表盘上的所有直线元素？用Load命令建立原始Line控制的14个拷贝（因为表盘有12个点和时、分、秒共15个Line），该控制数组每一个实例的 端点坐标属性设置为每条线在时钟表盘上的适当位置，这些拷贝中大多数只放置一次，而3个Line控制每秒钟更新一次，产生时钟指 针移动的感觉。

谁知道vb中msgbox的语法,请举个完整的例子!

1、VB中的MsgBox函数用于显示消息框，其基本语法如下：格式：MSGBOX（消息文本S[，显示按钮N][，标题S][，帮助文件S，帮助主题号N]）其中，各个参数的具体含义如下：消息文本S：需要显示在消息框中的文本内容。显示按钮N：可以选择不同的按钮组合，如确认、取消、是、否等，具体值可以参考相关文档。

2、vbOKOnly：设置只显示“确定”按钮。当用户点击确定按钮时，函数返回0。这适用于不需要用户输入额外信息或选择的简单确认场景。 vbOKCancel：显示“确定”和“取消”两个按钮。用户可以选择其中之一，函数返回值为1或-1。返回1表示用户点击了“确定”按钮，-1表示用户选择了“取消”。

3、MsgBox是Visual Basic（VB）中用于显示消息提示框的函数，它允许开发者在程序中向用户显示信息、警告或询问用户意见。以下是MsgBox语句的详细使用方法：信息内容（第一参数）：MsgBox的第一个参数是要显示的消息文本。这是用户将在消息框中看到的主要信息。

4、MsgBox（prompt[， buttons][， title][， helpfile， context]）其中，prompt参数是对话框中显示的消息文本；buttons参数用于指定对话框中显示的按钮类型，例如vbOKOnly、vbOKCancel等；title参数用于设置对话框的标题；helpfile和context参数用于链接到帮助文件中的特定部分，但它们在大多数情况下并不常用。

5、MsgBox 函数 在对话框中显示消息，等待用户单击按钮，并返回一个 Integer 告诉用户单击哪一个按钮。语法 MsgBox（prompt[， buttons] [， title] [， helpfile， context]）MsgBox 函数的语法具有以下几个命名参数：部分 描述 Prompt 必需的。

6、MsgBox 函数 在对话框中显示消息，等待用户单击按钮，并返回一个 Integer 告诉用户单击哪一个按钮。语法 MsgBox（prompt[， buttons] [， title] [， helpfile， context]）MsgBox 函数示例 本示例使用 MsgBox 函数，在具有“是”及“否”按钮的对话框中显示一条严重错误信息。