我环顾四周,但无法弄清楚为什么我会收到错误
error:方法不会覆盖或实现超类型的方法
这突出了@Override我在方法中的两个(子程序?).这是我的MainActivity.java- 最后在queryBooks()方法中出现的代码部分- @Overrides都是带下划线的红色.
package com.example.batman.myapplication;
import android.app.AlertDialog;
import android.content.DialogInterface;
import android.content.Intent;
import android.content.SharedPreferences;
import android.support.v4.view.MenuItemCompat;
//import android.support.AlertDialog;
import android.support.v7.app.AppCompatActivity;
import android.os.Bundle;
import android.support.v7.widget.ShareActionProvider;
import android.util.Log;
import android.view.Menu;
import android.view.MenuItem;
import android.view.View;
import android.widget.AdapterView;
import android.widget.ArrayAdapter;
import android.widget.Button;
import android.widget.EditText;
import android.widget.ListView;
import android.widget.TextView;
import android.widget.Toast;
import com.loopj.android.http.AsyncHttpClient;
import com.loopj.android.http.JsonHttpResponseHandler;
import org.json.JSONObject;
import java.io.UnsupportedEncodingException;
import java.net.URLEncoder;
import java.util.ArrayList;
public class MainActivity extends AppCompatActivity implements View.OnClickListener, AdapterView.OnItemClickListener {
TextView mainTextView;
EditText mainEditText;
ListView …Run Code Online (Sandbox Code Playgroud) 我一直在搜索,我知道如何从VB宏调用Personal.xlsb中的函数,但是如何调用该函数在新工作簿中使用?
这是我的功能,保存在我的'Module1'中Personal.xlsb:
Public Function GetColumnLetter(colNum As Integer) As String
Dim d As Integer
Dim m As Integer
Dim name As String
d = colNum
name = ""
Do While (d > 0)
m = (d - 1) Mod 26
name = Chr(65 + m) + name
d = Int((d - m) / 26)
Loop
GetColumnLetter= name
End Function
Run Code Online (Sandbox Code Playgroud)
我创建了一个新的工作簿,并认为我可以调用它=getcolumnletter(1),但是当我开始输入时,该函数不会"填充"=...
我忽略了什么?如何在没有VBA的情况下在其他工作簿中使用此功能?
谢谢你的建议!
在Excel中,我有一些宏是Worksheet模块的一部分.
在代码中,我想确保引用的范围是该工作表的一部分.
例如,在我的Main Sheet工作表模块中,说我有:
Sub test()
Dim rng as Range
Set rng = Range("A1")
End Sub
Run Code Online (Sandbox Code Playgroud)
当然,我想明确给出工作表范围.通常情况下,我会这样做
Set rng = Worksheets("Main Sheet").Range("A1")
Run Code Online (Sandbox Code Playgroud)
但我很好奇,因为我在工作表模块中有我的代码,我怎么能参考那个工作表?我在考虑类似的东西,ThisWorksheet但这不是VBA中的一种方法(但是ThisWorkbook,这就是为什么我想尝试它).
我唯一的另一个想法是,由于我的宏在工作表模块中,"未分配"范围变量隐式引用Main Sheet并且不能引用任何其他工作表的单元格.
我是否理解正确,或者是否有某种方法可以参考运行代码的工作表?
我试过了char(10),char(13)但它们对我不起作用。我使用 Excel 2007,我的任务是用间隔替换新行
有没有办法编写一个If可以有多个参数的(或等效的)语句,如果其中任何一个满足逻辑,那么使用该变量?
例如
if len(x) == 1 or len(y) == 1 or len(z) == 1 or ... len(zz) == 1:
# do something with the variable that met the condition
Run Code Online (Sandbox Code Playgroud)
所以说只有z长度1,我可以用第一个True答案并使用它的方式写出上面的想法/公式吗?
所以像
x = "123"
y = "234"
z = "2"
xx = "1234"
yy = "12345"
if len(x) == 1 or len(y) == 1 or len(z) == 1 or len(xx) == 1 or len(yy) == 1:
#do something with the …Run Code Online (Sandbox Code Playgroud) 我在一个单元格中有一个字符串,让我们说"Client Ref:F123456PassPlus".字符串可能在数字前没有字母,数字中可能有符号,字母和数字之间可能有空格.我只需要将数字作为变量提取.我有代码来做,但它不知道何时停止循环字符串.它应该在有数字或符号以外的东西时停止,而是继续进行.
IsNumber = 1
ref = ""
If branch = "" Then
e = b
Else
e = b + 1
End If
f = 1
While IsNumber = 1
For intpos = 1 To 15
ref = Mid(x, e, f)
f = f + 1
Select Case Asc(ref)
Case 45 To 57
IsNumber = 1
Case Else
IsNumber = 0
Exit For
End Select
Next
IsNumber = 0
Wend
Run Code Online (Sandbox Code Playgroud)
之前已经定义了任何没有定义的变量字母,e告诉代码从哪里开始复制,x是包含字符串的单元格.现在,一切正常,它从数字开始并复制它们并将它们构建成一个越来越大的字符串,但它只会在intpos达到15时停止.
我有一个宏通过列,并从范围内的所有单元格中删除数字.我想添加一个可选参数,所以我可以调用sub,同时告诉它要运行哪些列.这就是我所拥有的:
Sub GEN_USE_Remove_Numbers_from_Columns(Optional myColumns as String)
这个想法是我可以从另一个sub中调用它,就像这样 GEN_USE_...Columns("A B C")
但是,我无法从VB编辑器中运行它,也无法在宏窗口中看到该宏(单击视图 - >宏时).为什么不?为什么我必须用参数调用它(偶数GEN_USE_...Columns(""))我不能再调用它GEN_USE_...Columns()了.
我已经看到你可以添加= Nothing到最后,如果没有给出一个默认值.我已经尝试了()但它没有做任何事情.
我想我的问题是A)为什么我在宏窗口中看不到具有可选参数的宏?和B)为什么我不能直接从VB编辑器调用带参数的宏?我必须实际创建一个sub,然后我可以调用该sub中的宏.不再只是突出显示一些文字并点击"播放".
我知道这两个问题可能是相关的,所以任何见解都会受到赞赏!
(PS:我知道我们应该发布代码,但我不认为这是非常相关的.当然,如果你想看到它,请告诉我,我会更新).
我正在尝试从字典中简洁地创建一个列表。
\n\n以下代码有效:
\n\ndef main():\n newsapi = NewsApiClient(api_key=API_KEY)\n top_headlines = newsapi.get_everything(q="Merkel",language="en")\n news = json.dumps(top_headlines)\n news = json.loads(news)\n articles = []\n for i in news[\'articles\']:\n articles.append(i[\'title\'])\n print(articles)\nRun Code Online (Sandbox Code Playgroud)\n\n输出:
\n\n[\'Merkel \xe2\x80\x9cHelix Suppressor\xe2\x80\x9d Rifle and Merkel Suppressors\', \'Angela Merkel\', \n \'Merkel says Europe should do more to stop Syria war - Reuters\', \n \'Merkel says Europe should do more to stop Syria war - Reuters\', \n \'Merkel muss weg! Merkel has to go! Demonstrations in Hamburg\', ... , \n "Bruised …Run Code Online (Sandbox Code Playgroud) 我正在尝试遍历文件列表,并返回那些作为媒体文件(图像、视频、gif、音频等)的文件。
看到有很多媒体类型,是否有一个库或更好的方法来检查这个,而不是列出所有类型然后根据该列表检查文件?
这是我目前正在做的事情:
import os
types = [".mp3", ".mpeg", ".gif", ".jpg", ".jpeg"]
files = ["test.mp3", "test.tmp", "filename.mpg", ".AutoConfig"]
media_files = []
for file in files:
root, extention = os.path.splitext(file)
print(extention)
if extention in types:
media_files.append(file)
print("Found media files are:")
print(media_files)
Run Code Online (Sandbox Code Playgroud)
但请注意它没有包括filename.mpg,因为我忘了把它.mpg放在我的types列表中。(或者,更有可能的是,我没想到该列表会包含一个.mpg文件,所以没有考虑将其列出。)
我有一个正在尝试循环的函数,目的是在这些变量", "后面加上 a 来修改这些变量。
def create_merge(address, city, state_province, country, postal_code, contact, state):
for key in locals().keys():
for value in locals().values():
print(key, value)
Run Code Online (Sandbox Code Playgroud)
这......有点管用,但不是真的。虽然它为我提供了该定义中所有值的正确读数,但它仅显示state键。我明白为什么,因为我在第一个键移动到第二个键之前循环遍历第一个键中的所有值。
我想要的是一个能够产生如下结果的循环:
address 123 My Address
city
state_province Illinois
country USA
postal_code 12345
contact McGruff
state Illinois
Run Code Online (Sandbox Code Playgroud)
显然,这只是首先列出键,然后列出值。如何一次执行一个键和一个值?
for key in locals().keys():
print (key)
for value in locals().values():
print (value)
Run Code Online (Sandbox Code Playgroud)
...print (key, key.values())不起作用。
也不
for key in locals().keys():
print (key, locals().values())
Run Code Online (Sandbox Code Playgroud)
我想我已经很接近了,但就是无法得到它!感谢您的任何建议/意见。
最后注意:我需要以一种可以查看 是否不为空的方式来执行此操作,如果不为空,则在函数继续之前value修改该值。", "
excel ×4
excel-vba ×4
vba ×4
python ×3
python-3.x ×3
android ×1
excel-2007 ×1
java ×1
line-breaks ×1
string ×1
udf ×1