VB怎样选连续选两个数字隔一个数字再连选两个数字,比如0到10,我选124578或是0,1,3,4,6,7,9,10

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/03 16:04:45
VB怎样选连续选两个数字隔一个数字再连选两个数字,比如0到10,我选124578或是0,1,3,4,6,7,9,10

VB怎样选连续选两个数字隔一个数字再连选两个数字,比如0到10,我选124578或是0,1,3,4,6,7,9,10
VB怎样选连续选两个数字隔一个数字再连选两个数字,比如0到10,我选124578或是0,1,3,4,6,7,9,10

VB怎样选连续选两个数字隔一个数字再连选两个数字,比如0到10,我选124578或是0,1,3,4,6,7,9,10
'加一命令按钮
Private Sub Command1_Click()
Dim myStart As Integer,myEnd As Integer,myNum As Integer,myStr As String,i As Integer
myStart = Val(InputBox("请输入开始的数","开始数",0))
myEnd = Val(InputBox("请输入结束数","结束数",10))
For i = myStart To myEnd
myNum = myNum + 1
If myNum = 3 Then
myNum = 0
Else
myStr = myStr & i & ","
End If
Next
MsgBox myStr
End Sub

VB怎样选连续选两个数字隔一个数字再连选两个数字,比如0到10,我选124578或是0,1,3,4,6,7,9,10 VB怎样把数字按从大到小排列? 0-5能组成三位数字 且这六位数字的 以连续的两个奇数一个偶数的形式 11223344中的数字任意移动,使得两个1中间夹一个数字,两个2中间夹两个数字,两个3之间有3个数字,两个4之间有4个数字,这几个数字应怎样排列 VB作业,制作一个数字时钟,又图,非常感谢! 求用VB程序解决~生成数字金字塔,要求一个等腰三角形金字塔尖朝下,另一个朝上,中间数字为1,向两个方向递推增加.最多到数字9.要求数字前后不能有空格. VB 连续输入10数字,显示其中奇数的个数和偶数的个数 12个数字选两个,有多少组数字 vb 间隔一秒 在同一行一个一个输出1-10十个数字每个数字出现的间隔为1秒,1 2 3 4 …… 这样输出 怎样控制两个数字间的距离? 将一个两位数的个位数字和十位数字交换位置的VB语言 一个小偷最怕哪两个数字? 一共10个数字,一次会出现一个,我连续猜5次,选9个数字,那么我中的机率是多少?怎么计算的呢? 小明从1到6选两个不同数字,再投两颗骰子,猜到其中一个数字的概率是多大 两个连续数字和是650,两个数是 怎样排列1.1.2.2.3.3.4.4,才能使两个1之间有一个其他数字,两个2之间有两个其他数字,两个3之间有三个其他数字,两个4之间有四个其他数字? 怎样买彩票怎么没有介绍有哪些数字?一个有多少数字可以选?22选5一共有几十个数字? 有分别两组1-10的数字,每组分别抽取一个数字,两个数字相同的几率是多少?连续抽两次,两次抽取的两组数字都相同的几率是多少? 连续三个数字组成一个两位数和一位数,怎样组合使相乘的积最大.有什么方法.连续三个数字组合成一个两位数和一个一位数,怎样组合才能使相乘的积最大,有什么方法.