有10个数，分别确定其中的3个后，后面余下的7个数跟着顺序排列，如何用代码实现？

求教，我是初学者，有10个数，分别确定其中的3个后，后面余下的7个数跟着顺序排列，如何用VB代码实现？
例1：
第一步：点击（或者选中）7之后，排列7012345689
第二步：点击（或者选中）3之后，排列7301245689
第三步：点击（或者选中）2之后，排列7320145689

例2：
第一步：点击（或者选中）5之后，排列5012346789
第二步：点击（或者选中）8之后，排列5801234679
第三步：点击（或者选中）7之后，排列5870123469

余下类推，意思就是从0-9中选中三个之后，余下的7个顺序跟着前面的三个排列。