【简答题】如下程序是从键盘上输入一个,找出大于或等于该数的第一个素数。 Private Sub Command1_Click() Dim i As Integer, x As Integer, y As Integer, flag As Boolean flag = False x = InputBox(" 请输入一个 ", " 输入 ") y = x Do While Not flag ...
【简答题】如下程序是从键盘上输入一个,找出大于或等于该数的第一个素数。请完善程序。 Private Sub command1_Click() Dim i As Integer, x As Integer, y As Integer, flag As Boolean flag = False x = InputBox(" 请输入一个 ", " 输入 ") y = x Do While Not...