VBA编程问题（简单的）

11 |

1 | 2010-5-7 09:26:00 | 显示全部楼层 |阅读模式

Private Sub CommandButton1_Click()
Dim tempnumber As Integer
Dim tempcap As String
tempnumber = Cells(1, 1).Value
If tempnumber Mod 2 = 0 Then
tempcap = "双数"
Else
tempcap = "单数"
End If
Me.Caption = tempcapEnd Sub兄弟，这样改就行了

使用道具举报

千问 | 2010-5-7 09:26:00 | 显示全部楼层

Private Sub CommandButton1_Click()Dim tempcap As Stringtempcap=iif(int(cells(1,1).value) mod 2 =0,"双数"，"单数"） msgbox tempcapEnd Sub

使用道具举报

返回列表发新帖

千问

主题	0 回帖	4882万积分

论坛元老

Rank: 8 Rank: 8

积分: 48824836

加好友
发消息

回复楼主返回列表

问答

热门排行

1 鼻咽癌需要怎么治疗呢？
2 脚趾骨折愈合后，患肢比正常的右腿粗很多z
3 小三阳通过治疗可以好吗
4 皮经肾镜手术，医生会叫家属自找血源吗，一
5 痔疮该怎么治疗么？
6 间接胆红素直接胆红素总胆红素增高
7 两个月、手脚冰冷、出汗、哭闹，是什么原因
8 植发该如何的做的？
9 请问一下有一种病叫做《脑出血》是在怎么什
10 专家，请问我这个属于是性病或梅毒的症状吗
11 有点先兆流产
12 医生你们好请问我今天左眼上眼皮老是跳个
13 小阴唇囊肿怎么办，已经一周
14 肩胛骨骨缝疼
15 昨晚凌晨一点喉咙不舒服，过一会声音也变小
16 宫颈癌应该要注意什么呢
17 孩子总是头疼，已经很多天了
18 吃降压药了血压降不下来
19 丨个月大的小孩感冒了有那些症状？
20 小儿室间隔缺损手术的后遗症是什么？
21 2岁孩子做隐睾手术风险大吗
22 鼻咽癌要注意什么
23 口臭，口干，早上起来口气大
24 口里发苦眼睛老流泪
25 蒲地蓝消炎片乙肝患者可以服用吗？
26 宝宝七十多天下午排便还正常晚上就有点稀水
27 有生育要求的女性该如何治疗子宫肌瘤
28 4个月宝宝脸上很冰手上很汗怎么回事
29 惊吓以后天天晚上尿床
30 私密出长了一个包，痒特别疼
31 小孩阿苯达唑片服用超量
32 宝宝细菌的感染反复发烧
33 家人从半年前感觉喉咙干涩，进食干的食物时
34 请问什么是子宫息肉呢
35 食管癌如何的治的啊？
36 怀孕6个月检查胎儿不好后引产，现在快两周
37 请尽快回答。回答尽量准确一点。谢谢您。
38 关于宝宝的健康问题？
39 就想知道无水头孢最多能用多久
40 肝内胆管结石·背痛·乳房下痛
41 单纯疱疹病毒2型igg弱阳S／CO：1
42 长年的咳嗽30多年了老治不好吃什么也没有
43 排卵期过去十六天了，例假没来，能用验孕棒
44 宝宝两岁了，咳嗽快半个月了，期间一直吃好
45 嗓子里总觉得有痰，总想打嗝…有时候说一会话
46 有怀孕一个月吃佐匹克隆生出健康宝宝的吗
47 我不知道为什么？最近特别健忘啊，不知道什
48 我1号来得月经,5号11号做爱的,喝了一颗避孕药
49 感到拔气.血压也偏高140.90.面色黄
50 脸是长小疙瘩，痒遇热发红，
51 我液下老出汗，味道有点难闻，怎样才可以解
52 引起食管癌的常见病因是什么？
53 脚歪骨折后，每晚可以用热水泡脚吗
54 踢到被开刀的开过刀的12岁男孩会怎样？
55 无痛人流术后第六天有褐色的分泌物
56 斑秃该如何来办才好？
57 男性便血有什么危害？
58 头晕多梦打呼，想睡觉一睡就打呼
59 请问支气管癌是怎么引起的？
60 请问这是什么原因引起的，在饮食方面要注意
61 小的时候脸胖怎么越长越
62 不知道成功避孕了没有
63 怎么样术后治疗
64 我应该注意什么，需要调经，多久后可以怀孕
65 纵膈肿瘤如何治的？
66 我只问血清高对人体有什么影响
67 长牙了！很痛！有木有解决的办法？
68 16号左右来月经，可是今天还没来。三号排
69 脸上干燥怎么办？？？？？
70 颈椎病引起的手臂疼指尖麻木
71 请问医生要是子宫壁薄有办法怀孕嘛？
72 无痛人流后，第三天出现腰痛腿软，是什么原
73 怀孕快九个月了最近肚皮感觉很痒
74 月经前5天有可能排卵吗？
75 阴经短小性交不到一分钟从小手淫
76 红斑狼疮该如何治的？
77 我是乙肝患者，最近体检说肝上有血管瘤
78 面瘫该如何治的呢？
79 女性冬季脚冷怎么治疗
80 '治疗类风湿中药管用吗？
81 我最近几个月出现腿痒痒，但是皮肤表面却很
82 盆腔炎的患者应该怎么办呢？
83 我肚子疼，有时疼，有时不疼
84 生了小孩一个月不干净是怎么回事？要看医
85 我鼻子老是一个鼻孔塞、流清涕吃感冒药不见
86 未满月孩子喝水量
87 家庭床上用腰椎牵引器哪里买？
88 女47岁，做结扎有19年了，还能在生育吗
89 您好医生！七岁小孩脚膝盖骨疼怎么回事，没
90 我家宝宝现在八个月，不知是否缺钙，铁，锌
91 隆胸整形有什么风险？
92 咳簌发烧几天不好
93 请问我是孕妇，岔气了，怎么办啊，用什么办
94 直肠癌的病人吃什么好啊？
95 忧心健康希望及时解决自己的病情
96 孕妇生完小孩一个月多，奶水少怎么办？
97 我头晕，头沉，手脚心发热，睡眠不好总是做