本文目录一览

1，c语言编程ABB

c语言版#include<stdio.h> void main() int j; for(j=1;j<=4;j++) if(j==1) printf("A"); if(j==2) printf("BB"); if(j==3) printf("CCC"); if(j==4) printf("DDDD"); printf("\n"); } }

c语言编程ABB

2，计时计数的单片机程序怎么写啊

void cushi() { TMOD=0x59; TCON=0x00; TH1=0x3c; TL1=0xaf; TH0=0; TL0=0; TR0=1; TR1=1; ET1=1; ET0=0; EA=1; } void time0() interrupt 3 { a++; //这里调用显示程序 根据你的电路图写的程序 } void time1() interrupt 1 { b++; if(b==20) { /调用一个变量增加的子程序 用来显示的时间数增加 b=0; } TH1=0x3c; TL0=0xaf; } 这个时间上面的计算是有误差的 因为中断是有优先级的 不够精确的话 就调整TH1 TL1的值

计时计数的单片机程序怎么写啊

3，VBA编写程序实现筛选计数功能

Option ExplicitSub 计数()Application.ScreenUpdating = FalseDim i%, arr, d As Object, d1 As Objectarr = [A1].CurrentRegionSet d = CreateObject("Scripting.Dictionary")Set d1 = CreateObject("Scripting.Dictionary")For i = 2 To UBound(arr) If Cells(i, 2).Interior.ColorIndex <> -4142 Then d(arr(i, 1)) = d(arr(i, 1)) + 1 Else d(arr(i, 1)) = d(arr(i, 1)) + 0 End If If Cells(i, 3).Interior.ColorIndex <> -4142 Then d1(arr(i, 1)) = d1(arr(i, 1)) + 1 Else d1(arr(i, 1)) = d1(arr(i, 1)) + 0 End IfNext[E2].Resize(d.Count, 1) = Application.Transpose(d.keys)[F2].Resize(d.Count, 1) = Application.Transpose(d.items)[G2].Resize(d1.Count, 1) = Application.Transpose(d1.items)Application.ScreenUpdating = TrueEnd Sub效果对不对自己试下吧。。

VBA编写程序实现筛选计数功能


文章TAG：abb程序编程怎么计数  c语言编程ABB  
没有了