摘要： 这个问题，我们只能用VBA来解决了首先按alt+F11，打开宏VBA编辑器，将下面代码复制过去就OK了 1: Private Sub Worksheet_Change(ByVal Target As Range) 2: If Not IsNumeric(Target) Then End 3: 4: '第一种方案 5: If Not Application.Intersect(Target, Range("A1:A10")) Is Nothing Then'把A1和A10改成你需要的就OK了 6: Application.EnableEvents = Fals 阅读全文

摘要： 前段时间在网上看了小菜成长日记，它主要讲的是一个刚刚入行的初级程序员是如何一步步的把自己的程序面向对象的，应该说是真正面向对象的。实事上，根据客户的一种需求，做出一个解决方案并不难，难的是如何在原版程序上，以改动更小，时间最快的实现客户的第二次，第三次，第N次的改版工作，因为客户的程序不可能不会有任何变化，当你的程序研发出来后，客户在使用中更有新的需求，这是很正常的，也是软件行业里永远不变的，对于一个程序开发者来说，不要对此进行抱怨，应该以一种积极的态度去面对它，事实上，在程序改版的过程中，你利用面向对象的设计方法，在实现中运用它的设计原则及设计模型来解决实现中的问题，些不要为了原则而原则；不 阅读全文

摘要： 1: using System; 2: using System.Collections.Generic; 3: using System.Linq; 4: using System.Text; 5: using System.Data.Linq; 6: using System.Threading; 7: 8: namespace Data 9: { 10: /// <summary> 11: /// LINQ数据库连接对象制造工厂 12: /// </summary> 13: static internal class DataContextFactory 14: 阅读全文

摘要： using System;using System.Collections.Generic;using System.Linq;using System.Text;namespace Entity.Commons{ /// <summary> /// 自定义谓词 /// </summary> public class VPredication : IEnumerable<KeyValuePair<string, object>> { Dictionary<string, object> dicv = null; SpacePredic 阅读全文

摘要： select distinct diary.userid , a.name, sum(case when diary>=1 then 1 else 0 end) as '写日志' from diary inner join a on a.id=diary.userid group by diary.userid,a.id,a.name说明：当你的diary大于1时，也设为1,如果没有写，那么为0 ，这样用sum进行汇总也就求出了结果。ID 姓名 日志数1 zzl 2 2 zql 2 3 zzd 1 4 gy 4 阅读全文