VB 将ab两个变量的值互换
题目
VB 将ab两个变量的值互换
要求:将a、b两个变量的值互相交换,并在窗体上输出变量交换前后的值.程序运行后,单击窗体时,一次弹出两个输入信息对话框.
答案
我写的代码:
Private Sub Form_Click()
'请求用户给a和b输入值
Dim a As String,b As String
a = InputBox("输入a的值","输入信息")
b = InputBox("输入b的值","输入信息")
'交换a和b的值
Dim c As String
c = a
a = b
b = c
'在窗体上输出变量交换前后的值
Print "交换后a的值为:" & a
Print "交换后b的值为:" & b
End Sub
举一反三
已知函数f(x)=x,g(x)=alnx,a∈R.若曲线y=f(x)与曲线y=g(x)相交,且在交点处有相同的切线,求a的值和该切线方程.
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
热门考点
- 尿素循环哪些是耗能过程?哪些是限速步骤?氨的来源有哪些
- lie的ing形式是什么
- 惊天动地,形容声音非常大的词语有哪些
- 求翻译成英语,最好是自己翻译“他虽然患有精神残疾.但还是努力克服各种困难”
- 已知2m²-3m-7=0 ,7n²+3n-2=0,m、n为实数,n不等于0,且mn不等于1,求m+1/n
- 有五个不同的球A,B,C,D,E要放进七个编号为1,2,3,4,5,6,7的盒子中,每个盒子最多只能放
- 帮我分析一下句子结构吧
- throw towards啥意思
- 有两个三位数,构成他们的六个数码互不相同一直这两个三位数之和等于1771这两个三位数的乘积最大能是几?
- 解方程(x^2-3x+3)(x^2-3x-2)=14