设有以下窗体单击事件过程: Private Sub Form_Click() a=1 For i=1 To 3 Select Case i Case 1,3 a=a+1 Case 2,4 a=a+2 End Select Next i MsgBox a End Sub 打开窗体运行后,单击窗体,则消息框的输出内容是______。
查看答案
已知在文件IN3.DAT中存有100个产品销售记录,每个产品销售记录由产品代码dm(字符型4位)、产品名称mc(字符型10位)、单价dj(整型)、数量s1(整型)、金额je(长整型)五部分组成。其中:金额=单价×数量。函数ReadDat()的功能是读取这100个销售记录并存入结构数组.sell中。请编制函数SortDat(),其功能要求:按产品名称从小到大进行排列,若产品名称相同,则按金额从小到大进行排列,最终排列结果仍存入结构数组sell中,最后调用函数WriteDat()把结果输出到文件OUT3.DAT中。 注意:部分源程序已给出。请勿改动主函数main()、读数据函数ReadDat()和输出数据函数WriteDat()的内容。 [试题程序] #include #include #include #include #include #define MAX 100 typedef struct char dm[5]; /*产品代码*/ char mc[11]; /*产品名称* / int dj; /*单价*/ int s1; /*数量*/ long je; /*金额*/ PRO; PRO sell[MAX]; void ReadDat(); void WriteDat(); void SortDat() void main( ) memset(sell,0,sizeof(sell)); ReadDat(); SortDat(); WriteDat(); void ReadDat() FILE *fp; char str[80],ch[11]; Int i; fp=fopen("IN3.DAT","r"); for(i=0;i<100;i++) fgets(str,80,fp); memcpy(sell[i].dm,str,4); memcpy(sell[i].mc,str+4,10); memcpy(ch,str+14,4);ch[4]=0; scll[i].dj=atol(ch); memcpy(ch,str+18,5);ch[5]=0; sell[i].s1=atol(ch); sell[i].je=(long)sell[i].dj*sell[i].s1; fclose(fp); void WriteDat(void) FILE *fp; int i; fp=fopen("OUT3.DAT","w"); for(i=0;i<100;i++) fprintf(fp,"%s%s%4d%5d%101d\n",sell[i].dm,sell[i].mc,sell[i].dj,sell[i].s1,sell[i].je); fclose(fp);
46~50题基于以下题干: 一块平坦的野地有4个不同的隐蔽处即F、G、W、X,它们分别由4条道路联结,这 4条路的名字分别是Q、R、S、T,并且长度相同,以下列方式联结: (1) Q仅仅联结F和W。 (2) R仅仅联结G和W。 (3) S仅仅联结F和G。 (4) T仅仅联结G和X。 假如通过走离开小路的近道,一位徒步者可以从W到X走一条比仅仅走小路从 W到X的最短距离还要近的距离,下列哪一个一定正确
A. 从F到X的最短距离要比从W到X的最短距离要短。
B. F和X之间的最短序列是F和X之间的最短距离。
C. 通往R和T的不是一条直线。
D. 通往S和T的不是一条直线。
上层建筑可以推进或延缓国际分工的形成和发展。( )
A. 对
B. 错