黑客X档案官方论坛 » 编程魔方 » 一个很菜的问题刚学VB 不知道错在那郁闷了

12 12 ››

打印

[原创] 一个很菜的问题刚学VB 不知道错在那郁闷了

8745016

学前班

帖子: 32
精华: 0
威望: 0 度
金币: 11 枚
最后登录: 2008-8-21

1^# 大中小发表于 2008-5-28 23:07 只看该作者

一个很菜的问题刚学VB 不知道错在那郁闷了

Dim a As Integer, b As Integer
a = Texp1.Text
b = Texp2.Text
Texp3.Texp = a & b

TOP

编程小猪

三年级

Rank: 3 Rank: 3 Rank: 3

帖子: 617
精华: 0
威望: 0 度
金币: 1003 枚
性别: 男
来自: 成都
最后登录: 2008-8-30

2^# 大中小发表于 2008-5-29 00:39 只看该作者

Texp3.Texp = a & b
。。。。。。。。。。。。。。。。。。。。。

以子之盾，攻子之矛。

TOP

编程小猪

三年级

Rank: 3 Rank: 3 Rank: 3

帖子: 617
精华: 0
威望: 0 度
金币: 1003 枚
性别: 男
来自: 成都
最后登录: 2008-8-30

3^# 大中小发表于 2008-5-29 00:40 只看该作者

text属性返回是字符串类型
a,b 不应该申明为整型integer

以子之盾，攻子之矛。

TOP

521322132

一年级

Rank: 1

帖子: 77
精华: 0
威望: 0 度
金币: 57 枚
性别: 男
来自: 上海
最后登录: 2008-8-26

4^# 大中小发表于 2008-5-29 01:21 只看该作者

Dim a As Integer, b As Integer
a = Text1.Text
b = Text2.Text
Text3.Text = a & b

研究VB和C++技术，X杂志忠实读者

TOP

sharenfan

学前班

帖子: 22
精华: 0
威望: 0 度
金币: 12 枚
最后登录: 2008-8-25

5^# 大中小发表于 2008-5-29 12:03 只看该作者

感觉错误有好几处！！！！！！

TOP

vscos

四年级

Rank: 4

帖子: 1260
精华: 0
威望: 0 度
金币: 2369 枚
最后登录: 2008-8-30

6^# 大中小发表于 2008-5-29 12:32 只看该作者

应将texp3.texp改为texp3.text

TOP

mylee123

一年级

Rank: 1

帖子: 131
精华: 0
威望: 0 度
金币: 452 枚
性别: 男
最后登录: 2008-8-25

7^# 大中小发表于 2008-5-29 12:56 只看该作者

Texp3.Text=a &b

改成这样子，还有注意a b是不是字符型的！

TOP

ty1921

学前班

帖子: 28
精华: 0
威望: 0 度
金币: 137 枚
最后登录: 2008-6-18

8^# 大中小发表于 2008-5-29 15:47 只看该作者

Dim a As Integer, b As Integer '定义Ａ，Ｂ为整数型数据
a = Text1.Text 　　'取Ａ输入
b = Text2.Text　　　　　'取Ｂ．．
Text3.Text = a & b　　　　'计算模块

４楼的无误．．．．．．．

TOP

tig2

学前班

帖子: 6
精华: 0
威望: 0 度
金币: 13 枚
最后登录: 2008-5-29

9^# 大中小发表于 2008-5-29 16:18 只看该作者

text返回的是字符型数据。而是主要的错误是最后一句哪里。

TOP

8745016

学前班

帖子: 32
精华: 0
威望: 0 度
金币: 11 枚
最后登录: 2008-8-21

10^# 大中小发表于 2008-5-29 23:43 只看该作者

我真粗心。。。

TOP

‹‹ 上一主题 | 下一主题 ››

12 12 ››

Processed in 0.140602 second(s), 5 queries, Gzip enabled.

[原创] 一个很菜的问题 刚学VB 不知道错在那 郁闷了

一个很菜的问题 刚学VB 不知道错在那 郁闷了

Texp3.Text=a &b

[原创] 一个很菜的问题刚学VB 不知道错在那郁闷了

一个很菜的问题刚学VB 不知道错在那郁闷了