怎么在vb中实现文本框输出内容为+a/-b用什么命令,谢谢

我要表达孔的公差正负是多少,不要±格式,要分开的,中间必须是“/”这个符号。a和b的值是通过其它代码运算出来的。... 我要表达孔的公差正负是多少,不要±格式,要分开的,中间必须是“/”这个符号。a和b的值是通过其它代码运算出来的。 展开
 我来答
司马刀剑
高粉答主

2019-04-11 · 每个回答都超有意思的
知道顶级答主
回答量:4.6万
采纳率:93%
帮助的人:7536万
展开全部

以下程序实现:在文本框输入内容,按回车键(Enter键)后,文本框中的内容输出到列表框。

1)在窗体上布置一个TextBox控件和一个ListBox控件

2)代码


Option Explicit Private Sub Form_Load()    ' 窗体启动时,清空Text1和List1    Text1.Text = ""    List1.ClearEnd Sub Private Sub Text1_KeyPress(KeyAscii As Integer)    ' 如果按下了回车键(回车键的Ascii码为13)    If KeyAscii = 13 Then        Dim s As String        ' 取出Text1中输入的内容并滤除前后的空格        s = Trim(Text1.Text)                 If s <> "" Then            ' 如果Text1中输入的内容不为空,则添加到List1中            List1.AddItem s            ' 添加后,清空Text1            Text1.Text = ""        End If    End IfEnd Sub

3)运行效果

窗体启动时

在Text1中输入,按回车后,输入的内容在List1中显示

syx54
2019-04-11 · TA获得超过7378个赞
知道大有可为答主
回答量:6567
采纳率:83%
帮助的人:2758万
展开全部
Dim a As Single
Dim b As Single

a = 0.238
b = 3.14

Text1.Text = "+" & CStr(a) & "/-" & CStr(b)
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
网海1书生
科技发烧友

2019-04-11 · 擅长软件设计、WEB应用开发、小程序
网海1书生
采纳数:12311 获赞数:26228

向TA提问 私信TA
展开全部
Text1.Text = "+" & a & "/-" & b
已赞过 已踩过<
你对这个回答的评价是?
评论 收起
收起 1条折叠回答
推荐律师服务: 若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询

为你推荐:

下载百度知道APP,抢鲜体验
使用百度知道APP,立即抢鲜体验。你的手机镜头里或许有别人想知道的答案。
扫描二维码下载
×

类别

我们会通过消息、邮箱等方式尽快将举报结果通知您。

说明

0/200

提交
取消

辅 助

模 式