这个乘法问题在哪儿?

qiangshou2301 2009-08-17 08:49:16
Val (Text5.Text) * 145636 = temp8
...全文
107 14 打赏 收藏 转发到动态 举报
写回复
用AI写文章
14 条回复
切换为时间正序
请发表友善的回复…
发表回复
songs 2009-08-19
  • 打赏
  • 举报
回复
数据类型非常重要啊!
虽然VB在进行运算时会隐含一些类型转换,但是应该在所有情况下明确的进行类型的转换,严谨的按照类型来进行相应的运算。
楼主和5楼的结果应该是一个布尔值
Tiger_Zhao 2009-08-19
  • 打赏
  • 举报
回复
If Dir("8.txt") <> "" Then 
Dim temp8 As String
temp8 = Val (Text5.Text) * 145636
Open App.Path & "\8.txt" For Output As #8
Print #8, temp8
Close #8
End If
chinaboyzyq 2009-08-19
  • 打赏
  • 举报
回复
        'Val (Text5.Text) * 145636 = temp8
text5.text=temp8
text5.text=val(text5.text)*145636

'你想要的是以上这个?
qiangshou2301 2009-08-19
  • 打赏
  • 举报
回复
好的 搞定了 在其他地方/145636就行了
goosen 2009-08-17
  • 打赏
  • 举报
回复
temp8 类型不一样
东方之珠 2009-08-17
  • 打赏
  • 举报
回复
什么问题,是数据溢出了吗?
qiangshou2301 2009-08-17
  • 打赏
  • 举报
回复
还是不行啊 !
东方之珠 2009-08-17
  • 打赏
  • 举报
回复
应该用Print保存,而Line Input 是读取一行:
If Dir("8.txt") <> "" Then 
Dim temp8 As String
Open App.Path & "\8.txt" For Input As #8
Print #8, cLng(Text5.Text)*145636
'Val (Text5.Text) * 145636 = temp8
Close #8
End If
qiangshou2301 2009-08-17
  • 打赏
  • 举报
回复
不是 就是把Val (Text5.Text) * 145636保存进\8.txt文件里面 我原来是这样Text5.Text = temp8就可以 我现在想乘145636
东方之珠 2009-08-17
  • 打赏
  • 举报
回复
cStr(cLng(Text5.Text) * 145636) = temp8 
东方之珠 2009-08-17
  • 打赏
  • 举报
回复
左右两边类型不一样,如何相等??
东方之珠 2009-08-17
  • 打赏
  • 举报
回复
[Quote=引用 2 楼 qiangshou2301 的回复:]
If Dir("8.txt") <> "" Then
        Dim temp8 As String
        Open App.Path & "\8.txt" For Input As #8
        Line Input #8, temp8
        Val (Text5.Text) * 145636 = temp8
        Close #8
End If

“Val (Text5.Text) * 145636 = temp8”
这一句不能颠倒过来
[/Quote]

这一句是不是判断相等??
qiangshou2301 2009-08-17
  • 打赏
  • 举报
回复
If Dir("8.txt") <> "" Then
Dim temp8 As String
Open App.Path & "\8.txt" For Input As #8
Line Input #8, temp8
Val (Text5.Text) * 145636 = temp8
Close #8
End If

“Val (Text5.Text) * 145636 = temp8”
这一句不能颠倒过来
huyongsc 2009-08-17
  • 打赏
  • 举报
回复
temp8=Val (Text5.Text) * 145636

7,759

社区成员

发帖
与我相关
我的任务
社区描述
VB 基础类
社区管理员
  • VB基础类社区
加入社区
  • 近7日
  • 近30日
  • 至今
社区公告
暂无公告

试试用AI创作助手写篇文章吧