用vb编程，窗体中有一个命令按钮。程序运行时，单击“显示”命令按钮，在窗体上显示1000以为个位数 vb中怎么编写 单击命令按钮，则窗体显示文本框内的内容？

均匀排列

代码如下：

Private Sub Command1_Click()

Dim i As Integer

Dim j As Integer

Dim k As Integer

Dim a(5) As String

i = 5

k = 0

For j = 1 To 1000

i = i + 5

If i Mod 3 = 0 And Right(CStr(i), 1) <> 0 Then

k = k + 1

  If i < 1000 Then

  a(k) = i

  Else

  a(k) = ""

  End If

  If k Mod 5 = 0 Then

  Print Tab(5); a(1); Tab(15); a(2); Tab(25); a(3); Tab(35); a(4); Tab(45); a(5)

  k = 0

  If i > 1000 Then Exit For

  End If

If j Mod 5 = 0 Then Print ""

End If

Next j

End Sub

for i=0 to 1000
if (right(i,1)=5) and (i mod 3=0) then
x=x+1
print i;
if x mod 5=0 then print
endif
next

VB编程问题:程序运行时，在文本框text1中输入1个字符串，单击命令按钮command1时，程序能统计出输入~

1、首先，在窗体上面添加一个文本框。

2、单击文本框，在属性窗口设置文本框的属性，清空文本内容，将文本框的enabled属性设置为False。

3、双击“提取信息”命令按钮，编写程序的代码，如下图所示。提取信息时，需要使用截取字符串相关的函数，如Left,Right,Mid等。本题还需要使用InStr函数查找字符。

4、双击“清空”命令按钮，编写程序的代码。

5、双击“退出”命令按钮，编写程序的代码。

6、最后输入字符串时，就可以出输入了。

1、首先，双击窗体空白处进入代码窗口。

2、然后我们在事件中找到Click事件。

3、这个时候开始编写代码测试【Print "我是Click单击属性！"】。

4、然我们开始运行测试。

5、启动后，我们在窗体空白处单击。

6、这个时候我们将可以看到测试的效果。

vb设计一个抓不住按钮的窗体,窗体上只有一个命令按钮,但运行是鼠标无法...
答：最简单的实现方法：Private Sub Command1_MouseMove(Button As Integer, Shift As Integer, X As Single, Y As Single)RandomizeCommand1.Move Int((Me.ScaleWidth - Command1.Width) * Rnd), Int((Me.ScaleHeight - Command1.Height) * Rnd)End Sub ...

vb编程:在窗体中有四个单选按钮和一个命令按钮,当选择一个单选按钮...
答：private sub command1_click()If Option1.Value = True Then form2.Show elseif Option2.Value = True Then form3.Show elseif Option3.Value = True Then form5.Show elseif Option4.Value = True Then form5.Show endif end sub

VB 编写一个简单程序,要求:单击命令按钮来显示或隐藏标签,具体点的解答...
答：请按以下步骤操作：打开vb新建一个工程，保存好 窗体上画一个一个命令按钮command1（命令按钮标题“隐藏”），一个标签label1，标签最好打几个字 双击命令按钮进入代码编辑器 写如下代码：if command1.caption='隐藏' then label1.visible=false command1.caption='显示'else label1.visible=true comma...

如何实现在vb里单击一个窗体后显示一个命令按钮
答：窗体中放一个commandbutton（按钮控件），可见性（Visible）设为False，然后写窗体点击事件代码 如果是点后就响应，则在Form_MouseDown上加代码，如果是点击然后鼠标松开后再响应，则在Form_Click中加代码。代码如下Command1.Visible = True

VB编程实现:单击命令按钮Command1,标签控件1从左到右,标签控件2从下到...
答：在窗体中做两个标签，一个命令按钮，一个定时器控件，复制以下的代码，就可以运行了，如果需要可以调整其中的100和400二个数据的大小。Dim fx As Integer, fx1 As Integer Private Sub Form_Load()Label1.BorderStyle = 1 Label2.BorderStyle = 1 End Sub Private Sub Command1_Click()Timer1....

vb中想做一个按钮点击一下打开窗口,再点一下关闭窗口!于此循环!如何编辑...
答：新建两个窗体form1和form2 在两个窗体中各加一个命令按钮commnad1；在form1下的command1中编辑命令 form2.show 在form2下的command1中编辑命令 unload me 或unload form2 运行后：点击form1下的command1，弹出form2窗体；点击form2下的command1，关闭form2窗体；...

VB题:在窗体上画一个名称为Command1的命令按钮,然后编写如下事件过程...
答：第一次单击按钮，x=0,开始执行for 循环，i=1 时，执行y=y+x=0+0=0，x=x+2=0+2=2 i=2时，执行y=y+x=0+2=2，x=x+2=2+2=4 i=3时，循环结束。第二次单击按钮，x=4,开始执行for 循环，i=1 时，执行y=y+x=0+4=4，x=x+2=4+2=6 i=2时，执行y=y+x=4+6=10，x...

在窗体中添加一个命令按钮(名称为Command1),然后编写如下代码
答：2013-05-29 在窗体中添加一个命令按钮(名为Command1)和一个文本框... 2015-12-26 在窗体中添加一个命令按钮和一个文本框,然后编写如下程序 更多类似问题 > 命令按钮的相关知识2010-07-12 VB 怎么把命令按钮移到窗体右上角 5 2009-03-06 VB中命令按钮的名称属性和Caption属性有何不同? 36 2009-05-04...

VB程序 将窗体上的命令按钮Command1置于窗体中央。
答：Private Sub Form_Load()Command1.Move (Me.ScaleWidth - Command1.Width) / 2, (Me.ScaleHeight - Command1.Height) / 2 End Sub

...在窗体上添加一个标签和一个文本框以及一个命令按钮,要求文本...
答：按要求在窗体上添加一个标签和一个文本框以及一个命令按钮，双击命令按钮，删除所有代码，复制如下代码到程序中 Private Sub Command1_Click()If Val(Text1) Mod 2 = 0 Then Label1 = "偶数"Else Label1 = "奇数"End If End Sub Private Sub Text1_KeyPress(KeyAscii As Integer) '判字符...