vb输入正整数显示最小素数