函数代码怎么写的 _函数

1. excel统计的批注数据（内容）的函数代码怎么写统计有多少个单元格吗？比如统计批注中包含“中国”的单元格个数。用自定义函数。
第一：ALT+F11，插入-模块
第二：复制下面的代码
Public Function fx(ByVal a1 As Range)
Sum = 0
For Each x In a1
If InStr(x.Comment.Text，"中国") > 0 Then Sum = Sum + 1
Next
fx = Sum
End Function
第三：在结果单元格里输入：比如，=fx(a1:a7)
如果要显示出哪些单元格都有哪些批注包含了XX字。这个用函数做不到估计，要用程序，原理相同，请自行研究。
===================
如果你的区域包含有没有批注的单元格，代码要改一下
Public Function fx(ByVal a1 As Range)
Sum = 0
For Each x In a1
If x.Comment Is Nothing Then
Sum = Sum + 0
【函数代码怎么写的】Else
If InStr(x.Comment.Text，"中国") > 0 Then Sum = Sum + 1
End If
Next
fx = Sum
End Function
2. 删除字符的函数代码怎么写啊 int strlen(const char string)
{
int i=0;
while(string[i]) i++;
return i;
}
2. strcpy（)，字符串拷贝.
char *strcpy(char *destination, const char *source)
{
while(*destinaton++=*source++);
return (destination-1);
}
3. strcat（)，字符串的连接.
char *strcat(char *target,const char *source)
{
char *original=target;
while(*target) target++; // Find the end of the string
while(*target++=*source++);
return(original);
}
4. streql（)，判断两个字符串是否相等.
int streql(char *str1,char *str2)
{
while((*str1==*str2)&&(*str1))
{
str1++;
str2++;
}
return((*str1==NULL)&&(*str2==NULL));
}
5. strchr（)，在字符串中查找某个字符.
char *strchr(const char *string,int letter)
{
while((*string!=letter)&(*string))
string++;
return (string);
}
6. chrcnt（)，计算某个字符在字符串中出现的次数.
int chrcnt(const char *string,int letter)
{
int count=0;
while(*string)
if(*string==letter)count++;
return count;
}
7. strcmp（)，判断两个字符串是否相等.
int strcmp(const char *str1,const char *str2)
{
while((*str1==*str2)&&(*str1))
{
str1++;
str2++;
}
if((*str1==*str2)&&(!*str1)) //Same strings
return o;
else if((*str1)&&(!*str2)) //Same but str1 longer
return -1;
else if((*str2)&&(!*str1)) //Same but str2 longer
else
return((*str1>*str2)?-1:1);
}
3. 函数怎么写 R语言实际上是函数的集合，用户可以使用base,stats等包中的基本函数，也可以自己编写函数完成一定的功能。
但是初学者往往认为编写R函数十分困难，或者难以理解。这里对如何编写R函数进行简要的介绍。
函数是对一些程序语句的封装。换句话说，编写函数，可以减少人们对重复代码书写，从而让R脚本程序更为简洁，高效。
同时也增加了可读性。一个函数往往完成一项特定的功能。
例如，求标准差sd，求平均值，求生物多样性指数等。R数据分析，就是依靠调用各种函数来完成的。
但是编写函数也不是轻而易举就能完成的，需要首先经过大量的编程训练。特别是对R中数据的类型，逻辑判别、下标、循环等内容有一定了解之后，才好开始编写函数。
对于初学者来说，最好的方法就是研究现有的R函数。因为R程序包都是开源的，所有代码可见。
研究现有的R函数能够使编程水平迅速提高。R函数无需首先声明变量的类型，大部分情况下不需要进行初始化。