A. VBA编译随机排序时,提示缺少表达式,怎么修正使正常运行
Sheets("单选").Range("A:D").Sort Key1:=Sheets("单选").Range("D2"), Order1:=xlAscending,
Header:=xlGuess
Sort Key1中间少了一个空格
B. c#编译一个1~32随机选取4个数字,但要求4个数字都不相同,求相应的代码
我是添加了一个TextBox控件名为textBox1用来显示随机取得的4个数字;你也可以改为RichTextBox显示
textBox1.Text = "";
ArrayList result = new ArrayList();//用来存放随即取得的数
Random r = new Random();
for (int i = 0; i < 4; i++)
{
int a = r.Next(1, 33);//存放随机取得的数
if (i != 0) // 为了第一次随机不进行比较
{
if (a == Convert.ToInt32(result[i - 1])) //比较本次随机的数是否与上一次相等
{
i--;
continue;
}
else
result.Add(a);
}
else
result.Add(a);
}
result.Sort();//将取得的数字进行排序,为了好看
//显示取得的4个数
for (int i = 0; i < 4; i++)
{
textBox1.Text += result[i] + "\t";
}
C. C璇瑷濡备綍缂栫▼浜х敓闅忔満鏁帮纻
1銆侀栧厛镓揿紑Visual stdio 2019锛屼緷娆$偣鍑绘枃浠讹纴鏂板缓锛岄”鐩鏂板缓浠ヤ竴涓绌虹槠镄勯”鐩锛