با VB می خوام برنامشو بنویسم عدد a چهار رقمی بر عدد b که 5 رقمی است تقسیم شود و حاصل طری باشد که bسه شود و a یک شود.عدد a بصورت رندم واز بین اعداد 1 تا 9 باشد عددb هم همینطور بطوریکه اعداد صورت و مخرج با هم تکراری نباشند مثلا اگر a =9753 باشد b باید 86421 باشد
این برنامه این اعداد را به ما بدهد
با تشکر